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Vorwort 


Vorwort 

Der Amiga ist aufgrund seines erschwinglichen Preises und 
seiner bestechenden Grafik- und Soundfähigkeiten in kürze¬ 
ster Zeit sehr bekannt geworden. Dies veranlaßte viele 
Interessenten, sich mit der Programmierung des Amiga zu 
beschäftigen. Man könnte auf die zahlreichen höheren 
Programmiersprachen zurückgreifen, doch der umfangreiche 
Wortschatz des MC68000 ermöglicht es, auch in Assembler 
komfortabel zu programmieren. 

Vergleicht man den MC68000-Prozessor mit anderen bekannten 
Typen, wie dem 6502 (der im C-64 seinen Dienst tut) oder dem 
8088-Reihe von Intel, so stellt man fest, daß der Amiga- 
Prozessor wesentlich mehr Möglichkeiten bietet. Beim 
Vergleich mit dem 6502 wird das kaum verwundern, doch sogar 
die Intel-Prozessoren können sich vom MC68000 noch eine 
Scheibe abschneiden. 

Wer Assembler programmieren möchte, muß nicht nur die 
Sprache selber, also die Befehle und Anwendungsvorschriften 
(Syntax) des MC68000 kennen, sondern sich auch mit dem 
System des Proszessors auskennen. Die Sprache selber wird in 
diesem Buch in den ersten drei Kapiteln behandelt. Fast 
alles, was Sie dort lernen, können Sie auch auf andere 
Systemen anwenden, die den MC68000 besitzen. 

Der Abschnitt Systemprogrammierung wird den weitaus größeren 
Teil des Buches (Kapitel 4-12) einnehmen. Er ist Amiga-spe- 
zifisch, die dort erworbenen Kenntnisse sind also nur auf 
dem Amiga einsetzbar. 

Die ersten drei Kapitel sollen beim Einstieg in Assembler 
helfen. Hierzu werden die Grundbegriffe erklärt, und es wird 
auf substantielle Routinen bei Schleifenkonstruktionen ein¬ 
gegangen. Vom vierten bis achten Kapitel erhält man Einsicht 
in die fünf wichtigsten Libraries des Amiga. Das Kapitel 9 
beschäftigt sich mit der Konstruktion von eigenen Libraries. 

Kapitel (10) behandelt die Devices, die beim Amiga eine 
vergleichbare Stellung wie die Libraries einnehmen. Es wird 
auf die wichtigsten vier Devices eingegangen und anhand von 
zahlreichen Beispielprogrammen deren Anwendung demonstriert. 
In Kapitel 11 wird die Konstruktion eines eigenen Devices 
dokumentiert. 

Zum Schluß wird in Kapitel 12 die Programmierung der DOS- 
Library und der Aufbau des AmigaDOS vertieft. 

Auf den letzten Seiten finden sich zahlreiche Anhänge, in 
denen alle wichtigen Informationen zusammengefaßt sind. Sie 
sollen dieses Buch auch als Nachschlagewerk nutzbar machen. 
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Vorwort 


Bevor wir loslegen, möchten wir noch folgenden Personen dan- 
en: dem Techniklehrer Herrn Knut Reinhardt vom Städtischen 
Gymnasium Rheinbach für die zur Verfügung gestellten Compu¬ 
ter, Thorsten Jansen (die Thorsten-Post) für immer (nicht 
immer, aber immer öfter) pünktliche Überlieferung unserer 
Disketten, und allen anderen, die zur Entstehung dieses Bu¬ 
ches beigetragen haben. 

Viel Spaß beim Lesen und Programmieren wünschen Ihnen 


Ronald Webers 


Frank Zavelberg 
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Kapitel 1 


1.1 Was ist Assembler? 

Dieses Kapitel soll Ihnen Grundsätzliches über den Assembler 
vermitteln. Unrecht haben nämlich mit Sicherheit die Leute, 
die behaupten, Assembler sei eine Sprache nur für 
Programmier-Profis. Auch in Assembler wird nur mit Wasser 
gekocht, und man kann sie lernen wie jede andere 
Programmiersprache. 

Damit kommen wir zu der Frage, was denn die Besonderheiten 
von Assembler und die Unterschiede zwischen den 
Programmiersprachen sind. 

1.1.1 Unterschiede Assembler-Hochsprachen 

Vielleicht haben Sie schon Erfahrung in Sprachen wie BASIC 
oder PASCAL. Diese, wie auch die meisten anderen Sprachen, 
nennt man "Hochsprachen". Eine solche Hochsprache zeichnet 
aus, daß viele "einfache" Befehle im Computer letztendlich 
ziemlich komplexe Vorgänge auslösen. Der PRINT-Befehl in 
BASIC beispielsweise, ist von der internen Ausführung her 
recht kompliziert: Der auszugebende Text muß anhand des 
eingestellten Zeichensatzes in Grafikpunkte umgerechnet 
werden und dann an der richtigen Stelle in den Teil des 
Speichers geschrieben werden, der vom Computer auf dem 
Bildschirm dargestellt wird. Also eine ganze Menge Arbeit, 
die der BASIC-Interpreter für den Programmierer unsichtbar 
leistet. 

Wenn wir uns nun auf die Stufe der Assembler-Programmierung 
begeben, müssen wir für alle diese Dinge, die uns BASIC 
schon zur Verfügung stellt, selbst sorgen. Das heißt natür¬ 
lich nicht, daß Sie im Falle der Textausgabe selbst die 
richtigen Grafikpunkte auf dem Bildschirm ausrechnen müssen, 
dafür stellt der Computer vorgefertigte Programmteile 
(genannt "Routinen") zur Verfügung. Aber Sie müssen z.B. die 
Positionen der Texte auf dem Bildschirm etc. selbst überwa¬ 
chen . 


1.1.2 Von Assembler zur Maschinensprache 

Wie in Hochsprachen gibt es auch in Assembler viele Befehle. 
Der wohl am häufigsten gebrauchte Befehl in Assembler ist 
der MOVE-(Verschiebe-)Befehl. Wenn man z.B. schreibt 

move 2,4 

verschiebt der Computer das, was an der Stelle 2 im Speicher 
steht, an die Stelle 4. 
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Nun gibt es da aber ein kleines Problem: Der Computer ist 
dumm. Er ist so dumm, daß er nur die Ziffern 0 und 1 kennt. 
Das kommt daher, daß ein Computer auf einem System von 
Schaltkreisen basiert, die nur zwei Zustände annehmen kön¬ 
nen: Strom fließt oder Strom fließt nicht, also 0 oder 1. 
Dies bezeichnet man als "Dualsystem". Zahlen dieses Systems 
kann man auch in andere Systeme, z.B. in unser "normales" 
Zehner-(Dezimal-) System umrechnen. Wie das geht, werden wir 
später noch sehen. 

Jedem Assembler-Befehl wird eine Nummer zugeordnet. Angenom¬ 
men, der MOVE-Befehl hätte die (Dual-)Nummer 1111, dann sähe 
unser Befehl von vorhin so aus: 

1111 (die Nummer des Befehls) 

0010 (Dualzahl für 2) 

0100 (Dualzahl für 4) 

Man kann sich also ein Assembler-Programm auf der untersten 
Stufe als lange Kette aus Nullen und Einsen denken: 

111100100100 ... 

Diese Darstellung des Programmes nennt man Maschinensprache. 
Man darf also Maschinensprache nicht mit Assembler verwech¬ 
seln . 

Natürlich wäre es äußerst unpraktisch, ein Programm direkt 
in Maschinensprache zu schreiben. Wie gesagt stellt diese 
010101-Folge die für den Computer übersetzte, direkt 
verständliche Form eines Assembler-Programms dar. Wir werden 
unsere Programme selbstverständlich in der "Befehlsform" 
(move 2,4) schreiben, die Übersetzung in den 0101-Code 
übernimmt ein entsprechendes Programm (das günstigerweise 
auch "Assembler" heißt). 


1.2 Wann und warum Assembler? 

Sprachen wie BASIC, so einfach sie auch zu programmieren 
sein mögen, haben einen ganz entscheidenden Nachteil: Es 
sind sog. Interpretersprachen, d.h. jeder Befehl, den Sie 
schreiben, muß während der Programmausführung interpretiert, 
also in Maschinensprache übersetzt werden, da der Computer 
nur diese direkt versteht. Wenn also in einer Schleife ein 
Befehl 100 mal ausgeführt wird, muß er auch 100 mal über¬ 
setzt werden. Diesen Nachteil kennt Assembler nicht. Hier 
sind die Befehle quasi schon übersetzt, was einen enormen 
Geschwindigkeitsunterschied ausmachen kann. 

Es gibt noch eine andere Art von Programmiersprachen: die 
sog. Compilersprachen. Hier schreibt man auch ein Quellpro¬ 
gramm, ähnlich wie in BASIC, nur wird dieses nicht während 
der Laufzeit übersetzt, sondern es wird compiliert, d.h. das 
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Quellprogramm in der Hochsprache wird vor der ersten Benut¬ 
zung einmal in ein Maschinenprogramm übersetzt. Damit wird 
natürlich eine Geschwindigkeitssteigerung erreicht, aber ein 
Compiler muß ziemlich allgemein gehaltene Übersetzungs- 
Verfahren verwenden, wo hingegen ein Assemblerprogrammierer 
seine Programme den jeweiligen Aufgaben genau anpassen kann. 

Darüber hinaus bietet Assembler noch einen weiteren Vorteil: 
Hochsprachen können, da sie im Prinzip nicht an einen be¬ 
stimmten Computer gebunden sind, nicht vollkommen auf die 
Möglichkeiten des jeweiligen Systems eingehen. Assembler 
hingegen, befindet sich sozusagen "direkt an der Quelle". In 
Assembler stehen Ihnen alle Möglichkeiten des Computers 
offen - Sie müssen sie nur zu nutzen wissen (und dafür ist 
ja dieses Buch da). 

Man kann also sagen, daß Assembler immer dann eingesetzt 
werden sollte, wenn es um zeitkritische Probleme oder um 
volle Ausnutzung der Möglichkeiten geht. Selten werden kom¬ 
plette Programme wie Textverarbeitungen o.Ä. in Assembler 
geschrieben. Meist greift man auf die Möglichkeit zurück, 
Assembler und Hochsprache zu mischen, wodurch die Vorteile 
beider Sprachen verbunden werden können. 


1.3 Was wird zur Assemblerprogrammierung benötigt? 

Die bekanntesten Assembler-Pakete für den Amiga sind der 
Devpac und der Seka. Dieser Kurs ist auf den Devpac ausge¬ 
richtet, die Programme können jedoch auch problemlos auf den 
Seka oder andere Assembler umgeschrieben werden, da sie sich 
nur bei einigen wenigen Spezial-Befehlen unterscheiden. 
Sollten bei bestimmten Befehlen Probleme auftauchen, wird 
Ihnen ein Blick ins Handbuch des Assemblers bestimmt 
weiterhelfen. Im folgenden wollen wir die Funktion der 
einzelnen Teile, die zu einem Assembler gehören, kurz 
beschreiben. Wir werden hier allerdings auf eine genaue 
Anleitung, wie ein Assemblerprogramm einzugeben und zu 
übersetzen ist, verzichten. Dieser Ablauf ist nämlich bei 
jedem Assembler anders, und wird ausführlich im zugehörigen 
Handbuch beschrieben. 


1.3.1 Der Editor 

Der Editor dient zur Eingabe und Überarbeitung Ihres Pro¬ 
grammes. Viele Assemblerpakete (wie z.B. der Devpac und der 
Seka) besitzen einen integrierten Editor. Falls Ihr As¬ 
sembler keinen besitzt oder er Ihnen zu schlecht erscheint, 
können Sie auch jeden anderen Editor, der Texte im ASCII- 
Format (d.h. reinen Text, ohne Kommandos wie Fett, Kursiv 
usw.) abspeichern kann, verwenden. 
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Der Editor sollte über Funktionen zum Bewegen und Kopieren 
von Blöcken verfügen, da Sie Ihre Programme möglicherweise 
des öfteren umgestalten oder umordnen müssen. Auch wäre eine 
Goto-Zeile-Funktion von Nutzen, da der Assembler Fehlermel¬ 
dungen in der Regel mit Zeilennummer ausgibt, ein Assembler¬ 
programm aber ohne Zeilennummern eingegeben wird. 

Wenn Sie einen nicht-Assembler-integrierten Editor benutzen, 
müssen Sie das Programm abspeichern und dem Assembler (siehe 
nächster Abschnitt) den Dateinamen mitteilen. 


1.3.2 Der Assembler 

Dieses Programm, das sinnigerweise genauso heißt wie die 
Programmiersprache, ist für die Übersetzung Ihres Programms, 
des Quelltextes (auch Sourcecode genannt), zuständig. Der 
Assembler erzeugt entweder die lauffähige Version Ihres Pro¬ 
gramms auf Diskette oder er ist (wie der Devpac und Seka) in 
der Lage, direkt in den Speicher zu asserablieren. Letzteres 
hat den Vorteil, daß das Programm schnell zum Austesten 
bereit ist und erst abgespeichert werden muß, wenn alles 
funktioniert. 

Die meisten Assembler bieten eine Funktion, die sich 
"Include" nennt. Das bedeutet, es können andere, auf Dis¬ 
kette befindliche, Quelltext-Teile während der Assemblierung 
per Befehl in einen Programmtext eingebunden werden. Der 
Seka kennt diesen Befehl nicht, aber er kann über das R-Kom- 
mando Textteile (vor der Assemblierung) dazuladen. Zu diesem 
und anderen Features werden wir in späteren Kapiteln noch 
kommen. 


1.3.3 Der Debugger 

Vielleicht gehören Sie zu den Glücklichen, deren Programme 
immer auf Anhieb funktionieren, dann werden Sie einen Debug¬ 
ger kaum brauchen. Falls nicht, kann er Ihnen bei der 
Fehlersuche recht hilfreich sein. Der Ausdruck "Bug" steht 
im Programmiererslang für einen Programmfehler. "Debugging" 
bedeutet demnach die Entfernung von Fehlern. 

Dabei wäre es manchmal günstig zu wissen, was ein Programm 
an bestimmten Stellen denn genau macht. Sprich, man müßte 
sich während des Programmlaufs Variablen ansehen können u.ä. 
Genau dafür ist ein Debugger da. Er arbeitet das Programm im 
"Einzelschrittverfähren" (Trace-Modus) ab, so daß Sie nach 
jedem Befehl die Möglichkeit haben, Speicherstellen zu über¬ 
prüfen oder das Programm (geringfügig) zu ändern. 
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1.4 Der Aufbau eines Computers 

Zunächst müssen wir etwas über den Aufbau des Amiga 
erfahren. Speziell die Assemblersprache erfordert recht gute 
Kenntnisse des Systems, die man sich aber zum großen Teil 
auch während der Laufbahn als Programmierer aneignen wird 
(Übung macht ja bekanntlich den Meister). 


1.4.1 Der Speicher - Platz für Programme 

Der Speicher läßt sich als lange Reihe von Zellen ansehen 
(beim Amiga bis zu 10 Millionen). Er ist in zwei große Be¬ 
reiche aufgeteilt: Das RAM (Random Access Memory), den Spei¬ 
cher mit wahlfreiem Zugriff, den man also lesen und be¬ 
schreiben kann, und das ROM (Read Only Memory), das nur ge¬ 
lesen werden kann. Außerdem geht der Inhalt des RAM verlo¬ 
ren, wenn Sie den Computer ausschalten, der des ROM aber 
bleibt permanent gespeichert. In letzterem liegen daher die 
Programmteile, die dafür sorgen, daß der Amiga beim Ein¬ 
schalten überhaupt etwas tun kann (das sog. Betriebssystem). 

In jede dieser Zellen kann man eine Zahl zwischen 0 und 255 
abspeichern. Wie wir gesehen haben, stellt ein Maschinenpro¬ 
gramm auch nur eine Folge von Zahlen dar, weshalb es sich 
problemlos im Speicher ablegen läßt. Jede Zelle erhält wei¬ 
terhin eine Nummer, eine Adresse, die zum Zugriff auf sie 
benutzt wird. 


1.4.2 Die CPU, das Herz des Computers 

Die CPU (Central Processing Unit - Zentrale Steuereinheit), 
beim Amiga ein MC68000-Chip, ist gleichsam das Herz eines 
Computers. Sie ist es letztendlich, die unsere Programme 
ausführt. Sie kann rechnen, vergleichen, anhand der Verglei¬ 
che Entscheidungen fällen usw. Dabei bedient sie sich eines 
Verfahrens, das "Fetch and Execute" (Holen und Ausführen) 
genannt wird. Das bedeutet, die CPU holt sich einen Befehl 
aus dem Speicher, führt ihn aus, geht dann zum nächsten, 
holt ihn usw. Ein spezielles Register in der CPU, genannt PC 
(Program Counter - Programmzähler), enthält immer die 
Adresse, auf welche die CPU gerade zugreift. Nach jedem 
Befehl wird der PC erhöht. Damit ist auch klar, wie GOTO in 
Assembler realisiert wird: der PC wird mit der 
anzuspringenden Adresse geladen, und schon läuft das 
Programm dort weiter. 

Die MC68000-CPU kennt zwei Betriebsarten: Den User- und den 
Supervisor-Modus. Im Supervisor-Modus (das bedeutet Überwa- 
cher-Modus) ist die Benutzung sämtlicher Befehle erlaubt, 
während im User-Modus einige Befehle, die bei unbedachter 
Anwendung schnell zum Systemabsturz führen können, verboten 
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sind. Außerdem benutzt die CPU getrennte Stackpointer (kommt 
später noch) für User- und Supervisor-Modus. 


1.4.3 Der Bus - Verbindung zwischen CPU und Speicher 

Nun kommt ein weiterer Bestandteil des Computersystems ins 
Spiel: der Bus. Es gibt einen Daten- und einen Adreßbus. 
Wenn die CPU ein Programm ausführen soll, muß sie Daten aus 
dem Speicher auslesen. Das tut sie, indem Sie die Adresse 
der gewünschten Speicherstelle auf den Adreßbus legt. Ein 
weiterer Baustein, die MMU (Memory Management Unit - Spei- 
cherverwaltungs-Einheit), sorgt aufgrund dieser Adresse da¬ 
für, daß der richtige RAM-Chip angesprochen wird. Der Inhalt 
der adressierten Speicherstelle gelangt dann über den Daten¬ 
bus zurück zur CPU. 

Analog verhält es sich, wenn die CPU in den Speicher 
schreibt. Sie legt die zu schreibende Zahl auf den Datenbus 
und die Adresse der Speicherstelle auf den Adreßbus, sagt 
der MMU, daß geschrieben werden soll, und schon läuft die 
Sache (meistens). 

Es gibt dabei natürlich ein paar Einschränkungen. Greift 
z.B. die CPU auf eine Adresse zu, der gar keine Speicher¬ 
stelle entspricht, oder will sie einen Befehl an einer unge¬ 
raden Adresse ausführen, wird bestimmt der Guru wieder mal 
zuschlagen. 


1.5 Die verschiedenen Zahlensysteme 

Das Zahlensystem, das wir für gewöhnlich benutzen 
(Zehnersystem), ist für den Gebrauch in einem Computer recht 
unpraktisch. Warum das so ist und welche Zahlensysteme 
stattdessen verwendet werden, erfahren Sie in diesem Ab¬ 
schnitt . 


1.5.1 Bits und Bytes 

Keine Sorge, dies ist keine Bier-Schleichwerbung. Als Bit 
bezeichnet man die kleinste von einem Computer darstellbare 
Informationseinheit. Ein Bit kann nur zwei Werte annehmen: 0 
oder 1. Es stellt also quasi den Zustand eines Computer- 
Schaltkreiselements (Strom fließt oder Strom fließt nicht) 
dar. Acht solcher Bits werden zu einem Byte zusammengefaßt. 
Das Byte bildet dann die Grundlage des Speichersystems: Jede 
Speicherzelle ist genau ein Byte (oder acht Bit) groß. In 
einem Byte lassen sich also Werte zwischen 00000000 und 
11111111 darstellen. Diesen Zahlen entsprechen die Zahlen 0 
und 255 im Dezimalsystem. 
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1.5.2 Das Dualsystem 

Die Bezeichnung "Zehnersystem" rührt von der Basis dieses 
Zahlensystems her: Jede Stelle einer Dezimalzahl hat eine um 
das zehnfache höhere Wertigkeit als die Stelle rechts dane¬ 
ben. Nun kann man im Prinzip jede beliebige Zahl als Basis 
für ein Zahlensystem annehmen. Im Dualsystem (oder auch 
"Binärsystem") ist dies die Zahl 2, d.h. jede Stelle hat 
gegenüber der Stelle rechts daneben die doppelte Wertigkeit. 
Vorkommen können in einer Dualzahl nur die Ziffern 0 und 1, 
genauso wie im Zehnersystem die Ziffern 0 bis 9 Vorkommen. 

Für eine Umrechnung von dual in dezimal betrachtet man am 
besten die Wertigkeiten der einzelen Dualstellen. Sie betra¬ 
gen nämlich 2 Binarstelle , wobei die Stelle von 0 ab gezählt 
wird. Ein Beispiel: 



Die Wertigkeiten der Stellen mit Dual-1 zählt man zusammen: 
128+32+16+2+1 = 179. Der Dualzahl 10110011 entspricht also 
dezimal 179. 

Nun ist auch klar, warum ein Byte (8 Bit) Werte zwischen 0 
und 255 annehmen kann: ein Byte kann höchstens die Dualzahl 
11111111 enthalten (alle 8 Bits auf 1), was dezimal 
128+64+32+16+8+4+2+1 = 255 ist. 

Nun wäre es aber ziemlich unpraktisch, alle Zahlen, die man 
im beim Programmieren braucht, in dualer Schreibweise an¬ 
zugeben, z.B. wäre die Zahl 3500 in dual 110110101100. Daher 
benutzt man im allgemeinen ein anderes Zahlensystem, das in 
recht engem Zusammenhang zu dem dualen steht: 


1.5.3 Das Hexadezimalsystem 

"Hexadezimal" steht für die Zahl 16, also ist die Basis die¬ 
ses Systems die 16. Das bedeutet, jede Ziffer hat eine um 
das 16-fache höhere Wertigkeit als die Ziffer rechts von 
ihr, und es kommen Ziffern von 0 bis 15 vor. Da es aber nur 
die Zahlzeichen 0 bis 9 gibt, benutzt man im Hexadezimalsy¬ 
stem die Buchstaben A bis F als Ersatz für 10 bis 15. Die 
Umrechnung erfolgt analog zum Dualsystem (die Stellenwertig¬ 
keit beträgt hier i6 Bexstelle ): 
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Wertigkeiten: 

1 (160) 
16 (16*1) 

- 256 (16*2) 

- 4096 (16*3) 


Man rechnet: 0*4096+13*256+10*16+12 = 3500 (D steht für 13, 
A für 10 usw.). Die Zahl 3500 läßt sich in hexadezimal also 
als ODAC (oder einfach DAC) schreiben, während wir in dual 
110110101100 schreiben mußten. 


Der Zusammenhang zwischen hex und dual ist folgender: Je¬ 
weils vier Dualstellen stehen für eine Hex-Stelle. Beispiel: 
Die Dualzahl 11000101, also dezimal 197, teilt man in zwei 
Vierergruppen auf. Mit Wertigkeitstabelle sieht das dann so 
aus: 


110 0 


8 (2*3) 
4 (2*2) 
2 ( 2 * 1 ) 
1 ( 2 * 0 ) 


0 10 1 


1 ( 2 * 0 ) 
2 ( 2 * 1 ) 
4 (2*2) 
8 (2*3) 


Getrennt ergeben die beiden Vierergruppen die Dezimalwerte 
12 und 5. Für 12 schreibt man in hex C, somit heißt die Hex- 
Zahl C5. Fix umgerechnet ergibt das 12*16+5 = 197, das 
entspricht dem selben Wert wie die Dualzahl. Eine Zahl aus 
vier Dualstellen, also ein halbes Byte, nennt man übrigens 
"Nibble". 


1.5.4 Das Oktalsystem 

Ein weiteres Zahlensystem, das erwähnt werden soll, obwohl 
es fast nie zum Einsatz kommt, ist das Oktalsystem. Die Ba¬ 
sis dieses Systems ist die 8, Aufbau und Umrechnung von 
Oktalzahlen sind analog zu den sonstigen Systemen. 


1.5.5 Kennzeichnung der Zahlensysteme 

In Assembler (und auch in vielen anderen Sprachen) hat es 
sich bei Benutzung von Zahlen eingebürgert, als Kennzeich¬ 
nung des für die Zahl verwendeten Systems bestimmte Zeichen 
vor die Zahl zu setzen, und zwar: 
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Zahlensystem Zeichen Beispiel 


Hexadezimal 
Dual (Binär) 
Dezimal 
Oktal 


$ $0DAC 

% %10110011 

179 

& &263 


Bild 1.1: Die Kennzeichen der Zahlensysteme 


1.5.6 Datentypen: Bytes, Worte und Langworte 

Wie schon gesagt, ist jede Speicherstelle ein Byte groß, 
kann also Zahlen von o bis 255 enthalten. Für die meisten 
Zwecke dürfte dieser Zahlenbereich wohl nicht ausreichen, 
daher gibt es noch zwei weitere "Größenordnungen": Zum einen 
das "Wort" (Word), das aus zwei Bytes besteht. Darin lassen 
sich dann schon Zahlen von 0 bis 65535 speichern. Die dritte 
Stufe ist das "Langwort" (Longword), dieses ist vier Bytes 
groß und kann Zahlen von 0 bis 4294967295 speichern (was 
wohl für so ziemlich alle Zwecke ausreichen dürfte). Diese 
drei Stufen werden "Datentypen" genannt. 

Vielleicht kennen Sie den Begriff des Datentyps schon von 
der Programmiersprache C her. Wenn Sie jetzt geschockt sind, 
weil Sie glauben, daß Sie (wie in C) mit einer Riesenmenge 
an Datentypen konfrontiert werden, können Sie beruhigt sein: 
In Assembler gibt es nur die drei Typen Byte, Wort und Lang¬ 
wort . 

Wenn ein Wort oder Langwort im Speicher abgelegt werden 
soll, werden dafür einfach 2 bzw. 4 Bytes benutzt. Das hat 
zur Folge, daß Worte und Langworte, genau wie Assemblerbe¬ 
fehle, nur an geraden Adressen beginnen dürfen, ansonsten 
reist der Amiga wieder mal nach Indien (Guru). 

Die Unterscheidung dieser drei Datengrößen ist in Assembler 
sehr wichtig. Bei fast allen Befehlen, die mit Daten umge¬ 
hen, muß angegeben werden, auf welche Größe sie sich bezie¬ 
hen. Für Adressen müssen beim Amiga (fast) immer Langworte 
verwendet werden. 


1.5.7 Der ASCII-Code - jedem Zeichen eine Zahl 

Das Thema ASCII-Code paßt eigentlich nicht so ganz in das 
Kapitel "Zahlensysteme", denn es handelt sich dabei um kein 
solches. Aber der ASCII-Code ist eine grundlegende Sache und 
einem Zahlensystem recht ähnlich, weshalb wir ihn hier be¬ 
sprechen wollen. 

Die Abkürzung ASCII steht für "American Standard Code for 
Information Interchange", also "Amerikanischer Standard-Code 
für Informationsaustausch". Es handelt sich dabei um eine 
einheitliche Darstellungsmethode von Zeichen und Steuerco- 


26 



Einleitung 


des, die auf jedem Computersystem gleich ist (bzw. sein 
sollte). Die ASCII-Codierung hat nichts mit Chiffrierung von 
Texten zu tun. Vielmehr wird jedem auf dem Bildschirm dar¬ 
stellbaren oder ausführbaren Zeichen eine Zahl zugeordnet. 
Diese Zahl liegt zwischen 0 und 255, womit 256 verschiedene 
Codes möglich sind. 

Die ersten 32 Codes (also 0 bis 31) sind sog. "Steuercodes", 
d.h. sie stellen kein druckbares Zeichen wie einen Buchsta¬ 
ben oder eine Zahl dar, sondern sie lösen, wenn sie ausgege¬ 
ben werden, bestimmte Sonderfunktionen aus. Der Code 10 z.B. 
läßt den Cursor in die nächste Zeile springen (wie ein Druck 
auf die Return-Taste), 12 löscht den Bildschirm, 8 führt 
einen Rückschritt aus (wie die Backspace-Taste) und 9 steht 
für die Tabulator-Taste. 

Ab Code Nr. 32 beginnen die druckbaren Zeichen. 32 ist die 
Leertaste, 33 das '!'-Zeichen, 34 das Anführungszeichen, 35 
das Doppelkreuz ('#') usw. Von 48 bis 58 liegen die Zahlen 0 
bis 9. Von 65 bis 90 die Großbuchstaben und von 97 bis 122 
die Kleinbuchstaben. Ab 127 beginnen die Sonderzeichen, die 
allerdings von System zu System verschieden sein können (mit 
dem "Standard-Code" war's wohl doch nicht so ganz). 

Diese Beispiele sollen Ihnen nur klarmachen, wie die ASCII- 
Codierung funktioniert. Im Anhang finden Sie eine komplette 
Tabelle aller ASCII-Zeichen. Wenn Sie von nun an den Begriff 
"ASCII" lesen, wissen Sie, was gemeint ist. 
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2.1 Der Registersatz des MC68000 

Bis jetzt haben wir nur davon gesprochen, daß es einen Spei¬ 
cher gibt, in dem Daten abgelegt werden können. Die Amiga- 
CPU stellt uns aber neben dem großen Hauptspeicher noch 
einen kleineren, speziellen "Arbeitsspeicher" zur Verfügung. 
Dieser Speicher liegt direkt auf dem CPU-Chip, weshalb es 
keine Zeitverzögerung durch Benutzung des Bus-Systems gibt. 
Er ist, im Gegensatz zum Hauptspeicher, in Langworte (4 By¬ 
tes) aufgeteilt. Jedes dieser Langworte nennt man ein 
"Register". 



Bild 2.1: Der Registersatz des MC68000 


Die Zahlen 0-31 über den Kästen stellen die Bitnummern dar. 
Die senkrechten Unterteilungen sollen verdeutlichen, daß man 
diese Register als Byte, Wort oder Langwort ansprechen kann. 

Speicherstellen werden, wie wir wissen, über ihre Adressen 
angesprochen. Bei den Registern verwendet man zur "Anrede" 
stattdessen ihre Namen (dO, dl, usw.). 
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Die CPU verfügt, wie Sie aus dem Bild 2.1 ersehen können, 
über 8 Datenregister (die als Byte, Wort oder Langwort ange¬ 
sprochen werden können), 8 Adreßregister (nur Wort oder 
Langwort), den PC (immer Langwort) und das Statusregister. 

Das Adreßregister A7, der Stackpointer (siehe nächster Ab¬ 
schnitt), ist guasi "zweigeteilt". A7 ist der Stackpointer 
für den User-Modus und A7 1 der für den Supervisor-Modus. Das 
heißt aber nicht, daß Sie nach Belieben A7 und A7 1 in Ihren 
Programmen benutzen können. Die Aufteilung soll nur verdeut¬ 
lichen, daß im User- und Supervisor-Modus getrennte Stack¬ 
pointer benutzt werden. 


2.1.1 Das Statusregister 

Dieses ein Wort breite Register ist aufgeteilt in das User- 
Byte und das System-Byte. Die Bits dieses Registers werden 
auch "Flags" genannt. Ein Flag ist eine Art Schalter, der 
nur zwei Zustände annehmen kann (also wie ein Bit). Man sagt 
auch, ein Flag ist gesetzt (steht auf 1) oder gelöscht 
(nicht gesetzt, steht auf 0). Die Bedeutung der Flags ist 
folgende: 


c 


Trace 
Supervisor 
Interrupt 
/ Unbenutzt 


< System-Byte > 
1 

5_4_3_2_1_0_9_8. 
T / S / / I I I 

7 




< User-Byte > 

7_6_5_4_3_2_1_0_ 

///XNZVC 


u 


Carry 

Overflow 

Zero 

Negative 

Extended 


Bild 2.2: Das Statusregister und die Flags 


Das System-Byte enthält die drei System-Flags T, S und I. 
Diese können wir nicht so ohne weiteres ändern (das geht nur 
im Supervisor-Modus). Interessanter ist für uns das User- 
Byte, genannt "Condition Code Register" (CCR, bedeutet 
"Bedingungscode-Register"). Fast alle Assembler-Befehle be¬ 
einflussen nämlich die Flags des CCR, oder besser, die Flags 
werden gemäß dem Ergebnis des Befehls gesetzt (oder ge¬ 
löscht). Beispiel: Wenn eine Operation den Wert 0 liefert 
(z.B. eine Subtraktion, oder auch ein MOVE-Befehl, der den 
Wert 0 bewegt), wird das Z-Flag (Z steht für Zero, also 
Null) gesetzt. Lieferte sie einen Wert ungleich 0, wird das 
Z-Flag gelöscht. 

Analog arbeiten auch die übrigen Flags. Das C-Flag (C für 
Carry, das bedeutet Übertrag) wird gesetzt, wenn eine 
Rechen-Operation einen Bereichsüber- oder -unterlauf 
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verursachte, und gelöscht, falls dies nicht passierte. Das 
N-Flag (Negative) arbeitet im Zusammenhang mit positiven und 
negativen Rechenergebnissen, das V-Flag (Overflow) wird bei 
Überschreitung des Wertebereichs gesetzt, und das X-Flag 
(Extended, Erweiterung) wird von bestimmten Befehlen als 
"Bit-Zwischenspeicher" benutzt. 

Die Flags spielen eine große Rolle bei Vergleichen und be¬ 
dingten Sprüngen, daher werden sie im Abschnitt über die 
Programmsteuer-Befehle (2.5.4) näher behandelt. 


2.1.2 Typenangabe bei Assembler-Befehlen 

Da der Amiga wissen muß, auf welchen Datentyp sich Ihre Be¬ 
fehle beziehen, ist es wichtig, an den Befehl die Typenan¬ 
gabe anzuhängen. Will man z.B. den Inhalt des Datenregisters 
DO an die Speicherstelle 1000 kopieren, schreibt man: 

move.b d0,1000 oder 
move.w do,1000 oder 
move.l d0,1000 

Der MOVE-Befehl mit .b (Byte) kopiert nur die Bits 0-7, also 
das unterste Byte des Registers, .w (Wort) kopiert die Bits 
0-15, .1 (Langwort) das ganze Register. Wie schon erwähnt, 
belegt ein Wort 2 Bytes im Speicher und ein Langwort 4. Wenn 
in d3 also das hex-Langwort $12345678 stünde, würde im Falle 
.b der Wert $78 in die Speicherstelle 1000 geschrieben, bei 
.w $56 in 1000 und $78 in 1001, bei .1 $12 in 1000, $34 in 
1001, $56 in 1002 und $78 in 1003. Es ist wichtig, daß Sie 
beim Moven (und bei ähnlichen Operationen) immer den 
richtigen Datentyp angeben, sonst könnten Sie schnell 
wichtige Daten im Speicher überschreiben. 

Die Unterteilung in Daten- und Adreßregister dürfen Sie 
nicht allzu eng sehen. Sie können durchaus auch Daten in 
Adreßregistern speichern und umgekehrt. Es gibt aber be¬ 
stimmte Befehle (z.B. Multiplikation), die nur auf Datenre¬ 
gister angewendet werden dürfen, und bestimmte andere Be¬ 
fehle (oder Befehlsschreibweisen), die nur mit Adreßregi¬ 
stern zulässig sind. Außerdem sollten Sie beachten, daß der 
Datentyp Byte in Adreßregistern nicht möglich ist. Die Ein¬ 
haltung dieser Regeln überwacht aber normalerweise sowieso 
der Assembler (das Übersetzungsprogramm). 


2.2 Sinn und Zweck des Stacks 

Es kommt sehr häufig vor, daß der Programmfluß eines 
Assemblerprogramms unterbrochen, ein anderer Programmteil 
ausgeführt und anschließend wieder zur Unterbrechungsstelle 
zurückgekehrt wird. Dies bezeichnetm man als "Ausführung von 
Unterprogrammen" oder "Sub-Routinen". Ein Anwendungsbeispiel 
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wäre eine Routine, die einen Text zentriert auf dem Bild¬ 
schirm ausgibt. Zu diesem Zweck muß man aus der Länge des 
Textes seihe Horizontal-Startposition in der Zeile ausrech¬ 
nen. Anstatt nun an jeder benötigten Stelle im Programm die 
komplette Berechnungsroutine einzusetzen, schreibt man diese 
nur einmal, eben als Unter-Programm, und läßt sie von den 
entsprechenden Stellen im Hauptprogramm aufrufen. Die Para¬ 
meter (Länge des Textes, Zeiger auf den Text selber) könnte 
man in Registern ablegen und sie vom Unterprogramm auswerten 
lassen. 

Damit der Computer aber vom Unterprogramm wieder ins Haupt¬ 
programm zurückfindet, muß er sich natürlich merken, an wel¬ 
cher Stelle es unterbrochen wurde. Zu diesem Zweck dient der 
Stack (zu Deutsch Stapel). Eigentlich ist der Stack nur ein 
ganz gewöhnliches Stück des Speichers, erst durch seine 
Benutzung als Stack wird er zu etwas Besonderem. 

Die Bezeichnung Stapel kommt dabei nicht von ungefähr: Man 
kann auf dem Stack, wie auf einem PapierStapel, Daten (oder 
auch Adressen) ablegen und sie später wieder herunternehmen. 
Das geht allerdings immer nur "von oben", man kann also nur 
das herunternehmen, was man als letztes draufgelegt hat. In 
der Fachsprache nennt sich das LIFO-Prinzip (LIFO = Last In 
- First Out). Wie wird nun der Stack beim Amiga realisiert? 

Das Adreßregister a7 spielt in diesem Zusammenhang eine 
wichtige Rolle: Es ist der "Stackpointer", also der Stapel¬ 
zeiger. Über ihn kann man den Platz des Stapels, der als 
nächstes belegt werden soll, in Erfahrung bringen, denn er 
zeigt immer auf den Platz, der als letztes belegt worden 
ist. Das klingt vielleicht ein bißchen kompliziert, leuchtet 
aber ein, wenn man weiß, was beim "Ablegen auf dem Stack" 
eigentlich passiert. Sagen wir zum Beispiel "Lege das Daten¬ 
register do auf den Stack", heißt das für den Computer: 

1. Erniedrige den Stackpointer 

2. Schreibe do auf die Adresse, auf die der Stackpointer 
jetzt zeigt. 

Wenn nun weitere Daten auf den Stack sollen, wird wieder der 
Stackpointer erniedrigt und anschließend werden die Daten 
geschrieben. Auf diese Weise kann man beliebig viele Daten 
auf den Stack schreiben (jedenfalls solange der 
Speicherplatz reicht) ohne vorhergehende Daten zu 
überschreiben. Wenn wir nun unsere Daten wieder vom Stack 
holen möchte (z.B. nach do), passiert folgendes: 

1. Schreibe den Inhalt der Speicherstelle, auf die der 
Stackpointer zeigt, nach do. 

2. Erhöhe den Stackpointer 
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Damit haben wir unsere Daten wieder, und der Platz, den sie 
vorher auf dem Stack einnahmen, ist wieder "frei" (durch die 
Erhöhung des Stackpointers). 

Da der Stackpointer vor dem Ablegen erniedrigt und nach dem 
Herunternehmen erhöht wird, zeigt er immer auf das, was als 
letztes auf den Stack gelegt wurde. Außerdem wächst er quasi 
"von oben nach unten", d.h. von den höheren zu den niedrige¬ 
ren Speicherstellen. Das ist wichtig zu wissen, wenn wir uns 
den Inhalt des Stacks anschauen wollen, ohne etwas herunter¬ 
zunehmen (wir also den Papierstapel in der Mitte durchwühlen 
wollen). Wir könnten z.B. sagen: Schreibe das, was an Stack- 
pointerposition+2 steht, nach dO. Damit haben wir uns den 
drittletzten Wert auf dem Stack geholt, ohne ihn vom Stack 
zu löschen. Holen UND Löschen ist nur von oben möglich. 

Unterprogrammaufrufe laufen ähnlich wie die Datenspeicherung 
ab. Der Befehl "Springe Unterprogramm an Adresse 1000 an" 
bewirkt folgendes: 

1. Erniedrige den Stackpointer 

2. Schreibe die Adresse des Befehls nach dem Sprungbefehl in 
den Speicher (dahin, wo der Stackpointer jetzt hinzeigt). 

3. Lade den PC mit der Adresse 1000 (das Programm läuft dann 
dort weiter). 

Beim Ende des Unterprogramms (Rücksprung) passiert das: 

1. Hole den Inhalt der Speicherstelle, auf die der Stack¬ 
pointer zeigt. 

2. Erhöhe den Stackpointer. 

3. Springe zu der geholten Adresse. 

Auf diese Weise lassen sich Unterprogrammaufrufe auch pro¬ 
blemlos schachteln, dann wird der Stack bei jedem Aufruf um 
eins größer und bei jedem Rücksprung wieder um eins kleiner. 

Außer zur Speicherung von Rücksprungadressen dient der Stack 
oft auch zur Parameterübergabe, insbesondere beim Einbau von 
Assemblerroutinen in Hochsprachen-Programme. Das könnte so 
aussehen: Das Hauptprogramm legt zuerst die Return-Adresse 
auf den Stack und anschließend die Parameter. Dann wird 
verzweigt. Das Unterprogramm holt sich die Parameter vom 
Stack, läßt die Return-Adresse aber drauf. Beim Rücksprung 
ist später nur noch die Return-Adresse auf dem Stack, die 
automatisch richtig genutzt wird. 

Wie gesagt ist beim Amiga das Adreßregister a7 der Stack¬ 
pointer. Daher wird es auch oft sp genannt. Sie dürfen es in 
Ihren Programmen keinesfalls einfach so verändern (zur Spei¬ 
cherung von Adressen o.Ä.). 
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2.3 Einführung in die Adressierungsarten 

Ein wichtiges Kriterium für die Leistungsfähigkeit einer CPU 
ist (neben dem Register- und Befehlssatz) die Anzahl ver¬ 
schiedener Adressierungsarten. In dieser Hinsicht gehört der 
MC68000 zu den besten CPUs, seine vielfältigen Möglichkeiten 
auf diesem Gebiet lassen kaum Wünsche offen. Aber zunächst 
wird Sie wohl interessieren, was Adressierungsarten über¬ 
haupt sind. 

Wenn wir ein Adreßregister ansprechen wollen, können wir 
schreiben: 

move.l aO,al 

Damit wird der Inhalt von aO direkt nach al kopiert. Das 
wäre schon die erste Adressierungsart: Register direkt. Das 
geht natürlich genausogut mit Datenregistern: 

move.l dO,dl 

Dieser Befehl kopiert do nach dl. Wenn wir jetzt aber 
schreiben 

move.l (aO),(al) 

sind nicht die Register direkt gemeint, sondern die Werte, 
die in den Registern stehen, werden als Adressen 
(Speicherstellen) angesehen. Auf die Inhalte dieser Spei¬ 
cherstellen bezieht sich dann der Befehl. Steht z.B. in aO 
eine 1000 und in al eine 2000, wird durch den MOVE-Befehl 
der Inhalt von Adresse 1000 in die Adresse 2000 kopiert. 
Diese Adressierungsart nennt sich "Adreßregister indirekt", 
abgekürzt ARI. Sie ist, wie der Name schon sagt, Adreßregi¬ 
stern Vorbehalten. 

Gehen wir noch einen Schritt weiter: Angenommen, wir haben 
in aO die Anfangsadresse einer Tabelle stehen, die wir im 
Speicher angelegt haben, und möchten nun Byte für Byte der 
Tabelle bearbeiten. Man könnte nun mittels 

move.b (a0),d0 

das erste Tabellen-Byte zur Bearbeitung nach do kopieren und 
dann aO mit einem weiteren Befehl um eins erhöhen. Schöner 
ist es aber, diese Erhöhung automatisch durchführen zu las¬ 
sen: 


move.b (a0)+,d0 

Damit wird die Speicherstelle, auf die aO zeigt, nach do ko¬ 
piert, und aO dann automatisch um 1 erhöht. Praktisch, 
nicht? Aber es kommt noch besser: Ein Wort belegt bekannt¬ 
lich 2 Byte, ein Langwort 4. Bei Abarbeitung einer Wort-Ta- 
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belle müßte der Zeiger also jedesmal um 2 erhöht werden. Und 
das wird er auch: 

move.w (aO)+,dO 

Dieser Befehl holt das Wort nach do und erhöht aO dann um 2. 
Ebenso würde ein move.l das Register um 4 erhöhen. Diese 
Adressierungsart nennt sich "ARI mit Postinkrement". 

Eine andere Variante des ARI ist "ARI mit Predekrement": 

move.b dO,-(aO) 

Hier wird aO also zuerst erniedrigt und dann do in die be¬ 
treffende Speicherstelle kopiert. Wenn Sie nun an den Ab¬ 
schnitt über den Stack denken, fällt vielleicht langsam der 
Groschen: Mit dieser Adressierungsart ist es kein Problem, 
Daten auf den Stack zu legen und wieder herunterzunehmen. 
Beim Ablegen sollte der Stackpointer erniedrigt werden und 
dann das Abzulegende dahin geschrieben werden, wohin der 
Stackpointer zeigt. Das tut genau diese Adressierungsart: 

move.l dO,-(sp) 

würde demnach dO auf den Stack bringen (wo es vier Bytes be¬ 
legt), und 

move.l (sp)+,dO 

würde es zurückholen (mit "Löschung" vom Stack). Anstatt sp 
hätten wir natürlich auch a7 schreiben können. 


2.4 Adressierungsarten komplett 

Als nächstes folgt eine Auflistung aller 12 Adressierungsar¬ 
ten des MC68000, natürlich mit Erklärung. 


Adressierungsart 


Abkürzung Beispiel 


Datenregister direkt 

Dn 

move. 1 

dO,dl 

Adreßregister direkt 

An 

move. 1 

aO,al 

Adreßregister indirekt (ARI) 

(An) 

move.1 

(aO),(al) 

ARI mit Postinkrement 

(An) + 

move.1 

(a7)+,d0 

ARI mit Predekrement 

-(An) 

move.1 

d0,-(a7) 

ARI mit Adreßdistanz 

dl6(An) 

move.1 

2(a7),d0 

wie vor plus Index 

d8(An,Rn) 

move.1 

0(a0,d0),dl 

Absolut kurz 

$xxxx 

move.1 

$1000,do 

Absolut lang 

Sxxxxxxxx 

move.1 

$fc0004,d0 

Konstante 

#X 

move.1 

#i,do 

PC-Relativ + Adreßdistanz 

dl6(PC) 

move.1 

20(pc),d0 

wie vor plus Index 

d8(PC,Rn) 

move.1 

0(pc,d0),dl 


Bild 2.3: Die Adressierungsarten des MC68000 
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2.4.1 Register direkt 

Ein Daten- oder Adreßregister wird direkt angesprochen. 

move.l dO,dl 
move.l aO,al 


2.4.2 Adreßregister indirekt (ARI) 

Der Inhalt eines Adreßregisters wird als Speicherstelle an¬ 
gesehen, auf die dann der Befehl ausgeführt wird. 

move.l dO,(aO) 

Der Inhalt von do wird an die Speicherstelle kopiert, die in 
aO steht. 


2.4.3 ARI mit Postinkrement 

Siehe ARI, nur wird hier das Adreßregister nach dem Zugriff 
erhöht, und zwar je nach Datentyp um 1, 2 oder 4. 

move.b dO,(aO)+ ; Erhöhung um 1 

move.w dO,(aO)+ ; Erhöhung um 2 

move.l dO,(aO)+ ; Erhöhung um 4 


2.4.4 ARI mit Predekrement 

Wie vorher, aber hier wird vor dem Zugriff erniedrigt. 

move.b dO,-(aO) ; Erniedrigung um 1 

move.w dO,-(aO) ; Erniedrigung um 2 

move.l dO,-(aO) ; Erniedrigung um 4 


2.4.5 ARI mit Adreßdistanz 

Hier wird zum Inhalt des Adreßregisters noch eine konstante 
Zahl, die Adreßdistanz (oft auch "Offset" genannt), hinzuad¬ 
diert (bzw. abgezogen). Diese Zahl darf zwischen +32767 und 
-32768 liegen. Die Summe aus Distanz und Registerinhalt ist 
die Adresse, auf die sich der Befehl bezieht. 

move.l d0,~20(a0) 

Steht in aO eine 100, wird do also nach 80 kopiert. Dies ist 
eine Adressierungsart, die beim Umgang mit dem Amiga-Be- 
triebssystem recht häufig benutzt wird. 
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2.4.6 ARI mit Adreßdistanz und Index 

Neben der Adreßdistanz (der konstanten Zahl) wird nun noch 
ein weiteres, frei wählbares Register zum Inhalt des Adreß¬ 
registers hinzuaddiert. Die Distanz darf jetzt nur noch im 
Bereich von +127 bis -128 liegen. Der Datentyp des zweiten 
Registers ist (unabhängig vom Typ des Adreßregisters) frei 
wählbar (bei einem zweiten Adreßregister aber natürlich nur 
Wort oder Langwort). 

move.l d0,10(a0,dl) 

Steht in aO eine 1000 und in dl eine 20, wird sich der Be¬ 
fehl auf die Adresse 1030 beziehen. Denkbar wäre auch: 

move.l do,10(a0,dl .w) 

Das kann man schreiben, wenn das Register dl nicht komplett 
(als Langwort), sondern nur als Wort in die Rechnung einge- 
hen soll (wenn es also nur Werte zwischen +32767 und -32768 
speichern soll). 

Diese Adressierungsart ist sehr nützlich beim Abarbeiten von 
Tabellen. Im Adreßregister steht dann die Anfangs-(Basis-) 
Adresse der Tabelle und im zweiten Register die Platznummer. 
Oft wird die Adreßdistanz dabei nicht gebraucht, weshalb man 
folgendes schreibt: 

move.l d 0 , 0 (a 0 ,dl.w) 

Die Adreßdistanz ist 0, also gehen nur Basisadresse und 
Platznummer (Index) in die Rechnung ein. 


2.4.7 Absolute Adressierung 

Zur Abwechslung eine einfache Adressierungsart: Hier wird 
eine Speicherstelle direkt angesprochen: 

move.l 1000,2000 

Der Inhalt von Adresse 1000 wird nach 2000 kopiert. Beachten 
Sie, daß sich Wort- und Langwort-Befehle nur auf gerade 
Adressen beziehen dürfen (Guru-Gefahr)! 

Bei der absoluten Adressierung wird zwischen einer Kurz- und 
einer Lang-Version unterschieden. Kurz bedeutet, daß die 
Adreßangabe nur ein Wort breit ist, d.h. die Adresse darf 
nur zwischen 0 und 65535 liegen. Bei Lang ist die Adresse 
ein Langwort, kann also im kompletten Adreßbereich liegen. 
Die Kurz-Version der absoluten Adressierung hat den Vorteil, 
daß zur Speicherung der Adresse nur zwei Bytes benötigt wer¬ 
den (im Gegensatz zu 4 Bytes bei Lang). 

Normalerweise wählt der Assembler automatisch die Kurz-Ver¬ 
sion, wenn dies möglich ist. Sie können darüber aber auch 
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selbst bestimmen, indem Sie .w oder .1 an die Adresse anhän- 
gen: 


move.l 2000.w,100000.1 

Die Adresse 2000 liegt im Wort-Bereich, daher kann sie als 
Wort-Adresse assembliert werden. Die 100000 liegt aber au¬ 
ßerhalb dieses Bereiches, muß also Lang sein. 


2.4.8 Konstanten-Adressierung 

Die wohl einfachste Adressierungsart. Um eine Zahl als Kon¬ 
stante anzusprechen, schreiben Sie einfach ein '#' vor die 
Zahl. 

move.l #l,d0 

Schreibt die Zahl 1 ins Datenregister dO. Achten Sie darauf, 
daß Sie nicht die Adressierungsarten "Absolute Adresse" und 
"Konstante" verwechseln! 


2.4.9 PC-relative Adressierung 

Um den Sinn dieser recht interessanten Adressierungsart zu 
verstehen, müssen Sie vorab etwas wissen: Ein Programm für 
den Amiga, der ja bekanntlich ein Multitasking-Computer ist, 
darf nicht an eine bestimmte Position im Speicher gebunden 
sein, denn dort könnte ja schon ein anderes Programm stehen. 
Das Programm muß "lageunabhängig" (Position independent) 
sein, darf also keine festen Adressen enthalten. Es gibt nun 
mehrere Möglichkeiten, das zu erreichen. 

Die erste Möglichkeit wird (fast) immer, für Sie unsichtbar, 
vom Assembler benutzt: An das fertige Programm wird eine Ta¬ 
belle mit allen verwendeten absoluten Adressen angefügt. Das 
Betriebssystem sorgt nun dafür, daß beim Laden des Programms 
an eine bestimmte Speicherposition die absoluten Adressen im 
Programm anhand der Tabelle umgerechnet werden. 

Wenn Sie aber selbst für die Lageunabhängigkeit sorgen wol¬ 
len (oder manchmal müssen), können Sie die Adressierungsart 
PC-relativ verwenden. Dabei wird die Adresse aus dem aktuel¬ 
len PC-Stand plus (oder minus) einer Adreßdistanz berechnet. 
Dann ist es egal, an welcher Stelle das Programm im Speicher 
steht, da sich der Abstand adressierender Befehl - adres¬ 
sierte Speicherstelle ja nicht ändert. Das gilt natürlich 
nur für Adressen, die im Bereich des Programms liegen, wes¬ 
halb PC-relativ nur innerhalb des Programm-Adreßbereichs be¬ 
nutzt werden darf. Die Adreßdistanz kann, wie bei ARI ohne 
Index, zwischen +32767 und -32768 liegen. 

move.l 20(pc),d0 
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Dieser Befehl holt den Inhalt von pc+20 nach do. 


2.4.10 PC-relative Adressierung mit Index 

Die PC-relative Adressierungsart gibt's auch noch mit Index. 
Es gelten die selben Regeln wie für "ARI mit Adreßdistanz 
und Index", nur ist hier der aktuelle PC-Stand die Basi¬ 
sadresse. 

move.l 20 (pc,dl.w),d0 

Holt den Inhalt der Speicherstelle "PC-Stand plus 20 plus 
Inhalt von dl als Wort" nach do. 


2.5 Die Assembler-Befehle 

Der einzige Assembler-Befehl, den wir bisher benutzt haben, 
ist der MOVE-Befehl. Sicher brennen Sie schon darauf, zu er¬ 
fahren, was der MC68000 noch so alles zu bieten hat (und das 
ist wirklich eine ganze Menge). In diesem Abschnitt werden 
daher die wichtigsten Befehle vorgestellt. Manche Befehle 
erfordern allerdings recht umfangreiche Erklärungen, daher 
werden diese erst in späteren Kapiteln ausführlich beschrie¬ 
ben . 

Man könnte zwar auch so Vorgehen, neue Kommandos erst dann 
zu erklären, wenn sie zum ersten mal verwendet werden. Wir 
halten es aber für sinnvoller, Ihnen zuerst einen Überblick 
zu geben, damit sie nicht wie der Ochs vorm Berg stehen, 
wenn ein neuer Befehl in einem Listing auftritt. 


2.5.1 Typen von Assembler-Befehlen 

Grob gesehen gibt es drei Typen von Assembler-Befehlen: Be¬ 
fehle ohne Operanden, mit einem oder mit zwei Operanden. Ein 
Beispiel für einen Befehl ohne Operanden ist: 

rts ; Return from Subroutine 

Dieser Befehl verläßt ein Unterprogramm. Um ihn ausführen zu 
können, braucht die CPU nichts weiter zu wissen (die Rück¬ 
sprungadresse liegt ja auf dem Stack). Bei dem Befehl 

clr.l do ; Clear = Lösche 

dagegen muß der Prozessor wissen, was er denn löschen soll, 
mit anderen Worten, er braucht einen Operanden (ein Objekt, 
auf das sich der Befehl bezieht). In diesem Fall ist do der 
Operand. Bei einem Befehl wie 
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move.l dO,dl ; Quelle und Ziel benötigt 

werden sogar zwei Operanden gebraucht - die CPU muß ja wis¬ 
sen, von wo nach wo bewegt werden soll. 

Im Zusammenhang mit den Adressierungsarten, die wir vorhin 
kennengelernt haben, ist es wichtig zu wissen, daß es für 
jeden Befehl bestimmte Vorschriften gibt, welche Adressie¬ 
rungsarten jeweils für Quell- und (ggf.) Zieloperand zuläs¬ 
sig sind. Zu diesem Thema gibt es eine Tabelle im Anhang, 
aber auch der Assembler wacht in der Regel über die Einhal¬ 
tung der Adressierungsregeln. 

In den nun folgenden tabellarischen Auflistungen der Befehle 
werden folgende Abkürzungen benutzt: 

Dn - beliebiges Datenregister 
An - beliebiges Adreßregister 
Rn - beliebiges Daten- oder Adreßregister 
#k - Konstante 
d - Adreßdistanz 

ea - Daten-, Adreßregister oder Speicherstelle 

"Ea" kann für ein Datenregister, ein Adreßregister oder eine 
"Effektive Adresse" stehen. Letzteres bedeutet einfach eine 
Adresse im Speicher. Diese kann durch absolute Adressierung, 
ARI (Adresse steht in einem Adreßregister), ARI mit Prede- 
krement, ARI mit Offset (Adresse berechnet sich aus Registe¬ 
r-Inhalt plus Konstante) usw. entstanden sein. 

Es folgt jeweils zuerst eine kurze Einführung der generellen 
Bedeutung einer Befehlsgruppe, dann eine Tabelle mit den 
wichtigsten Befehlen einer Gruppe mit Kommentaren und, wenn 
nötig, noch einige Anmerkungen. 


2.5.2 Transfer-Befehle 

Sie dienen dazu, Daten "von irgendwo nach irgendwo anders" 
zu transportieren. Tatsächlich stehen bei den Transfer-Be¬ 
fehlen so ziemlich alle Möglichkeiten (Wahl der Adressie¬ 
rungsart, der Quelle und des Ziels) offen. Diese Befehlsart 
wird man wohl am häufigsten in einem Assembler-Listing fin¬ 
den . 

Wichtig zu wissen ist übrigens, daß die MOVE-Befehle eigent¬ 
lich COPY heißen müßten, da sie streng genommen Kopier-Be- 
fehle sind. Die Quelle wird lediglich ins Ziel kopiert, 
bleibt selbst aber unverändert. 
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Befehl 

Bedeutung 


Beispiele 


CLR ea 

Lösche 


clr dO 
clr 1000 
clr (aO) 


- Nicht für Adreßregister direkt 




EXG Rn,Rn 

Vertausche Register 


exg d0,dl 
exg d0,a0 
exg a0,al 


- Nur für Register erlaubt 




LEA ea,An 

Lade eff. Adresse in 

An 

lea I0(a0),al 
lea 20 (pc),al 


- Rechnet eff. 

Adresse aus und schreibt 

sie in An. 


MOVE ea,ea 

Kopiere Daten 


move d0,dl 
move (a0)+,1000 
move #5,-(al) 


- Als Ziel ist 

Adreßregister direkt 

nicht erlaubt 


MOVEA ea,An 

Kopiere Adresse 


movea 1000,aO 
movea #10,al 



movea 10(a0),al 

- Ziel darf hier nur Adreßregister direkt sein 


MOVEQ #k,Dn Lade Dn "quick" moveq |l,dO 

- k darf nur zwischen +127 und -128 liegen 

MOVEM RL,ea Kopiere Reg.liste movem dO/aO,-(sp) 

MOVEM ea,RL movem (sp) + ,dO/aO 

- Siehe Anmerkungen 

SWAP Dn Vertausche Worte von Dn swap dO 

- Vertauscht Bits 0-15 mit Bits 16-31 


Normalerweise brauchen Sie nicht zwischen MOVE und MOVEA zu 
unterscheiden. Der Assembler nimmt automatisch den richtigen 
Befehl, je nachdem, ob Sie als Ziel ein Adreßregister oder 
etwas anderes angeben. 

Der MOVEQ-Befehl läßt als Ziel nur Datenregister zu. Wenn 
Sie also ein solches mit einer Zahl zwischen +127 und -128 
belegen wollen, sollten Sie MOVEQ anstatt MOVE benutzen, da 
dieser schneller ausgeführt wird und weniger Speicher 
braucht. 

SWAP wirkt immer auf ein Datenregister als Langwort. Das 
obere und untere Wort des Registers werden vertauscht. 

Der MOVEM-Befehl eignet sich sehr gut zum Sichern von Regi¬ 
stern auf dem Stack. Man kann ihn sich als Zusammenfassung 
mehrerer MOVE-Befehle denken: Anstatt 
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move.l dO,-(sp) 
move.l dl,-(sp) 
move.l d2,-(sp) 
move.l d5,-(sp) 

können wir auch schreiben: 

movem.l d0-d2/d5,-(sp) 

Es sind beliebige Kombinationen aus Daten- und Adreßregi¬ 
stern erlaubt, und auch (Bereiche) und '/' (einzelne Re¬ 

gister) können beliebig kombiniert werden. Beispiele: 

movem.l dO-d7/aO-a6,-(sp) 

sichert aller Register auf dem Stack (außer a7, denn dieses 
ist ja der Stackpointer selber). Noch ein Beispiel: 

movem.l d0-d2/a0/a2/a4-a6,-(sp) 

Der LEA-Befehl bestimmt lediglich eine Adresse und schreibt 
sie in ein Adreßregister. Die Adresse kann sich je nach 
Adressierungsart aus absoluter Adresse, Adreßregisterinhalt, 
Adreßregisterinhalt plus Adreßdistanz usw. zusammensetzen. 


2.5.3 Rechen-Befehle 

Sie umfassen die vier Grundrechenarten und das Negieren 
(Vorzeichenwechsel). Als "Rechen-Richtung" gilt allgemein: 
Zieloperand verknüpft mit Quelloperand, Ergebnis in den 
Zieloperanden. Beispiel: 

sub.l dO,dl 

zieht do von dl ab (also dl minus do) und speichert das Er¬ 
gebnis in dl. 


Befehl Bedeutung Beispiele 


ADD ea,ea Addiere add fl,dO 

add d0,1000 

- Als Ziel ist Adreßregister nicht erlaubt 


ADDA ea,An Addiere Adresse adda #l,aO 

adda dO,aO 
adda 1000,aO 

- Ziel darf hier nur Adreßregister sein 


ADDQ #k,ea Addiere Konstante "guick" addg #i,d0 

addq #1,1000 

- k darf nur zwischen 0 und 8 liegen 
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SUB ea,ea Subtrahiere 

sub #l,d0 
sub d0,1000 

- Als Ziel ist Adreßregister nicht erlaubt 


SUBA ea,An Subtrahiere Adresse 

suba #l,aO 
suba d0,a0 
suba 1000,aO 

- Ziel darf hier nur Adreßregister sein 


SUBQ #k,ea Subtrahiere Konstante "quick" 

- k darf nur zwischen 0 und 8 liegen 

subq #l,d0 
subq fl,1000 

DIVS ea,Dn Dividiere Wort mit Vorzeichen 

divs #5,d0 
divs (a0),d0 

- Ergebnis kommt ins untere Wort von Dn, der 

Rest ins obere 

Divu ea,Dn Dividiere Wort ohne Vorzeichen 

divu #5,d0 
divu (a0),d0 

- Ergebnis kommt ins untere Wort von Dn, der 

Rest ins obere 

MULS ea,Dn Multipliziere mit Vorzeichen 

muls #5,d0 
muls (a0),d0 

MULU ea,Dn Multipliziere ohne Vorzeichen 

mulu #5,d0 
mulu (a0),d0 

NEG ea Negiere (ea=0-ea) 

neg dO 

neg (aO) 

- Nicht für Adreßregister 



ADDQ und SUBQ dürfen, im Gegensatz zu MOVEQ, auch auf Adreß¬ 
register oder Speicheradressen angewandt werden. Die Kon 
stante darf aber nur noch zwischen 0 und 8 liegen. 

Die Divisions-Befehle schreiben das Ergebnis in das untere 
Wort des Langwort-Datenregisters (Bits 0-15) und den Rest m 
das obere (Bits 16-31). Zum Transport des Rests ms untere 
Wort ist der SWAP-Befehl gut geeignet. 


Computer-interne Darstellung negativer Zahlen 

An dieser Stelle ein kleiner Einschub: Speziell im Zusammen¬ 
hang mit den Rechenbefehlen ist es interessant zu wissen, 
wie negative Zahlen computer-intern dargestellt werden. 

Der Computer verwendet kein gesondertes Zeichen zur Darstel¬ 
lung negativer Zahlen, wie wir das beim Rechnen für gewöhn¬ 
lich tun. Statt dessen erklärt er einfach das höchste Bit 
einer Zahl, die negative Werte annehmen können soll, zum 
"Vorzeichenbit". Wenn dieses Bit gesetzt ist, gilt die Zahl 
als negativ, ansonsten als positiv. Dabei ist natürlich der 
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Datentyp (Byte, Wort oder Langwort) der Zahl wichtig, da ja 
festgelegt werden muß, welches Bit nun das höchste ist. 

Man könnte nun annehmen, daß die (Byte-)Zahl -3 vom Computer 
binär als %10000011 dargestellt wird, also einfach als 
binäre 3 mit zusätzlich gesetztem höchstem Bit. Dem ist aber 
nicht so! Der Computer verwendet stattdessen ein Verfahren, 
daß sich "Zweier-Komplement-Darstellung 1 ' nennt. Hinter die¬ 
sem kompliziert klingenden Namen steckt folgendes System: 

Soll eine Zahl negativ sein, so nimmt der Computer zunächst 
einmal die positive Form dieser Zahl in der Binärdarstel¬ 
lung. Für unsere -3 wäre das also %00000011. Nun wird diese 
Zahl komplementiert, d.h. alle Bits werden in ihr Gegenteil 
verkehrt. Aus %00000011 wird demnach %11111100. Damit haben 
wir schon die Bedingung, daß das höchste Bit gesetzt sein 
muß, erfüllt. Nun wird zu der Zahl noch eine binär-1 hin¬ 
zuaddiert. Das bringt, wie wir gleich sehen werden, Vorteile 
beim internen Rechnen. Aus %11111100 wird dann also 
%11111101. Das ist die interne Darstellung der Zahl -3 (als 
Byte). 

Die Verwendung negativer Zahlen bringt eine Einschränkung im 
Zahlenbereich mit sich: Ein Byte kann normalerweise Werte 
von 0 bis 255 annehmen. Bei einem Byte, das auch negativ 
sein kann, geht das höchste Bit für die Zahl selbst verlo¬ 
ren, es sind also nur noch Werte von 0 bis 127 möglich. Bei 
den weiteren 128 Werten ist das höchste Bit gesetzt, sie re¬ 
präsentieren also die Zahlen -128 bis -1. Der Wertebereich 
des Datentyps wird bei Verwendung negativer Zahlen also in 
positive Zahlen (einschließlich 0) und negative Zahlen auf- 
geteilt. Ein Wort (gewöhnlich 0-65535) kann Werte von 0- 
32767 und -32768 bis -1 annehmen. 

Nun ein Rechenbeispiel in der computer-internen Darstellung. 
Die Subtraktion kann man als Addition mit umgekehrtem Vor¬ 
zeichen ansehen: 50 - 29 entspricht 50 + (-29). Die Darstel¬ 
lung im Zweierkomplement führt zu folgender Binär-Rechnung: 


Dez-Zahl 

Binär-Zahl 

Zweier-Komplement 

50 

00110010 

00110010 

- 29 

- 00011101 

+ 11100011 

21 

00010101 

100010101 

Übertrag wird nicht 

beachtet —' 


Der Übertrag im Zweierkomplement-Ergebnis wird nicht beach¬ 
tet. Die restliche Binärzahl ergibt in dezimal genau die 21. 
Das Rechnen mit negativen Zahlen wird auf diese Weise recht 
einfach. Nun noch ein Beispiel, bei dem das Ergebnis negativ 
ist: 


45 




Kapitel 2 


Dez-Zahl 

Binär-Zahl 

Zweier-Komplement 

23 

00010111 

00010111 

- 37 

- 00100101 

+ 11011011 

- 14 

11110010 

11110010 


Vorzeichen-Bit 

gesetzt —1 


Das Vorzeichen-Bit im Ergebnis ist gesetzt, es handelt sich 
hierbei also um eine negative Zahl im Zweier-Komplement. Zur 
Rückumwandlung zieht man zunächst eine 1 ab (aus %11110010 
wird %11110001) und komplementiert dann (aus %11110001 wird 
%00001110). Das Ergebnis ist die 14. 

Die Zweierkomplement-Darstellung vereinfacht also das Rech¬ 
nen mit Zahlen für den Computer stark. Er kann positive und 
negative Zahlen nach dem selben Verfahren addieren und sub¬ 
trahieren, wobei ein eventueller Übertrag, der den Wertebe¬ 
reich überschreitet, einfach ignoriert wird. 


2.5.4 Prograimnsteuer-Befehle 

Zu dieser Gruppe zählen alle Verzweige-Befehle sowie die 
Vergleichs-Befehle und einige "Sonderlinge", die sich sonst 


nirgendwo einordnen lassen. 


Befehl Bedeutung 

Beispiele 

BRA Label Verzweige zu Label 

- PC-relativer Sprung 

bra marke1 

BSR Label Verzweige zu Unterprg. 

- PC-relativer Sprung 

bsr uprgl 

Bcc Label Verzw., wenn cc erfüllt 

- Siehe Anmerkungen 

beq marke1 
bne marke2 

CMP ea,Dn Vergleiche mit Datenregister 

- Siehe Anmerkungen 

cmp #l,dO 
cmp (aO),dO 

CMPA ea,An Vergleiche mit Adreßregister 

cmp #l,aO 
cmp (aO),al 

CMPI #k,ea Vergleiche Konstante mit ea 

cmp #1,1000 
cmp #l,d0 
cmp #l,al 

TST ea Vergleiche mit 0 

- Entspricht CMP #0,ea 

tst dO 
tst (aO) 
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BTST Dn,ea Teste Bit Dn o. #k von ea 

BTST #k,ea 
- Siehe Anmerkungen 

btst d0,1000 
btst #1,1000 

DBcc Dn,Label Schleife mit Abbruchsbed. 

- Siehe Anmerkungen 

dbra dl,markel 
dbeg d2,marke2 

JMP ea 

Verzweige Absolut 

jmp $fc00d2 
jmp (aO) 

JSR ea 

Verzweige zu Unterprg. 

jsr -198(a6) 
jsr (aO) 

RTS 

Rücksprung aus Unterprg. 

rts 

NOP 

- Nützlich als 

No Operation - tue nichts 
Füllbefehl beim Debuggen 

nop 


Die Branch-Sprungbefehle (BRA, BSR, BCC usw.) sind PC-rela¬ 
tiv, d.h. sie springen nicht zu einer absoluten Adresse, 
sondern erhöhen oder erniedrigen den PC um den entsprechen¬ 
den Wert. Das hat zur Folge, daß die Sprungdistanz höchstens 
32767 Bytes vorwärts oder 32768 Bytes rückwärts betragen 
darf. Durch die (alleinige) Verwendung solcher Sprungbefehle 
bleibt Ihr Programm positionsunabhängig. Die Jump-Sprungbe¬ 
fehle (JMP, JSR) dagegen arbeiten mit absoluten Adressen. 

Nun kommen wir zur Realisierung von Abfragen und bedingten 
Sprüngen in Assembler. Dafür sind die CMP-, TST- und BTST- 
Befehle (Abfrage) und die Befehle BCC und DBCC zuständig. 


2.5.5 Vergleichs-Befehle 

Im Abschnitt über das Registermodell haben wir schon etwas 
über das Statusregister und die Flags erfahren. Dieses Wis¬ 
sen kommt nun zur Anwendung. 

Der Haupt-Vergleichsbefehl ist der CMP-Befehl. Dieser führt 
im Grunde eine normale Subtraktion durch, schreibt das Er¬ 
gebnis allerdings nirgendwo hin, sondern setzt nur die ent¬ 
sprechenden Flags. Die Abfrage "vergleiche do und dl" hieße 
dann also: 

cmp.l dO,dl 

Dabei wird dl minus dO gerechnet. Wenn dO gleich dl ist, 
kommt bei der Subtraktion 0 heraus, das Z-Flag wird also ge¬ 
setzt und kann im weiteren Verlauf ausgewertet werden. War 
dl kleiner als do, wird das Ergebnis negativ und das N-Flag 
gesetzt. 
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Genau wie bei den SUB-Befehlen wird hier der Quell-Operand 
vom Ziel-Operanden abgezogen. "Vergleiche do mit 5" müßte 
also heißen: 

cmp.l #5,d0 

Eine Kurzform des Befehls "Vergleiche mit 0" ist der TST-Be- 
fehl. Um zu testen, ob do auf 0 steht, ist also folgendes 
möglich: 

tst.l do 

Das entspricht 

cmp.l # 0 ,d 0 

Um ein einzelnes Bit zu testen, verwendet man den BTST-Be- 
fehl. Um zu prüfen, ob das 5. Bit von do auf 0 steht, 
schreibe ich: 

btst #5,d0 
Bedingte Sprünge 

Jetzt wissen wir, daß die Flags immer entsprechend dem Er¬ 
gebnis des letzten Vergleichs-Befehls gesetzt sind. Um nun 
in Abhängigkeit von den Flagzuständen zu verzweigen, benut¬ 
zen wir den BCC-Befehl. Das CC steht für "Condition Code", 
also Bedingungscode. 


Kürzel 

Bedeutung 

Flag-Abfrage 

CC 

Carry Clear (Kein Übertrag) 

c 

cs 

Carry Set (übertrag) 

c 

EQ 

Equal (Gleich) 

z 

GE 

Greater or Equal (>=) 

nv + NV 

GT 

Greater Than (>) 

nvz + NVz 

HI 

Higher (>) 

cz 

LE 

Less or Equal (<=) 

Z + Nv + nV 

LS 

Less or Same (<=) 

C + Z 

LT 

Less Than (<) 

Nv + nV 

MI 

Minus (Kleiner 0) 

N 

NE 

Not Equal (Ungleich) 

z 

PL 

Plus (Größer 0) 

n 

VC 

Overflow Clear (Kein Überlauf) 

V 

VS 

Overflow Set (Überlauf) 

V 


Bild 2.4: Die Condition Codes 


Für uns als angehende Programmierer sind eigentlich nur die 
Kürzel und ihre Bedeutungen wichtig. Die Flag-Abfragen, also 
die Angaben, welche Flags beim Test worauf geprüft werden, 
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sind nur der Vollständigkeit halber (und zum Nachschlagen 
für fortgeschrittenen Programmierer) aufgeführt. Ein großer 
Buchstabe bedeutet hier, daß das entsprechende Flag auf 
'gesetzt' getestet wird, bei einem kleinen wird auf 'nicht 
gesetzt' geprüft. Stehen mehrere Buchstaben direkt hinter¬ 
einander, werden alle diese Flags getestet. Das ’+' bedeutet 
'oder' (Boolesche Algebra) und steht für Alternativen beim 
Test. Die Flag-Abfrage für 'Greater Than' (nvz + NVz) bedeu¬ 
tet also, daß entweder das N-, Z- und V-Flag gelöscht oder 
das N- und V-Flag gesetzt und das Z-Flag gelöscht sein muß. 

Der Code "EQ" (steht für "Equal") prüft z.B, ob die Operan¬ 
den des letzten Vergleichs gleichwertig waren. Effektiv wird 
geprüft, ob die CMP-Subtraktion 0 ergab, das Z-Flag also ge¬ 
setzt ist. 

Nun können wir für unseren bedingten Sprung den Bedin¬ 
gungscode auswählen, den wir brauchen. Wollen wir z.B. zur 
Marke 'markel' springen, wenn der letzte Vergleich ergeben 
hat, daß die beiden Operanden ungleich waren, schreiben wir: 

bne markel 

"BNE" bedeutet "Branch if Not Equal" - Verzweige, wenn nicht 
gleich. Ein weiteres Beispiel: 

bgt marke2 

Es wird verzweigt, wenn der Zieloperand des letzten Ver¬ 
gleichs größer war als der Quelloperand. 


IF-Abfragen in Assembler 

Da sich die BCC-Befehle auf den Zustand der Flags beziehen 
und diese durch fast alle Assembler-Befehle verändert wer¬ 
den, ist es wichtig, die zusammengehörigen Vergleichs- und 
Sprungbefehle auch direkt hintereinander zu schreiben. An¬ 
sonsten, wenn noch andere Befehle dazwischen kommen, könnten 
sich die Flags ja schon wieder verändert haben und beim 
Sprungbefehl dann nicht mehr das Ergebnis des Vergleichs, 
sondern irgendeines anderen Befehls darstellen. Daher be¬ 
steht eine Assembler-IF-Abfrage immer aus zwei Befehlen: dem 
CMP (oder Vergleichbarem) und dem BCC. Einige 
Beispiele: 

cmp.l #5,d0 

beq markel 

Wenn dO gleich 5 ist, wird zu 'markel' verzweigt. 

cmp.l d2,d3 

bgt marke2 

Wenn d3 größer als d2 ist, wird zu 'marke2' verzweigt. 
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tst.l dl 
bne marke3 

Es wird zu 'marke3' verzweigt, wenn dl ungleich 0 ist. 

Sehr wichtig ist hier, ebenso wie bei den Rechen-Befehlen, 
daß ein Vergleich immer in der Form "Ziel minus Quelle" 
durchgeführt wird. Außerdem müssen Sie im Hinterkopf behal¬ 
ten, daß die Verzweige-Befehle immer aufgrund der Flags rea¬ 
gieren. Welche Flags dabei wie genau getestet werden, ist 
für uns unwichtig, wir müssen nur den richtigen Condition 
Code auswählen. 

Die Sonderform der bedingten Verzweigung, der DBCC-Befehl, 
dient der Programmierung von Schleifen. Mit ihm werden wir 
uns im 3. Kapitel eingehend beschäftigen. 


2.5.6 Logische Befehle 

Um die Bedeutung dieser Befehlsgruppe verstehen zu können, 
müssen wir erst einen kleinen Abstecher in die Boolesche Al¬ 
gebra machen. Das klingt jetzt vielleicht ein bißchen sehr 
nach Schulmathematik, aber so schlimm ist es gar nicht. Die 
Boolesche Algebra, eingeführt von einem gewissen Herrn 
Boole, befaßt sich mit bestimmten Regeln zur Verknüpfung von 
Binärzahlen. 

Bei den booleschen Funktionen handelt es sich um Rechenope¬ 
rationen, ähnlich wie Addition, Subtraktion usw. Ebenso, wie 
man z.B. 13 + 7 = 20 schreiben kann, könnte eine Gleichung 
mit boolescher Funktion lauten: 

13 AND 9=5 

Wie kommt dieses seltsame Ergebnis nun zustande? Wie gesagt, 
beziehen sich boolesche Funktionen, wie die AND-Funktion, 
auf Binärzahlen. Man müßte also 13 und 7 erstmal in die 
binäre Schreibweise übertragen: 

13 = %1101 7 = %0111 

Erinnern Sie sich? Das '%'-Zeichen war die Kennzeichnung für 
Binärzahlen, so wie das '$'-Zeichen für Hex-Zahlen. 

Mit der AND-Funktion, auch "AND-Verknüpfung" genannt, hat es 
folgendes auf sich: Die beiden Zahlen werden Bit für Bit 
verglichen. Das entsprechende Bit in der Ergebniszahl ist 
nur dann 1, wenn die Bits beider Eingangszahlen an dieser 
Stelle ebenfalls 1 waren. Beispiel: 

13 % 1101 

AND 7 % 0111 


Ergebnis % 0101 = 5 
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Daher kommt also die 5. Sie dürfen AND nicht mit plus ver¬ 
wechseln. Neben der AND-Verknüpfung gibt es noch einige an¬ 
dere. Die OR-Verknüpfung z.B. liefert 1, wenn eins der bei¬ 
den Eingangsbits oder beide 1 waren. 

Die booleschen Funktionen stellt man gewöhnlich anhand von 
"Wahrheitstabellen" dar. Dieser Ausdruck kommt daher, daß 
ein O-Bit auch als "logisch falsch" und ein 1-Bit als 
"logisch wahr" bezeichnet wird. In einer solchen Tabelle 
stellen die Zeilen und Spalten die Eingangsbits dar, und das 
Ergebnis ist im "Innenraum" der Tabelle abzulesen. Hier nun 
die Wahrheitstabellen der vier wichtigsten logischen Ver¬ 
knüpfungen : 


AND 

0 

1 

0 

0 

0 

1 

0 

1 


OR 

L°J 

i 

0 


i 

1 

i 

i 


NOT 

0 

1 


1 

0 


EOR 


1 

0 


1 

1 

1 

0 


Bild 2.5: Die Wahrheitstabellen für AND, OR, NOT und EOR 


Die NOT-Verknüpfung hat nur einen Eingangswert und dreht 
alle Bits dieses Wertes um. Beispiel: 

NOT 11000110 (=198) = 00111001 (=57) 

Die EOR-Verknüpfung (Exklusiv-OR) unterscheidet sich dadurch 
von OR, daß sie eine 0 liefert, wenn beide Eingangsbits ge¬ 
setzt sind. OR liefert hier eine 1. 

Es gibt noch zwei weitere logische Verknüpfungen, die Impli¬ 
kation (IMP) und die Äquivalenz (EQV). Diese werden jedoch 
nicht durch MC68000-Befehle abgedeckt und werden auch so gut 
wie nie gebraucht. 

So vorbereitet können wir uns nun an die Tabelle mit den lo¬ 
gischen Befehlen des MC68000 wagen. Wie schon für die Re¬ 
chenbefehle gilt hier: 

and.l dO,dl 

bedeutet: dl AND dO, speichern in dl. 
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Befehl 

Bedeutung 

Beispiele 


AND ea,ea 

Logische UND-Verknüpfung 

and #l,dO 
and dO,(aO) 
and 1000,dO 


ANDI #k,ea 

Logisch UND mit Konstante 

and |2,dO 
and #4,(aO) 


EOR ea,ea 

Logische EOR-Verknüpfung 

eor #l,d0 
eor dO,(aO) 
eor 1000,dO 


EORI #k,ea 

Logisch EOR mit Konstante 

eor #2,d0 
eor |4,(a0) 


NOT ea 

Logische NOT-Verknüpfung 

not dO 
not 1000 


- Entspricht nicht neg! 



OR ea,ea 

Logische OR-Verknüpfung 

or #l,d0 
or dO,(aO) 
or 1000,dO 


ORI #k,ea 

Logisch OR mit Konstante 

or #2,d0 
or #4,(a0) 



Der NOT-Befehl entspricht nicht, wie man vielleicht meinen 
könnte, dem NEG-Befehl. NEG bildet das Zweierkomplement der 
Zahl, während NOT lediglich alle Bits umkehrt. 


2.5.7 Bit-Befehle 

Diese Befehle dienen der Bearbeitung von Zahlen auf Binär- 
Ebene. Sie umfassen Schiebe-, Rotations- und Setz/Lösch-Be- 
fehle. 

Die Schiebe- und Rotationsbefehle gibt es mit einem und zwei 
Parametern. Bei der Ein-Parameter-Form wird die Zahl im 
Zieloperanden immer um ein Bit geschoben, bei zwei Parame¬ 
tern gibt die Quelle an, um wieviel Bits die Zahl im Ziel 
geschoben werden soll. Die Zwei-Parameter-Form erlaubt aber 
nur Datenregister als Ziel. 


Befehl 

Bedeutung 

Beispiele 

ASL Dn,Dn 

Arithm. Linksschieben 

asl d0,dl 

ASL #k,Dn 


asl §2,dl 

ASL ea 


asl 1000 

- Siehe Anmerkungen 
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ASR Dn,Dn Arithm. Rechtsschieben 

ASR #k,Dn 
ASR ea 

- Siehe Anmerkungen 


asr dO,dl 
asr #2,dl 
asr 1000 


BCHG Dn,ea Ändere Bit Dn o. #k von ea bchg d0,l000 
BCHG #k,ea bchg #5,1000 
- Alter Zustand des Bits kommt ins Z-Flag 


BCLR Dn,ea Lösche Bit Dn o. #k von ea bclr d0,1000 
BCLR #k,ea bclr #5,1000 
- Alter Zustand des Bits kommt ins Z-Flag 


BSET Dn,ea Setze Bit Dn o. #k von ea bclr d0,1000 
BSET #k,ea bset #5,1000 
- Alter Zustand des Bits kommt ins Z-Flag 


LSL Dn,Dn Logisch Linksschieben 
LSL #k,Dn 
LSL ea 

- Siehe Anmerkungen 


lsl d0,dl 
lsl #2,dl 
lsl 1000 


LSR Dn,Dn Logisch Rechtsschieben 

LSR #k,Dn 
LSR ea 

- Siehe Anmerkungen 


lsr d0,dl 
lsr #2,dl 
lsr 1000 


ROL Dn,Dn Linksrotieren 
ROL #k,Dn 
ROL ea 

- Siehe Anmerkungen 


rol d0,dl 
rol #2,dl 
rol 1000 


ROR Dn,Dn Rechtsrotieren 
ROR #k,Dn 
ROR ea 

- Siehe Anmerkungen 


ror d0,dl 
ror #2,dl 
ror 1000 


Nun zu den zwei Untergruppen der Bitbefehle: 


Schiebe- und Rotationsbefehle 

Hier werden sämtliche Bits einer Binärzahl um eine festge¬ 
legte Anzahl Stellen nach links oder rechts geschoben. 

Bei den Rotationsbefehlen wird das Bit, das links oder 
rechts herausfällt, an der anderen Seite wieder eingespeist. 
Beispiel: Die Binärzahl %11001010 soll nach links rotiert 
werden: 
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Die Schiebe-Befehlen verhalten sich etwas anders. Man unter¬ 
scheidet hier zwischen arithmetischem und logischem Schie¬ 
ben. Ein Unterschied tritt aber nur beim Rechtsschieben auf, 
daher betrachten wir zunächst das Linksschieben. Hierbei 
wird das links herausgeschobene Bit nicht wieder einge¬ 
speist, es wird aber ins C- und X-Flag eingetragen. Rechts 
wird ein O-Bit nachgeschoben. Beispiel: Die Binärzahl 
%10101001 wird arithmetisch oder logisch nach links gescho¬ 
ben : 


C/X-Flag 


f ° 1 

10101001 



C/X-Flag 

I_*_ 



Mit dem ASL-Befehl läßt sich übrigens eine Multiplikation um 
2, 4, 8 usw. (also mit 2er-Potenzen) sehr viel schneller er¬ 
ledigen als mit dem MULU-Befehl. Genauso, wie im Zehnersy¬ 
stem eine Verschiebung nach links einer Multiplikation mit 
10, 100, 1000 usw. entspricht, bewirkt die Verschiebung ei¬ 
ner Binärzahl nach links eine Multiplikation mit 2, 4, 8 

usw. Anstatt 

raulu #4,d0 

schreibt man also besser 
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asl #2,d0 

Nun zum Unterschied zwischen arithmetischem und logischem 
Rechtsschieben. Das logische Rechtsschieben läuft analog zum 
Linksschieben (herausfallendes Bit ins C- und X-Flag, O-Bit 
nachschieben). Beim arithmetischen Rechtsschieben wird auch 
das herausfallende Bit ins C- und X-Flag eingetragen. Es 
wird aber kein O-Bit nachgeschoben, sondern das frühere Bit 
bleibt, obwohl es nach rechts geschoben wurde, auch an sei¬ 
ner alten Position erhalten. Es wird also quasi eine Stelle 
nach rechts "kopiert". Ein Beispiel: Die Binärzahl %11001001 
wird arithmetisch nach rechts geschoben: 




C/X-Flag 

I_ 


Bitmanipulations-Befehle 

Diese Gruppe umfaßt die Befehle "Bit setzen" (BSET), "Bit 
löschen" (BCLR) und "Bit wechseln" (BCHG). Letzterer macht 
aus einem gesetzten Bit ein gelöschtes und umgekehrt. Ziel 
kann entweder ein Datenregister oder eine Adresse im RAM 
sein, die Quelle gibt die Nummer des zu bearbeitenden Bits 
an. Falls das Ziel im RAM liegt, ist als Nummer nur 0-7 zu¬ 
gelassen, d.h. die Adresse darf nur als Byte angesprochen 
werden. Bei Datenregistern hingegen sind alle Bitnummern des 
Langworts (0-31) erlaubt. 

Soll z.B. das 5. Bit des Registers dO gelöscht werden, 
schreibt man: 

bclr #5,d0 

So setzt man das ’do-te' Bit von dl: 
bset dO,dl 

Und schließlich eine Bitmanipulation im RAM: 

bclr 15,1000 ; Löscht Bit 5 von Speicherstelle 1000 

bchg d0,1000 ; Wechselt das 'd0-te' Bit 
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3.1 Aufbau eines Assembler-Programms 

Ein Assemblerprogramm besteht, wie Programme in anderen 
Sprachen auch, aus mehr oder weniger vielen Befehlen. Im Ge¬ 
gensatz zu manchen anderen Sprachen dürfen Sie in Assembler 
aber immer nur einen Befehl pro Zeile schreiben. Eine As¬ 
sembler-Befehlszeile besteht aus vier Teilen: dem "Label" 
(zu Deutsch "Marke"), dem Befehl, den Operanden und dem Kom¬ 
mentar. Label und Kommentar müssen nicht sein, und auch der 
Operand kann, je nach Befehl, wegfallen. Befehle und Operan¬ 
den kennen wir ja schon zur Genüge, deshalb wollen wir uns 
jetzt den neuen Dingen zuwenden. 


3.1.1 Kommentare 

Da ein Assembler-Programm vor allem für Außenstehende meist 
recht schwer nachzuvollziehen ist, haben Sie die Möglich¬ 
keit, Ihre Quelltexte beliebig mit erklärenden Kommentaren 
zu versehen. Wie das geht, haben Sie bestimmt schon in di¬ 
versen Beispiel-Befehlszeilen gesehen: Sie schreiben hinter 
Befehl und Operanden ein Semikolon, und alles, was danach 
noch bis zum Zeilenende folgt, gilt als Kommentar. Beispiel: 

move.l dO,aO ; <- Semikolon = Kommentarzeichen 

Soll ein Kommentar alleine in einer Zeile stehen, beginnen 
Sie diese einfach mit einem Stern: 

* <- Stern = Zeichen für Nur-Kommentar-Zeile 


3.1.2 Labels 

Wann immer Sie zu einer bestimmten Stelle in Ihrem Programm 
verzweigen wollen, sei es ein Unterprogramm, ein bedingter 
oder unbedingter Sprung, müssen Sie die Adresse des Befehls 
kennen, zu dem Sie springen möchten (denn Verzweigung heißt 
für die CPU: "Lade den Programmzähler mit der Adresse des 
anzuspringenden Befehls"). Das hieße aber, daß Sie sämtliche 
Befehle des Programms quasi "durchzählen" müßten, um die 
Adressen aller Befehle zu wissen. Das wäre eine unglaubli¬ 
che, um nicht zu sagen unmögliche, Arbeit. Als Abhilfe dafür 
bietet der Assembler die Labels (Marken) an. Sie stellen 
einfach vor jeden Befehl, den Sie im Laufe des Programms an- 
springen oder sonstwie ansprechen möchten, ein Label. Dieses 
repräsentiert dann für den Assembler die Adresse des Be¬ 
fehls . 

Ein Label besteht einfach aus einem Text, den Sie sich (mehr 
oder weniger) frei auswählen können. Die meisten, Assembler 
machen hier die Auflage, daß Labels mit einem Buchstaben be¬ 
ginnen müssen und nur Buchstaben und Zahlen enthalten dür¬ 
fen. Um einen Text als Label zu kennzeichnen, müssen Sie bei 
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manchen Assemblern einen Doppelpunkt an ihn anschließen, bei 
manchen reicht es, wenn er in der ersten Spalte der Befehls¬ 
zeile beginnt. Ein paar Beispiele für Labe1-Anwendungen: 


tst.b 

beq 

add.b 

marke: move.b 

do 

marke 

#5,d0 

d0,d4 

; Ist d0=0? 

; Wenn ja, springe zu marke 
; Ansonsten addiere 5 zu do 
; Zur Weiterverarbeitung 

move.1 

a4,a0 

; Eine Beispieladresse (z.B. ein 
; Tabellenstart) 

marke: move.b 

(a0)+,d0 

; Erstes Tabellen-Byte holen 
; und Tabellenzeiger plus 1 

cmp. 1 

a3,a0 

; Tabellenende (soll in a3 
; stehen) erreicht? 

blt 

marke 

; Solange Zeiger kleiner als 
; Ende, Rücksprung zu marke 


Bild 3.1: Beispiele für Label-Anwendungen 


3.1.3 Wichtige Assembler-Direktiven 

Eine Assembler-Direktive ist auch ein Befehl, allerdings 
kein Befehl des MC68000. Vielmehr ist es eine Anweisung di¬ 
rekt an das Übersetzungsprogramm. Die wichtigsten Direktiven 
werden wir nun kennenlernen. 


Die 1 egu'-Direktive 

Die equ-Direktive bedeutet schlicht "setze gleich" (equal). 
Auf diese Weise kann man irgendwelchen Zahlenwerten 
(Tabellenplatznummern, Adressen etc.) sinnvolle Namen zuord¬ 
nen, die sich bestimmt leichter merken lassen. Der Befehl 

TabPlatz equ 20 

setzt also dem Text 'TabPlatz' den Wert 20 gleich. Im Grunde 
ist das reine Textverarbeitung, der Assembler setzt später 
einfach überall da, wo TabPlatz steht, eine 20 ein. Prinzi¬ 
piell sind diese equ-Zuweisungen nicht unbedingt notwendig, 
sie helfen Ihnen aber, wenn Sie sich Zahlen nur schlecht 
merken können (oder wollen). Sie können allen im Programm 
verwendeten Zahlenwerten und sonstigen Nummern sinnvolle 
Texte zuweisen. 

Anstatt 'equ' kann man auch einfach ein Gleichheitszeichen 
schreiben: 

TabPlatz = 20 
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Die 'DC'- und die 1 DS'-Direktive 

Die 'DC'-Direktive dient zum Einfügen von beliebigen Zahlen¬ 
werten oder Texten in ein Programm. Wenn Sie z.B. den Text 
"Hello World!" in Ihrem Programm ausgeben wollen, muß er ja 
auch irgendwo stehen. Sie können dann schreiben: 

dc.b "Hello World!" 

Damit wird der Text an der Stelle, wo die Zeile im Programm 
auftritt, in das übersetzte Maschinenprogramm eingefügt. Na¬ 
türlich kann man auch Zahlen mit 'DC' ins Programm einbauen, 
oder auch Text und Zahlen gemischt: 

dc.b "Hello World!”,10,"How are you?",10 

Die 10 ist der ASCII-Code für 'neue Zeile'. Wenn man diesen 
Text auf dem Bildschirm ausgeben läßt, werden die beiden 
Sätze in getrennte Zeilen geschrieben. Sie können ASCII- 
Texte (in Anführungszeichen) oder Zahlen eines beliebigen 
Systems ('$' für Hex usw. voranstellen) beliebig mischen. 
Wichtig ist auch bei 'DC', den Datentyp der einzufügenden 
Werte anzugeben. So wird bei 

dc.b 0 

ein O-Byte ins Programm eingefügt, bei 
dc.l 0 

aber ein O-Langwort. Meistens muß man die Stelle von Texten 
oder Zahlen im Programm, also ihre Adresse, kennen. Daher 
findet man in der Regel eine Kombination aus Label und 'DC': 

htext: dc.b "Hello World!",10 

Nun zur ’DS'-Direktiven: Sie reserviert Speicherplatz im 
Programm, und zwar eine festlegbare Anzahl von Bytes, Worten 
oder Langworten. Beispiel: 

puffer: ds.b 20 

Dieser Befehl fügt ab der Label-Adresse 'puffer' 20 Bytes 
ins Programm ein. Achtung: Beim Seka-Assembler heißt diese 
Direktive 'BLK' und nicht 'DS'! Der Befehl 

puffer2: ds.l 20 

fügt 20 Langworte (also 80 Bytes) ein. Dieser Befehl ist 
nützlich, wenn man im Programm Platz für Tabellen und ähnli¬ 
che Strukturen braucht, die während des Programmlaufs er¬ 
zeugt werden. 

Sehr wichtig ist, daß man 'DC' und auch 'DS' nicht beliebig 
mitten ins Programm schreiben darf. Dann würde die CPU ja 
versuchen,, wenn sie diese Stelle erreicht, den Text o.ä. 
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als Befehl zu interpretieren, was sicherlich schief gehen 
dürfte. Am besten sammelt man alle 'DC'- und 1 DS 1 -Direktiven 
am Programmende, hinter dem letzten Assembler-Befehl. Dies 
nennt man das Anlegen eines "Datenbereiches". 

Außerdem müssen Sie beachten, daß es zwei Arten gibt, einen 
mit 'DC' oder 'DS' definierten Ausdruck "anzusprechen". An¬ 
genommen, Sie haben mittels 

text: dc.b "Ausgabe-Text" 

einen Text im Programm abgelegt. Dann können Sie durch 

move.l #text,aO oder 

lea text,aO 

die Startadresse des Textes nach aO holen. Bei Verwendung 
von 'move.l' müssen Sie ein '#' verwenden, da sich der MOVE- 
Befehl ansonsten auf den Inhalt der Speicherstelle 'text' 
und nicht auf ihre Adresse beziehen würde. Beim LEA-Befehl 
ist kein '#' nötig, da er sowieso immer Adressen anspricht 
und keine Speicherinhalte. Wenn Sie jetzt aber durch 

wertl: dc.l $44445555 

ein Langwort im Programm stehen haben und Sie den Inhalt 
dieses Langworts bearbeiten wollen, müssen Sie z.B. 

move.l wertl,dO 

schreiben. Dieser MOVE-Befehl bezieht sich dann auf den In¬ 
halt der Speicherstelle, während 

move.l #wertl,dO oder 
lea wertl,aO 

die Adresse holen würde (beachten Sie, daß LEA nur für 
Adreßregister zugelassen ist). Diese beiden "Ansprecharten" 
(Adresse oder Inhalt) müssen Sie gut auseinanderhalten. 


Die 'even'-Direktive 

Diese Direktive ist schnell erklärt: Sie sorgt dafür, daß 
das Programm mit dem nächsten Befehl (oder der nächsten Di¬ 
rektiven) auf jeden Fall an einer geraden Adresse fortge¬ 
setzt wird. Effektiv wird, falls eine ungerade Adresse er¬ 
wischt würde, einfach ein O-Byte (oder sonstwas) eingescho¬ 
ben. Das ist nötig, weil Assembler-Befehle, aber auch be¬ 
stimmte Daten, immer an geraden Adressen stehen müssen 
(sonst freut sich der Guru). In der Regel wird man diese Di¬ 
rektive im Datenbereich (oder halt da, wo Daten mit un¬ 
gerader Länge stehen) finden. 

Abhängig vom verwendeten Assembler gibt es ein paar Varian¬ 
ten der 'even'-Direktive. Beim Profimat heißt sie z.B. 
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'align' und nicht 'even'. Hier gibt es auch die Möglichkeit, 
auf eine Langwortgrenze (durch 4 teilbare Adresse) zu alig- 
nen: Man schreibt in diesem Fall 'align.l'. Das geht auch 
beim Devpac: Hier schreibt man 'cnop 0,4'. 


3.1.4 Die 'include'-Direktive 

'Include' weist den Assembler an, während der Übersetzung 
einen weiteren Quelltext, dessen Namen Sie hinter 'include' 
angeben, in Ihr Programm einzufügen. Dieser erscheint aller¬ 
dings nicht in Ihrem Text, sondern wird nur während der As¬ 
semblierung eingeladen, mit in das fertige Programm hinein¬ 
genommen und dann wieder vergessen. Diese Direktive ist 
nützlich, wenn Sie z.B. oft gebrauchte, immer gleichlautende 
Programmteile quasi "auslagern" möchten. Sie können den Pro¬ 
grammteil in einer gesonderten Datei auf der Diskette halten 
und mit 'include' in Ihre Programme einiesen lassen, ohne 
daß er im Quelltext selber auftaucht. Das spart Platz im 
Textspeicher und macht die Programme übersichtlicher. 

Außerdem liefern die meisten Assembler einen Satz sogenann¬ 
ter "Include-Files" mit. Darunter versteht man eine Reihe 
von Textdateien, die Sie in Ihre Programme einbinden können. 
Die Include-Files bestehen hauptsächlich aus 'equ'- und son¬ 
stigen Direktiven und sind nach Themengebieten geordnet. Die 
DOS-Include-Files enthalten Zuweisungen für Zahlen, die man 
häufig im Umgang mit Dateien braucht, die Intuition-Include- 
Files entsprechend 'equ's für Screen- und Windowprogrammie¬ 
rung. 

Manche Programmierer machen intensiven Gebrauch von diesen 
Includes. Das bringt aber auch einen Nachteil mit sich: Ob¬ 
wohl man meistens nur einen kleinen Teil des Includes 
braucht, muß man trotzdem immer die ganze Datei einladen. 
Außerdem sind die Include-Files weitgehend untereinander 
verkettet, d.h. ein Include lädt selbst wieder diverse an¬ 
dere ein, diese wieder weitere usw. Obwohl Sie vielleicht 
nur ein oder zwei Werte aus einem Intuition-Include haben 
wollten, werden vielleicht plötzlich noch 3 oder 4 andere 
Intuition-Includes und von diesen noch 5 bis 6 Exec-Includes 
nachgeladen. Das bringt natürlich eine recht lange Assem- 
blierzeit mit sich (vor allem, wenn Sie mit Disketten arbei¬ 
ten), und außerdem wird eine Menge Speicherplatz benötigt. 

Wir halten es persönlich für sinnvoller, die Includes quasi 
als "Nachschlagewerke" zu benutzen. Wir suchen uns die Zah¬ 
lenwerte, die wir brauchen, aus den Includes zusammen und 
schreiben sie selber per 'equ' in unsere Programme. Bei den 
wenigen Zahlen, die man als Einsteiger braucht, ist das auf 
jeden Fall günstiger. Später, wenn man als Fortgeschrittener 
nach einem bestimmten Wert oder einer Systemstruktur sucht, 
können sich die Includes als wahre Fundgrube erweisen. 
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3.1.5 Variablen 

Mit unserem jetzigen Wissen ist es kein Problem mehr, Vari¬ 
ablen in unsere Programme einzubauen. Eine Variable ist im 
Grunde (in jeder Programmiersprache) ein Speicherbereich von 
bestimmter Länge, der über einen Namen angesprochen wird. 
Sprachen wie BASIC nehmen uns die Verwaltung dieses 
Speicherbereichs ab, in Assembler müssen wir allerdings 
selbst dafür sorgen. Ein Beispiel: Wollen wir eine Langwort- 
Variable namens 'zahll' benutzen, schreiben wir folgendes in 
den Datenbereich des Programms: 

zahll: ds.l 1 

Das bedeutet: Reserviere ein Langwort an dieser Stelle im 
Programm und gebe seiner Adresse den symbolischen Namen 
'zahll'. Sie sehen es vielleicht schon: Der Variablenname 
ist in Assembler gleich dem Label, das wir vor den Reservie¬ 
rungs-Befehl schreiben. Ein anderes Beispiel: 

zahl2: ds.w 1 

reserviert ein Wort Platz unter dem Namen 'zahl2'. Auch Ta¬ 
bellen, Arrays u.ä. lassen sich so erstellen: 

tabellel: ds.b 30 

erstellt eine Tabelle mit 30 Bytes, deren Startadresse das 
Label 'tabellel' darstellt. 


3.2 Libraries: Grundlage des Amiga-Systems 

Bis jetzt haben wir uns nur mit der Assemblersprache des 
MC68000 ganz allgemein beschäftigt. Alles, was wir bisher 
gelernt haben, ließe sich auch auf einen anderen Computer, 
der diese CPU besitzt, übertragen. Jetzt wollen wir etwas 
systemspezifischer werden und uns die wichtigste Einrichtung 
des Amiga-Systems vornehmen: die Libraries. 


3.2.1 Was ist eine Library? 

Im Grunde ist eine Library nichts weiter als eine Sammlung 
von Routinen, auf die Sie als Programmierer zurückgreifen 
können. Aber auch das Betriebssystem des Amiga macht regen 
Gebrauch von diesen Programmsammlungen, man kann sogar sa¬ 
gen, das System basiert auf den Libraries. 

Die vier wichtigsten Libraries des Amiga sind 

Exec 

DOS 
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Intuition 

Graphics 

Die Exec-Library ist dabei der "Boß", sie ist im wesentli¬ 
chen für das Multitasking (also die Verteilung der Computer- 
Rechenzeit an verschiedene, scheinbar gleichzeitig ablau¬ 
fende Programme) und für die Zuteilung von freien RAM-Berei- 
chen an die Tasks zuständig. Als Ottonormal-Anwender spüren 
wir von ihrer Arbeit allerdings gewöhnlich nicht viel. 

Anders ist es da schon bei der DOS-Library. Wann immer Sie 
eine Datei umbenennen, ein Verzeichnis anlegen oder löschen 
oder auch nur ein Programm starten, die DOS-Library hat be¬ 
stimmt ihre Routinen im Spiel. Sie ist für sämtliche Datei- 
Operationen zuständig, und das gilt nicht nur für Disk-Da¬ 
teien. Die DOS-Library kann auch den Drucker ansteuern oder 
einfache Fenster öffnen, die dann auch wie Dateien behandelt 
werden. 

Die Libraries Intuition und Graphics kommen immer dann ins 
Spiel, wenn es um Fenster, Menüs usw. (Intuition) oder um 
Linienzeichnen, Text usw. (Graphics) geht. Zu diesen beiden 
Libraries kommen wir später, zunächst einmal wollen wir uns 
mit der DOS-Library beschäftigen, da sie am einfachsten zu 
handhaben ist. Vorher müssen wir allerdings wissen, wie die 
Library-Benutzung überhaupt funktioniert. 


3.2.2 Der Umgang mit Libraries 

Eine Library ist, wie gesagt, eine Sammlung von Assembler- 
Routinen, die vom eigenen Programm aus wie Unterprogramme 
angesprungen werden können. Um aber ein Unterprogramm an- 
springen zu können, muß man dessen Adresse kennen. Nun darf 
man aber nicht alle Library-Routinen über absolute Adressen 
auf rufen, denn das würde heißen, daß sich nach jeder Ände¬ 
rung an der Library seitens Commodore die Adressen ändern 
würden und alle älteren Programme nicht mehr lauffähig wä¬ 
ren . 

Der Amiga benutzt eine recht zukunftssichere Methode des Li¬ 
braryaufrufs. Neben den eigentlichen Routinen gibt es näm¬ 
lich für jede Library eine Tabelle, in der die Ein¬ 
sprungadressen aller Routinen aufgeführt sind. Wenn man nun 
dem System mitteilt, das man eine bestimmte Library benutzen 
möchte (d.h. man 'öffnet' die Library), bekommt man die 
Startadresse dieser Sprungtabelle zurückgemeldet. Auf diese 
Startadresse (auch "Basisadresse" genannt) müssen sich dann 
alle Libraryzugriffe des Programms beziehen. Der Vorteil 
liegt auf der Hand: Solange sich die Position eines Sprung¬ 
eintrages relativ zum Tabellenanfang nicht ändert (und das 
tut sie nie), kann die Library stehen, wo sie will, und so¬ 
gar die einzelnen Routinen können nach Commodores Wünschen 
verschoben werden. 
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Was muß man denn nun tun, um eine Library zu öffnen? Ganz 
einfach: Man übergibt der Exec-Routine OpenLibrary den Namen 
(und eventuell die Versionsnummer) der gewünschten Library, 
und um den Rest kümmert sich dann das System. Das heißt, die 
Library wird, falls sie nicht schon geöffnet ist und auch 
nicht im ROM steht, von der Diskette geladen, und zwar in 
einen Speicherbereich, den Exec selbst auswählt. Das Pro¬ 
gramm erhält dann die Basisadresse mitgeteilt, und die Li¬ 
brary steht zur Benutzung bereit. Falls nun noch ein wei¬ 
teres Programm die selbe Library benutzen will, teilt ihm 
das System nur noch die Basisadresse mit. 

Wichtig ist, daß man alle Libraries, die man geöffnet hat, 
vor dem Programmende auch wieder schließt, denn das System 
entfernt eine Library erst dann aus dem Speicher, wenn alle 
Programme gesagt haben, das sie sie nicht mehr brauchen. Da¬ 
für ist die Exec-Routine CloseLibrary zuständig. 

Doch halt! werden Sie jetzt vielleicht denken. Um Routinen 
einer Library benutzen zu können, braucht man deren Basi¬ 
sadresse. Diese erhält man bei Aufruf der OpenLibrary-Rou- 
tine, die ihrerseits in einer Library (der Exec-Library) 
steht. Woher weiß man denn die Basisadresse dieser Library? 
Des Rätsels Lösung lautet 4. In der Speicherstelle Nummer 4, 
die einzige wirklich feste Adresse im Amiga-System, findet 
man die Basis der Exec-Library. Diese braucht also nicht ge¬ 
öffnet (und auch nicht geschlossen) zu werden und ist jeder¬ 
zeit einsatzbereit. 

Jetzt sind also alle nötigen Vorarbeiten geleistet, und die 
Library-Routinen können endlich benutzt werden. Die Basi¬ 
sadresse der Library trägt man in ein Adreßregister 
(gewöhnlich a6) ein, z.B. 

move.l 4,a6 

um die Exec-Library zu benutzen. Die benötigten Parameter 
kommen in die anderen Register; in welche, ist für jede Li¬ 
brary-Routine festgelegt (z.B. erwartet OpenLibrary in al 
einen Zeiger auf den Namen der Library und in dO die ge¬ 
wünschte Versionsnummer). Aufgerufen wird die Routine mit¬ 
tels 


jsr 0ffset(a6) 

also über die Adressierungsart 'Adreßregister indirekt mit 
Offset'. Der Offset hier die Nummer der Routine in der Ta¬ 
belle. Diese Offsets sind immer negativ, fangen bei -30 an 
und werden in Sechserschritten gezählt (warum das alles so 
ist, wird später noch geklärt). Die erste Routine der DOS- 
Library (genannt Open) hat also die Nummer -30, die zweite 
Routine (Close) die Nummer -36, die dritte (Read) -42 usw. 

Jede Library-Routine (oder fast jede) erwartet, wie gesagt, 
bestimmte Parameter in Daten- und/oder Adreßregistern 
(ähnlich wie die Operanden eines Assembler-Befehls). Wenn 
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sie ein Ergebnis produzierte (wie z.B. die Library-Basi¬ 
sadresse bei OpenLibrary), steht diese nach dem Aufruf in 
do. 

Immer, wenn im Lauf des Kurses eine neue Library-Routine 
verwendet wird, stellen wir sie auf folgende Weise vor (als 
Beispiel die OpenLibrary-Routine): 


OpenLibrary = -552 (Exec-Library) 


»libName 

al 

< 

Zeiger auf Library-Namenstext 

Version 

dO 

< 

Versionsnummer (0=Version egal) 

»library 

do 

> 

Basis-Adresse oder 0 bei Fehler 

Erklärung 



Öffnet die angegebene Library 


Zur Erklärung dieses Kastens: In der ersten Zeile steht der 
Name der Library-Routine und hinter dem ' = ' ihr Offset. In 
Klammern steht der Name der Library, aus der die Routine 
stammt. Unter dem Kasten stehen die Parameter mit den Regi¬ 
stern, in die sie geschrieben werden müssen. Vor dem Regi¬ 
ster steht jeweils die englische Standard-Bezeichnung (gemäß 
Commodores Angaben) und dahinter die deutsche, etwas aus¬ 
führlichere Erklärung. Das '<'-Zeichen steht für einen Para¬ 
meter, der vor dem Aufruf eingesetzt werden muß. Das 1 >' 
kennzeichnet den Rückgabewert der Routine. Das '*' vor z.B. 

'libName 1 bedeutet, daß der Name nicht direkt in al einge¬ 
tragen wird (was wohl gar nicht möglich wäre), sondern daß 
in al ein "Zeiger" ("Pointer") auf den Library-Namen erwar¬ 
tet wird. Einen Stern verwenden wir in Anlehnung an die 
Sprache C, wo er auch das Zeichen für einen Pointer ist. In 
dO hingegen wird direkt die Versionsnummer der Library ein¬ 
getragen (dort steht kein '*'). Nach dem Aufruf bekommen wir 
in dO die Basisadresse der Library bei erfolgreichem öffnen 
oder 0 bei Fehler zurück. Falls eine Library-Routine keine 
Rückgabe liefert, fehlt die ’dO >'-Zeile. 

'Zeiger' bedeutet im Prinzip soviel wie 'Startadresse'. In 
unserem Beispiel muß also die Startadresse des (per ’DC' im 
Programm abgelegten) Library-Namenstextes in al geschrieben 
werden. Generell ist ein Zeiger immer die Startadresse ir¬ 
gendeines Objektes im Speicher. Bei unseren Library-Kästen 
setzen wir immer einen Stern vor einen Eintrag, wenn es sich 
dabei um einen Zeiger handelt. Dabei ist es egal, ob es sich 
um einen Zeiger auf ein Objekt (Struktur, Namenstext etc.) 
handelt, das der Programmierer angelegt hat oder das System 
bereitstellt. 

Folgendermaßen würde ein Library-Aufruf im Programm ausse- 
hen: 
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move.1 

4,a6 

move .1 

#dosname,al 

clr.l 

do 

jsr 

-552(a6) 

move.1 

do,dosbase 


; Basis Exec 

; Zeiger auf den Namen DOS-Library 
; 0 = Version egal 
; Aufruf der OpenLibrary-Routine 
; Basis DOS (Rückgabewert) sichern 


* Datenbereich 


dosname: 
dosbase: 


dc.b "dos.library",0 

even 

ds.l 1 


Bild 3.2: Beispielprogramm für Library-Routinenaufruf 


Das Label 'dosname' wird per '#' angesprochen, da seine 
Adresse und nicht sein Inhalt gefordert ist. 'dosbase' ist 
eine Langwort-Variable, in die die von OpenLibrary gemeldete 
DOS-Basis zwischengespeichert wird. 


3.3 Erste Schritte mit der DOS-Library 

Nachdem wir nun das nötige "Handwerkszeug" beisammen und uns 
mit dem Library-Konzept vertraut gemacht haben, können wir 
mit der Programmierung loslegen. Wir hoffen, die bisherigen 
Theorie-Kapitel waren Ihnen nicht zu trocken, aber ein paar 
Grundlagen müssen halt sein. Alles weitere werden Sie ab 
jetzt, nach dem Motto "Learning by Doing", anhand von Pro¬ 
grammen lernen. 


3.3.1 Das erste Programm: Textausgabe im CLI-Fenster 

Die nun folgenden Programme sollen als Grundlage für den 
weiteren Kurs dienen. Textausgabe, Eingabe über Tastatur 
usw. sind wichtig, damit wir die Ergebnisse unserer Program¬ 
mierversuche auch am Bildschirm sehen können. 

Bevor wir uns das Programm ansehen, brauchen wir noch ein 
paar weitere Library-Routinen, und auch ein paar Erklärungen 
sind fällig. Zuerst soll die CloseLibrary-Routine vorge¬ 
stellt werden: 


CloseLibrary 


-414 (Exec-Library) 


‘library 


al < 


Erklärung 


Basisadresse der zu schließenden Library 
Schließt die angegebene Library 
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Des weiteren brauchen wir ein "Handle" für die Standard 
Bildschirmausgabe (das CLI-Fenster) geben. Das 'Handle' ist 
ein Begriff aus der DOS-Dateiverwaltung. Immer, wenn Sie 
eine Datei über DOS öffnen, bekommen Sie, quasi als 
"Zugriffsnummer" der Datei, eine Zahl, eben das Handle, mit¬ 
geteilt (vergleichbar mit der Filenummer bei BASIC). Bei al¬ 
len DOS-Zugriffen wird die Datei dann über das Handle iden¬ 
tifiziert . 

CLI-Fenster werden im DOS auch als Dateien behandelt und ha¬ 
ben daher auch ein Handle. Von der DOS-Routine Output lassen 
wir uns das Handle geben, das zum CLI-Fenster gehört, von 
dem aus wir unser Programm gestartet haben. 


Output = -60 (DOS-Library) 


*file do > Handle des CLI-Fensters 

Eujclärung Ermittelt das Standard—Output—Handle 


Außerdem brauchen wir eine Routine, die einen Text m das 
Fenster schreibt. Da DOS-Fenster wie Dateien behandelt wer¬ 
den, können wir zu diesem Zweck die Standard-Daten-Schreibe- 
Routine verwenden. 


Write = —48 (DOS-Library) 


*f ile 

dl 

< 

*buffer 

d2 

< 

length 

d3 

< 

writtenOut 

dO 

> 

Erklärung 



Nun haben wir alles 

können. Hier 

ist 

es: 


Handle der zu schreibenden Datei 
Startadresse der Daten 
Anzahl Datenbytes 


geschriebener 
Schreibt Daten in eine Datei 


Anzahl wirklich 
(-l=Fehler) 


Bytes 


* Programm 3.1: Textausgabe im CLI-Fenster 


ExecBase 

= 

4 

OpenLib 

= 

-552 

CloseLib 

= 

-414 

Write 


-48 

Output 

= 

-60 
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* DOS-Lib öffnen 


move.1 

ExecBase,a6 ; 

Exec-Lib-Basis 

lea 

dosname,al ; 

Name der DOS-Lib 

clr. 1 

do ; 

Version egal 

jsr 

0penLib(a6) ; 

Lib öffnen 

tst.l 

dO ; 

Fehler beim öffnen? 

beq 

ende ; 

Wenn ja, zum Ende 

move.1 

do,dosbase ; 

Basis DOS-Lib sichern 

* Ausgabe-Handle 

des CLI-Fensters 

ermitteln: 

move.1 

dosbase,a6 ; 

DOS-Basis nach a6 

jsr 

Output(a6) ; 

Output-Handle holen 

move.1 

do,clihandle ; 

Handle sichern 

* Text ausgeben: 

move.1 

clihandle,dl ; 

Handle nach dl 

move.1 

#text,d2 ; 

Textbeginn nach d2 

move.1 

#33,d3 ; 

Textlänge nach d3 

jsr 

Write(a6) ; 

DOS-Routine Schreiben 

* Programmschluß: 

: Lib schließen! 


move.1 

dosbase,al ; 

Basis DOS-Lib 

move.1 

4,a6 ; 

Exec-Basis 

jsr 

CloseLib(a6) ; 

Lib schließen 

ende: rts 

/ 

Zurück zum CLI 


* Datenbereich: diverse Namen etc. 


dosname: 

dosbase: 

clihandle: 

text: 


dc.b "dos.library",0 

even 

ds.l 1 

ds. 1 l 

dc.b "Mein erster Text im CLI-Fenster!",lO 

even 


Programm 3.1: Textausgabe im CLI-Fenster 


Sie werden vieles, was Sie in den vorigen Kapiteln gelernt 
haben, hier wiederfinden. Da wäre zum einen das Sternchen am 
Anfang einiger Zeilen (Kommentar-Zeile) und das für 
einen Kommentar im Anschluß an den Befehl. 

Dann die Zuweisungen mit dem '='-Zeichen (Abkürzung für die 
'equ'-Direktive). Hier sehen Sie den Hauptzweck von 'equ': 
Library-Offsets und sonstigen Zahlenwerten werden die ent¬ 
sprechenden Klartext-Bezeichnungen zugewiesen. 

Im Datenbereich finden Sie die 1 even 1 -Direktive wieder. 
Nochmal: Nach jedem ' DC'- oder ' DS'-Eintrag, von dem Sie 
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nicht ganz genau wissen, daß er eine gerade Bytezahl belegt, 
müssen Sie ein 'even' schreiben. 

Dann wird per Exec-OpenLibrary die DOS-Library geöffnet. 
Wenn das nicht geklappt hat, steht do auf 0. Dies prüfen wir 
in den Zeilen 

tst.l do ; Fehler beim öffnen? 
beq ende ; Wenn ja, zum Ende 

Da haben wir also eine Assembler-IF-Abfrage, wie wir sie im 
letzten Kapitel kennengelernt haben. Im nächsten Abschnitt 
werden uns noch weitere IF-ELSE-Konstruktionen und Ähnliches 
begegnen. 

Wenn die DOS-Lib geöffnet werden konnte, geht es weiter im 
Programm. Wir sichern die Basis der DOS-Lib in einer Vari- 
ablen. Nun rufen wir, nachdem wir die DOS-Basis in a6 einge¬ 
tragen haben, die Output—Routine auf. Von Output bekommen 
wir das Handle für die Standard-Bildschirmausgabe (das CLI- 
Fenster). In dieses Fenster geben wir den Text aus, und zwar 
so: 


move.l clihandle,dl 
move.l #text,d2 
move.l #33,d3 
jsr Write(a6) 


; Handle nach dl 
; Textbeginn nach d2 
; Textlänge nach d3 
; DOS-Routine Schreiben 


Achten Sie auf das '#’ in '#text'. Wie früher schon erwähnt, 
bewirkt es, daß die Adresse von 'text' und nicht sein Inhalt 
angesprochen wird. 


Zum Abschluß des Programms müssen wir die DOS-Lib wieder 
schließen. Beendet wird das Programm mit 


ende: rts 

damit zur DOS-Ebene zurückgekehrt wird. 

Jetzt können wir uns an unserem ersten CLI-Text, von einem 
Assembler-Programm ausgegeben, erfreuen. Nachdem wir nun 
Text schreiben können, wäre es doch schön, auch etwas von 
der Tastatur einiesen zu können. Damit kommen wir zum zwei¬ 
ten Programm. 


3.3.2 Texteingabe von Tastatur 

Zu diesem Zweck brauchen wir zuerst zwei neue Library-Routi¬ 
nen. Zum einen die Input-Routine: 
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Input = -54 (DOS-Library) 

*file dO > Handle der Tastatur 

Erklärung Ermittelt das Standard-Input-Handle 


Die Tastatur (also das Standard-Eingabegerät) hat, genauso 
wie das CLI-Fenster, ein Handle. Neben der Write-Routine 
gibt es natürlich auch Read: 


Read = -42 (DOS-Library) 


*file 

dl 

< 

Handle 

der zu lesenden 

Datei 

*buffer 

d2 

< 

Startadresse des Lese- 

Puffers 

length 

d3 

< 

Anzahl 

Datenbytes 


reallyread 

dO 

> 

Anzahl 

wirklich 

gelesener 


(-l=Fehler) 


Erklärung Liest Daten aus einer Datei 

So vorbereitet können wir uns an das Programm wagen: 


* Programm 3.2: 

Eingabe über Tastatur 

ExecBase = 

4 


OpenLib = 

-552 


CloseLib 

-414 


Write = 

-48 


Read = 

-42 


Output = 

-60 


Input = 

-54 


* DOS-Lib öffnen 

move.1 

ExecBase,a6 

Exec-Lib-Basis 

lea 

dosname,al 

Name der DOS-Lib 

clr.l 

dO 

Version egal 

jsr 

OpenLib(a6) 

Lib öffnen 

tst.l 

dO 

Fehler beim öffnen? 

beq 

ende 

Wenn ja, zum Ende 

move.1 

dO ,a6 

Basis DOS-Lib nach a6 

* Output-Handle holen 


jsr 

Output(a6) 

Output-Handle holen 

move.1 

d0,d5 

Handle in d5 sichern 
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* Eingabeaufforderung ausgeben 

move.l d5,dl ; Output-Handle nach dl 

move.l #textl,d2 ; Textbeginn nach d2 

move.l |26,d3 ; Textlänge nach d3 

jsr Write(a6) ; DOS-Routine Schreiben 

* Text über Tastatur einiesen 

jsr Input(a6) ; Input-Handle holen 

move.l dO,dl ; nach dl 

move.l #buffer,d2 ; Start des Eingabe-Puffers 
move.l #40,d3 ; 40 Zeichen max. 

jsr Read(a6) ; Lesen 

move.l d0,d4 ; Anzahl gelesener Zeichen 

; in d4 Zwischenspeichern 

* Text ausgeben 

move.l d5,dl ; Output-Handle nach dl 

move.l #text2,d2 ; Textbeginn nach d2 

move.l #23,d3 ; Textlänge nach d3 

jsr Write(a6) ; DOS-Routine Schreiben 

* Jetzt Pufferinhalt schreiben 

move.l d5,dl ; Output-Handle nach dl 

move.l #buffer,d2 ; Textbeginn nach d2 


move.1 

d4,d3 ; 

Textlänge nach d3 

jsr 

Write(a6) ; 

DOS-Routine Schreiben 

* Programmschluß 

: Lib schließen! 


move.1 

a6,al ; 

Basis DOS-Lib 

move.1 

4,a6 

Exec-Basis 

jsr 

CloseLib(a6) ; 

Lib schließen 

ende: rts 

/ 

Zum CLI 

* Datenbereich: 

diverse Namen etc. 


dosname: dc.b "dos.library",0 

even 

dosbase: ds.l 1 

textl: dc.b "Bitte geben Sie Text ein: " 

even 

text2: dc.b "Sie haben geschrieben: " 

even 

buffer: ds.b 40 

Programm 3.2: Texteingabe von der Tastatur 


Neu an diesem Programm ist, daß wir die DOS-Basis nicht in 
einer Variablen sichern, sondern direkt nach a6 schreiben 
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und zum Schließen von dort nach al holen. Das geht, wenn man 
nur mit einer geöffneten Library arbeitet. 

Das Output-Handle sichern wir jetzt im Register d5. Dort ist 
es genauso sicher wie in einer Variablen. Man sollte nur bei 
der Wertesicherung nicht zu viel mit Registern herumhantie¬ 
ren, sonst verliert man schnell den überblick, in welchem 
Programmteil welche Register verändert werden. In diesem Zu¬ 
sammenhang ist übrigens wichtig, daß die Register aO, al, do 
und dl als "Schmierpapier" ("Scratch") gelten und von Li¬ 
brary-Routinen verändert werden können. Sie dürfen also 
nicht erwarten, daß diese vier Register nach einem Aufruf 
noch die selben Werte enthalten wie vorher. Alle anderen 
Registerinhalte bleiben allerdings erhalten. 

Nach der Ausgabe der Eingabeaufforderung holen wir uns das 
Input-Handle der Tastatur und rufen die Read-Routine auf. 
Als Parameter bekommt sie die Startadresse eines 40-Byte- 
Puffers, den wir im Datenbereich reserviert haben, und eine 
40 als Datenlänge. Als Rückgabewert erhalten wir die Anzahl 
Zeichen, die eingetippt wurden (inklusive des abschließenden 
Return-Tastendrucks). Diese Zahl merken wir uns in d4: 


move.1 

dO,dl 

#buffer,d2 

; nach dl 

move.1 

; Start des Eingabe-Puffers 

move.1 

#40,d3 

; 40 Zeichen max. 

jsr 

Read(a6) 

; Lesen 

move.1 

d0,d4 

; Anzahl gelesener Zeichen 
; in d4 Zwischenspeichern 


Gewöhnlich sollte man Rückgabewerte von Library-Routinen im¬ 
mer sichern. Hier können wir allerdings das Input-Handle, 
das wir in do bekommen, direkt nach dl weiterleiten, da wir 
es ohnehin nur einmal (zum Lesen) brauchen. 

Nun geben wir einen zweiten Text aus und direkt dahinter den 
Inhalt des Eingabepuffers. Die Datenlänge wissen wir noch 
vom Read-Aufruf (sie entspricht der Anzahl der eingegebenen 
Zeichen). Der Rest des Programms läuft wie gehabt. 


3.3.3 Die Kommandozeile 

Die meisten CLI-Befehle brauchen Parameter, die hinter den 
Befehlsnamen geschrieben werden, z.B.: 

copy dfO:text to dfl: 

Diesen Parametertext hinter dem Befehl nennt man 
"Kommandozeile". Auch in unseren Assembler-Programmen können 
yi r diese Kommandozeile auswerten. Beim Programmstart steht 
in aO ein Zeiger auf den Kommandozeilentext und in do seine 
Länge (einschließlich des Return-Zeichens am Ende). 
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Da wir schon Text im CLI-Fenster ausgeben können und nun 
über die Kommandozeile Bescheid wissen, ist es ein Leichtes, 
den CLI-Befehl "Echo" nachzuvollziehen. Dieser schreibt ja 
lediglich exakt den Text der Kommandozeile ins Fenster. Fol¬ 
gendes Programm erfüllt die selbe Aufgabe wie Echo: 


* Programm 3.3: Ausgabe der Kommandozeile (Echo-Befehl) 


ExecBase 

= 

4 


OpenLib 

= 

-552 


CloseLib 

i = 

-414 


Output 

= 

-60 


Write 

= 

-48 



movem.l 

a0/d0,-(sp) 

; Kommandozeile sichern 


move.1 

ExecBase,a6 

; DOS-Lib öffnen 


lea 

dosname,al 



clr.l 

dO 



jsr 

OpenLib(a6) 



move.1 

d0,a6 



jsr 

Output(a6) 

; Output-Handle holen 


move.1 

d0,dl 

; und nach dl für Write 


movem.l 

(sp)+,a0/d0 

; Kommandozeile zurückholen 


move.1 

a0,d2 

; Aufruf Write-Routine 


move.1 

d0,d3 



jsr 

Write(a6) 



move.1 

a6,al 

; Library wieder schließen 


move.1 

ExecBase,a6 



jsr 

CloseLib(a6) 



rts 


; Zum CLI 

* Datenbereich 



dosname: dc.b "dos.library",0 


even 


Programm 3.3: Ausgabe der Kommandozeile 


Bevor wir die DOS-Lib öffnen, müssen wir den Inhalt von aO 
und do sichern, da diese Register durch Library-Aufrufe ver¬ 
ändert werden. Als Sicherungsort wählen wir den Stack, auf 
den wir die Register mit dem schon besprochenen Befehl MOVEM 
schreiben: 

movem.l aO/dO,-(sp) ; Kommandozeile sichern 
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Nach dem Öffnen der Library und dem Abholen des Output-Hand¬ 
ies holen wir uns die Kommandozeilen-Register zurück: 

movem.l (sp)+,aO/dO ; Kommandozeile zurückholen 

Beim Library-Öffnen verzichten wir diesmal auf den Fehler- 
Test. Normalerweise sollte man Fehler natürlich abfangen, 
aber die Chance, daß die DOS-Lib nicht geöffnet werden kann, 
ist gleich Null. 

Nun leiten wir die Kommandozeilen-Register an die von Write 
geforderten Parameter-Register weiter und rufen Write auf: 

move.l a0,d2 ; Aufruf Write-Routine 

move.l d0,d3 
jsr Write(a6) 

Das war's auch schon. Damit ist unser eigener Echo-Befehl 
fertig. 


3.4 Schleifen in Assembler 

Nachdem wir nun Grundlagen zur Textein- und -ausgabe 
kennengelernt haben, können wir uns mit diversen 
Programmier-Techniken beschäftigen. Als erstes kommen wir zu 
den Schleifen-Konstruktionen. 


3.4.1 Die REPEAT- und die WHILE-Schleife 

Man stelle sich folgendes vor: Ein Puffer von 95 Bytes Größe 
soll mit den ASCII-Zeichen 32 (Leertaste) bis 126 (""", ge¬ 
nannt "Tilde") gefüllt werden. Dann müßte man, ohne 
Verwendung einer Schleife, jedes Zeichen einzeln in den Puf¬ 
fer schreiben, also etwa so: 


lea buffer,aO 
move.b #32,(a0)+ 
move.b #33,(aO)+ 
move.b #34,(a0)+ usw. usw. 


Bild 3.3: Einen Puffer füllen ohne Schleife 


Das wäre wohl ein recht aufwendiges Verfahren. Besser ist 
die Programmierung einer Schleife, deren Zähler von 32 bis 
126 läuft und jeweils nach ' (a0) + ' geschrieben wird. 
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In Sprachen wie PASCAL oder C gibt es dafür die REPEAT- 
Schleife (Wiederhole die Anweisung solange bis eine 
definierte Bedingung zutrifft) und die WHILE-Schleife 
(Solange die definierte Bedingung zutrifft, wiederhole die 
Anweisung). Der Unterschied zwischen diesen beiden Typen ist 
der, daß die Bedingung bei WHILE vor und bei REPEAT nach dem 
Schleifenkern geprüft wird. Eine REPEAT-Schleife wird also 
mindestens einmal durchlaufen, eine WHILE-Schleife nicht 
unbedingt. 


Diese Konstruktionen lassen sich natürlich auch in Assembler 
übertragen. In unserem Beispiel 'Puffer füllen' könnte man 
schreiben: 


lea 

buffer,aO 

move.b 

#32,dO 

move.b 

dO,(a0)+ 

addq 

#l,dO 

cmp.b 

#127,dO 

blt 

ml 


Bild 3.4: Puffer füllen per REPEAT-Schleife 


Das heißt also: schreibe dO nach ’(a0)+', erhöhe es dann um 
eins und wiederhole das ganze, solange dO kleiner als 127 
ist. Das wäre die Lösung als REPEAT-Schleife . (Prüfung der 
Bedingung am Ende). Eine WHILE-Lösung ist hier nicht so 
sinnvoll, da man WHILE nur einsetzt, wenn die Schleife even¬ 
tuell gar nicht durchlaufen werden darf. Aber zu Demonstra¬ 
tionszwecken wollen wir sie uns trotzdem anschauen: 


lea 

buffer,aO 

move.b 

#32,dO 

cmp.b 

#126,dO 

bgt 

m2 

move.b 

dO,(a0)+ 

addq 

#1 ,d0 

bra 

ml 


m2: 


Bild 3.5: Puffer füllen per WHILE-Schleife 

Hier wird vor dem Puffer-MOVE geprüft, ob dO größer ist als 
126, und wenn ja, wird nach m2 (hinter der Schleife) ver¬ 
zweigt . 
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3.4.2 Die DBCC-Schleife 

Dieser Schleifentyp entspricht der FOR-Schleife in anderen 
Sprachen. FOR wiederholt einen Programmteil so oft wie 
angegeben, ohne daß eine Abbruchsbedingung gestellt wird. In 
Assembler sind wir da aber sogar etwas nobler, wir können 
neben der Durchlaufsanzahl auch noch eine Abbruchsbedingung 
angeben. 

Man verwendet dazu den DBCC-Befehl, der eine Sonderform des 
BCC-Befehl darstellt. Wir erinnern uns: BCC heißt "Branch on 
Condition Code", also "Verzweige über einen Bedingungscode". 
DBCC heißt nun "Decrement and Branch on Condition Code", 
also "Erniedrige und Verzweige über einen Bedingungscode". 
Erniedrigt wird hier ein Datenregister. Die DBCC-Schleife 
wird solange wiederholt, bis entweder das Datenregister auf 
-1 gelaufen ist oder die Bedingung nicht mehr zutrifft, wo¬ 
bei die Bedingungscodes denen von BCC entsprechen. Beispiel: 

cmp.b #10,do 
dbeq dl,marke1 

Dl wird erniedrigt, und es wird solange zu 'markel' zurück¬ 
gesprungen, bis dl=-l ist oder der 'eq'-Vergleich nicht mehr 
zutrifft, do also <> 10 ist. Die DBCC-Vergleiche beziehen 
sich, genauso wie bei BCC, auf den Zustand der Flags, wes¬ 
halb auch hier der Vergleichsbefehl unmittelbar vor dem DBCC 
stehen sollte. 

Oft braucht man den Bedingungscode gar nicht, man will also 
nur eine bestimmte Anzahl von Schleifendurchläufen haben. In 
diesem Fall schreibt man anstatt DBCC einfach DBRA, das 
heißt "Decrement and Branch Always" - Erniedrige und Ver¬ 
zweige immer (d.h. natürlich nur, solange das Datenregister 
noch nicht -1 ist). Beispiel: 

dbra d0,marke2 

Solange do noch nicht -1 ist, wird zu marke2 verzweigt, ohne 
eine Bedingung zu prüfen. Eine andere Schreibweise für DBRA 
ist 'DBF': 

dbf d0,marke2 

Natürlich muß vor dem Schleifenbeginn das Datenregister mit 
der gewünschten Anzahl von Schleifendurchläufen belegt wer¬ 
den. Genauer gesagt, mit der Anzahl minus eins, da DBCC ja 
bis -1 läuft. Um einen Programmteil 10 mal durchlaufen zu 
lassen, schreibt man also folgendes: 


move.w 

#9,d0 

dbra 

dO,ml 
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Das Datenregister wird von DBCC immer nur als Wort angespro¬ 
chen, weshalb man beim Belegen '.w' verwenden kann. Die ma¬ 
ximale Anzahl Schleifendurchläufe beträgt also 65536, für 
eine größere Anzahl muß man verkettete Schleifen verwenden. 

Zum Abschluß noch unser Beispiel mit dem ASCII-Puffer in der 
DBCC-Version: 


lea 

buffer,aO 

move.w 

#94,dO 

move. b 

#32,dl 

move. b 

dl,(aO)+ 

addq 

#1 ,dl 

dbra 

dO,ml 


Bild 3.6: Puffer füllen mit DBRA 


Jetzt brauchen wir zwei Datenregister, eins mit dem derzei¬ 
tigen ASCII-Wert und eins als Schleifenzähler. Die Schleife 
soll 95 mal durchlaufen werden, also laden wir do mit 94 
(DBCC läuft bis -1). Der Rest dürfte eigentlich klar sein. 


3.4.3 Zeichen entfernen mit DBCC 

Zur Vorbereitung auf das nächste Programm wollen wir uns 
jetzt noch anschauen, wie man mit einer DBCC-Schleife ein 
Zeichen aus einer bestehenden Zeichenkette entfernt. Folgen¬ 
des sei die Aufgabe: Wir haben a3 mit einem Zeiger auf einen 
50 Byte langen Puffer geladen, und jetzt soll das 14. Zei¬ 
chen aus diesem Puffer entfernt (und der Rest dabei aufge¬ 
rückt) werden. 

Die Lösung: Wir kopieren, angefangen beim 15. Zeichen bis 
zum Ende des Puffers, jeweils das derzeitige Zeichen in das 
vorhergehende. Das 14. Zeichen wird dabei überschrieben, und 
das 50., das hinterher doppelt vorhanden ist, überschreiben 
wir mit 0. Wie oft muß die Schleife dazu durchlaufen werden? 
Vom 14. bis zum 50. haben wir 37 Zeichen. Da wir aber damit 
anfangen, das 15. Zeichen ins 14. zu kopieren, müssen wir 36 
mal kopieren. Da DBCC bis -1 läuft, kommt eine 35 ins Zähl- 
Datenregister. Das folgende Programm stellt die Lösung vor: 


lea 

buffer,a3 

move.w 

#35,dO 

lea 

15(a3),a0 

lea 

-l(aO),al 

move.b 

(a0)+,(al)+ 

dbra 

dO,ml 

clr ,b 

(aO) 


Bild 3.7: Zeichen aus Puffer entfernen mit DBRA 
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Wir belegen das Datenregister aO mit der Quelle des Kopier¬ 
vorgangs und al mit dem Ziel. Die etwas komisch wirkenden 
LEA-Befehle sind durchaus sinnvoll: Das ' lea 15(a3),a0‘ be¬ 
deutet: Nehme die Adresse in a3 (der Pufferbeginn), zähle 15 
dazu und schreibe die neue Adresse nach aO (also das Quell- 
Register). Mit den Befehlen 

move.l a3,a0 

add.l #15,aO 

hätte man natürlich dasselbe erreicht, aber der LEA-Befehl 
ist schneller und kürzer. Der zweite LEA bewirkt, daß die 
Zieladresse in al genau eins niedriger ist als die 
Quelladresse, und so soll es ja auch sein. Die Schleife sel¬ 
ber ist dann ganz einfach: Sie besteht aus nur einem MOVE- 
Befehl, der den Inhalt der Adresse in aO in die Adresse in 
al kopiert (als Byte) und dabei aO und al automatisch um 
eins erhöht. Der CLR-Befehl nach der Schleife dient zum Lö¬ 
schen des 50., nunmehr doppelt vorhandenen Zeichens. 


3.5 Kommandozeile mit Sonderzeichen 

Zur Übung und Anwendung der Schleifentechniken wollen wir 
uns jetzt noch einmal unser Echo-Programm vornehmen. Die 
CLI-Version dieses Befehls bietet nämlich die Möglichkeit, 
über die Zeichenkombination ' *n' eine neue Zeile zu beginnen 
und über ' *e' ein Escape-Zeichen (Einleitungszeichen für 
Steuerkommandos wie Fett, Unterstrichen usw.) zu drucken. 
Wir wollen unser Programm dahingehend verbessern. 

Das Verfahren besteht darin, den eingegebenen Text nach 
Sternchen zu durchsuchen. Haben wir eins gefunden, müssen 
wir dieses und das darauf folgende Zeichen (n oder e) durch 
einen Return- bzw. Escape-Code (also nur ein Zeichen) erset¬ 
zen. Das heißt, wir müssen auf jeden Fall schonmal ein Zei¬ 
chen aus dem Text entfernen. Dann wandeln wir das andere 
Zeichen entsprechend um (der ASCII-Code von Return ist 10 
und von Escape 27). Falls das Zeichen nach dem Stern weder n 
noch e war, lassen wir es, wie es ist. Um einen Stern im 
Text zu drucken, muß man dann also '**' eingeben. 

Hier das Programm: 


* Programm 3.4: Kommandozeile mit Sonderzeichen 


ExecBase 

= 

4 

OpenLib 

= 

-552 

CloseLib 

= 

-414 

Output 

= 

-60 

Write 

= 

-48 
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movem.l 

aO/dO,-(sp) 

; Kommandozeile sichern 


move. 1 

ExecBase,a6 

; DOS-Lib öffnen 


lea 

dosname,al 



clr.l 

dO 



jsr 

OpenLib(a6) 



move. 1 

d0,a6 



jsr 

Output(a6) 

; Output-Handle holen 


move. 1 

d0,d5 

; und in d5 sichern 


movem. 1 

(sp)+,a4/d4 

; Kommandozeile zurückholen 
; nach a4/d4 

* DBCC 

-Schleife 

vorbereiten 



move.1 

a4,a2 

; Kommandozeile zur Bearbei- 


move. 1 

d4,dl 

; tung nach a2/dl 


subq 

#l,dl 

; Da DBCC bis -1 läuft 

* Hauptschleife 

Suche nach '*' 


labl: 

cmp.b 

#"*",(a2)+ 

; gefunden? 


beq 

lab2 

; Wenn ja, Sprung 


dbra 

dl,labl 

; Schleifen-Ende 


bra 

ausg 

; Zur Ausgabe 

* Ein 

Zeichen aus Text entfernen 

lab2: 

move.1 

dl,dO 

; Innerer Schleifenzähler dl 


subq 

#1, dO 

; auf dO minus 1 setzen 


move. 1 

a2,a0 

; Quell-Textzeiger 


lea 

-l(aO),al 

; Ziel-Textzeiger 

lab3: 

move. b 

(a0)+,(al)+ 

; Verschiebe-Schleife 


dbra 

d0,lab3 


* Test 

, ob 'e 1 oder 'n' auf den 

Stern folgte 


lea 

-1(a2),a0 

; -1 wegen '(a2)+' bei der 
; Suche nach '*' 


cmp.b 

f"e",(aO) 

; 'e' gefunden? 


beq 

lab4 

; Wenn so 


cmp.b 

#"n",(aO) 

; Oder 'n'? 


beq 

lab5 

; Dann dahin 


bra 

lab6 

; Nichts gefunden 

* Ersetzen des 

e' bzw. 'n' durch Esc bzw. Return 

lab4: 

move. b 

127,(aO) 

; ' e' durch Esc ersetzen 


bra 

lab6 


lab5: 

move.b 

#10,(aO) 

; 'n' durch Return ersetzen 

* Schleifenzähler und Textlänge 

anpassen 

lab6: 

subq 

#2,dl 

; Schleifenzähler minus 2 


subq 

#l,d4 

; Textlänge minus 1 
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bra 

labl 

; Zur Hauptschleife 

move.1 

d5,dl 

; Ausgabe des Textes 

move.1 

a4,d2 


move.1 

d4,d3 


jsr 

Write(a6) 


move. 1 

a6,al 

; Lib schließen und 1 

move.1 

ExecBase,a6 


jsr 

rts 

CloseLib(a6) 



* Datenbereich 

dosname: dc.b "dos.library",0 

even 

Programm 3.4: Kommandozeile mit Sonderzeichen 


Zu diesem Programm ist sicherlich noch einiges zu sagen. Bis 
zu dem Befehl 

movem.l (sp)+,a4/d4 ; Kommandozeile zurückholen 

dürfte noch alles klar sein. Mit dem MOVEM-Befehl werden 
Start und Länge der Kommandozeile vom Stack geholt, aller¬ 
dings in andere Register als die, von denen sie kamen. Das 
ist grundsätzlich immer möglich; Registerinhalte, die auf 
den Stack gelegt wurden, brauchen nicht in genau die selben 
Register zurückgeschrieben zu werden. Man muß nur auf ihre 
Reihenfolge achten. Wir schreiben die Kommandozeile hier 
nach a4 und d4, da wir sie bearbeiten (und damit verändern) 
müssen, aber auch die Ausgangswerte später noch brauchen. 

Als nächstes wird die Hauptschleife - die Suche nach den 
Sternchen - vorbereitet. Wir holen die Kommandozeile von den 
"Sicherungsregistern" a4 und d4 in "Arbeitsregister" a2 und 
dl. A2 zeigt also während der Schleife immer auf das Zeichen 
der Kommandozeile, das gerade bearbeitet wird, und dl ver¬ 
wenden wir als Schleifenzähler. Es enthält jeweils die 
Anzahl der noch zu bearbeitenden Zeichen. Da die DBCC- 
Schleife bis -1 läuft, müssen wir dl um eins verkleinern. 

Nun folgt die Hauptschleife: 

labl: cmp.b #"*",(a2)+ ; gefunden? 

beq lab2 ; Wenn ja, Sprung 

dbra dl,labl ; Schleifen-Ende 

bra ausg ; Zur Ausgabe 
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Der CMP-Befehl prüft, ob das aktuelle Zeichen ein Stern ist. 
Vielleicht verwundert es Sie, daß wir hier einfach "*" 
schreiben können und nicht den ASClI-Code des Sterns als 
Zahl verwenden müssen. Bei guten Assemblern ist dies mög¬ 
lich. Bei diesem Test wird das Zeige-Adreßregister auch so¬ 
fort um eins vergrößert. Wenn ein Stern gefunden wurde, wird 
nach 'lab2' verzweigt, ansonsten erfolgt der Schleifen-Rück- 
sprung nach ’labl'. Nach dem Ende der Schleife wird zum Aus¬ 
gabe-Programmteil verzweigt. 

Wenn nun ein Stern gefunden wurde, muß zunächst ein Zeichen 
aus dem Text entfernt werden, da die Kombinationen '*n' bzw. 
1 *e 1 (zwei Zeichen) ja in ein Zeichen (Return bzw. Esc) um¬ 
gewandelt werden. Dazu schreiben wir eine innere Schleife, 
die in den Zeilen 


lab2: 


move.l dl,dO 
subq #l,dO 

move.l a2,a0 
lea -l(aO),al 


; Innerer Schleifenzähler dl 
; auf dO minus 1 setzen 
; Quell-Textzeiger 
; Ziel-Textzeiger 


vorbereitet wird. Das Verfahren zum Entfernen eines Zeichens 
kennen wir ja schon. Unser Quell-Zeichen ist diesmal a2, un¬ 
ser Hauptschleifen-Zeiger (der durch das ’(a2)+' im CMP-Be¬ 
fehl ja schon auf dem nächsten Zeichen steht), und das Ziel 
ist Quellzeichen minus 1. 


Der innere Schleifenzähler dO wird auf 'Hauptschleifenzähler 
minus 1' gesetzt. Das 'minus 1' ist nötig, weil der Haupt¬ 
schleifenzähler noch nicht erniedrigt wurde (der DBRA-Befehl 
wird in der Hauptschleife übersprungen, wenn ein Stern ge¬ 
funden wird). 

Jetzt folgt der Kern der inneren Schleife. Er umfaßt die 
Zeilen 


lab3: move.b (aO)+,(al)+ ; Verschiebe-Schleife 

dbra d0,lab3 

Also genau das selbe Verfahren wie im vorigen Beispiel-Pro¬ 
gramm. 

Nun haben wir ein Zeichen (nämlich den Stern) entfernt und 
können fortfahren. Wir müssen jetzt prüfen, ob auf den Stern 
ein 'n' oder ein 'e' folgte. Dazu holen wir uns mit 


lea -l(a2),a0 ; -1 wegen '(a2)+' bei der 

; Suche nach '*' 


die Adresse des gefragten Zeichens nach aO. Jetzt kommen die 
Vergleiche: 


cmp.b #"e",(aO) 

beq lab4 

cmp.b #"n",(aO) 


; 'e' gefunden? 
; Wenn so 
; Oder 'n'? 
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beq 

lab5 

; Dann dahin 

bra 

lab6 

; Nichts gefunden 

Diese Zeilen 
folgenden: 

dürften 

eigentlich klar sein, ebenso 

lab4: move.b 

#27,(aO) 

; ’e' durch Esc ersetzen 

bra 

lab6 


lab5: move.b 

#10,(aO) 

; 1 n' durch Return ersetzen 

Zum Abschluß 

der Sternchen-Bearbeitung müssen noch 

Schleifenzähler und Textlänge angepaßt werden: 

lab6: subq 

#2,dl 

; Schleifenzähler minus 2 

subq 

#l,d4 

; Textlänge minus 1 


Die Zeile 'Textlänge minus 1' dürfte klar sein. Der 
Schleifenzähler muß um zwei erniedrigt werden, weil wir den 
DBRA-Befehl überspringen, der normalerweise die Reduzierung 
um eins übernimmt, und außerdem der Text ein Zeichen kürzer 
geworden ist. Dann folgt der Rücksprung zur Hauptschleife. 


Der Rest des Programms (Ausgabe des neuen Textes und Lib 
schließen) läuft wie bisher. 


Damit wäre die Anpassung unseres Echo-Befehls an die CLI- 
Version abgeschlossen. Im Einleitungstext zum Programm wurde 
erwähnt, daß das Escape-Zeichen als Einleitungszeichen für 
spezielle Steuerkommandos gilt. Diese Steuerkommandos sind 
eine recht interessante Sache, deshalb wollen wir uns nun 
kurz damit beschäftigen, bevor wir weitergehen. 


3.5.1 Die ANSI-Steuerkommandos 

ANSI steht für "American National Standard Institute", was 
etwa dem deutschen DIN entspricht. Tatsächlich stimmen die 
ANSI-Steuerkommandos auf dem Amiga und den PCs größtenteils 
überein. Beim Amiga beginnt ein ANSI-Kommando immer mit der 
Zeichenfolge 'ESC[' (ESC-Taste plus eckige Klammer auf). Das 
ESC-Zeichen bewirkt, daß die folgenden Zeichen nicht so, wie 
sie sind, ins Fenster geschrieben werden, sondern daß die 
ganze Zeichenfolge als Steuerkommando interpretiert wird. 
Ein interessantes Beispiel ist das Kommando 'ESC[nT'. Es 
scrollt das Ausgabe-Fenster um n Zeilen nach unten, wobei n 
als ASCII-Zeichen eingegeben werden muß. Probieren Sie es 
doch einmal: Geben Sie unserem Echo-Befehl die Kommandozeile 

*e[10T (das *e wird durch ein ESC-Zeichen ersetzt) 

Daraufhin wird das Ausgabefenster um 10 Zeilen nach unten 
gescrollt. Einige ANSI-Kommandos wollen wir hier zum 
Experimentieren vorstellen, eine komplette Liste finden Sie 
im Anhang. Wenn Sie in der folgenden Tabelle einen 
Kleinbuchstaben finden, der nicht am Ende einer Sequenz 
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steht, müssen Sie an dieser Stelle eine Zahl, die als ASCII- 
Zeichen einzugeben ist, einfügen. 

ANSI-Sequenz Wirkung 


ESC[z;sH 
ESC [ J 
ESC [ K 
ESC [ L 
ESC[0 p 
ESC [ p 


Setzt den Cursor in Zeile z, Spalte s 
Fenster ab Cursorzeile löschen 
Zeile ab Cursor löschen 

Eine Zeile an der Cursorposition einfügen 
Cursor ausschalten 
Cursor einschalten 


Wie gesagt ist dies nur eine Auswahl aus allen verfügbaren 
ANSI-Sequenzen. Wenn Sie alle kennenlernen wollen, schauen 
Sie bitte in den Anhang. 


3.6 Umrechnung von Zahlensystemen 

Bis jetzt können wir die Inhalte der Register oder auch von 
Speicherstellen nicht direkt als Zahlen auf dem Bildschirm 
ausgeben, da sie eben als Zahl vorliegen, die Write-Routine 
aber ASCII-Text verlangt. Beispiel: Wenn in einem Register 
die Zahl 1 steht, darf nicht einfach eine 1 ausgegeben wer¬ 
den, sondern es muß der ASCII-Code der 1 sein (und der ist 
49). Als nächstes wollen wir uns daher mit der Umrechnung 
von Hex- oder Dezimal-Zahlen in ASCII-Texte und umgekehrt 
befassen. Zunächst der einfachste Fall: 


3.6.1 Umrechnung Hex-Zahl -> ASCII-Text 

Eine Hex-Zahl muß auf dem Bildschirm natürlich stellenweise 
ausgegeben werden, weshalb wir sie auch stellenweise bear¬ 
beiten müssen. Mit anderen Worten, wir müssen jeweils eine 
Stelle der Zahl isolieren und dann umrechnen. Das Umrechnen 
geschieht einfach durch Aufaddieren des ASCll-Codes von '0' 
(ASCII-Code 48). Zur Isolierung der Stellen benutzt man im 
Falle der Hex-Zahl am besten die Bitmanipulations-Befehle. 
Als Beispiel wollen wir die Zahl $45AB in einen ASCII-Text 
umwandeln. 

Eine Hex-Stelle entspricht bekanntlich 4 Binär-Steilen (auch 
1 Nibble genannt). Die einfachste Methode der Isolierung ist 
also, nur das unterste Nibble der Zahl zu betrachten. Da 
aber die höchste Hex-Stelle der Zahl zuerst ausgegeben 
werden soll, müssen wir die die höchste Stelle an die 
Position der niedrigsten bringen. Das geht am besten mit dem 
ROL-Befehl. Wir erinnern uns: Der ROL-Befehl schiebt alle 
Binärstellen einer Zahl nach links, und die links her¬ 
ausfallenden Stellen werden rechts wieder eingespeist. Die 
Zahl $45AB heißt in binär %0100010110101011. Nach einem 
Linksrotieren um vier Stellen wird daraus %0101101010110100, 
die vier höchsten Binärstellen (bzw. die höchste Hex-Stelle) 
sind also nach "ganz unten" gewandert. 
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Von der Zahl wollen wir aber zunächst nur das unterste 
Nibble haben, der Rest wirkt sich recht störend aus. Aus 
diesem Grund kommt jetzt der logische Befehle AND ins Spiel. 
Im zweiten Kapitel haben wir erfahren, daß der AND-Befehl 
die beiden Eingangszahlen Bit für Bit vergleicht und das 
entsprechende Bit in der Ausgangszahl nur setzt, wenn beide 
Eingangsbits 1 waren. Mit dem AND-Befehl kann man also 
problemlos die überflüssigen Stellen "ausblenden". Man sagt 
auch, die Zahl wird "maskiert". Als Maske dient in unserem 
Fall die Binärzahl %000000000000llll. Folgende Rechnung wird 
durchgeührt: 

Zahl Vorher % 0101101010110100 
Masken-Wert AND % 0000000000001111 


Ergibt % 0000000000000100 

Durch die AND-Verknüpfung werden die Bits, die in der Maske 
auf 0 stehen, also auf jeden Fall 0, die übrigen bleiben un¬ 
verändert. So haben wir genau die Bits isoliert, die wir ha¬ 
ben wollten. Die unteren vier Binärstellen ergeben die Dezi¬ 
malzahl 4 (was ja auch die erste Stelle unserer Beispielzahl 
$45AB ist). Auf diese 4 addieren wir nun noch den ASCII-Wert 
von '0', also 48, und kommen damit auf 52, das dem ASCII- 
Wert von '4' entspricht. 

Dieses Verfahren wiederholen wir für die übrigen drei Hex- 
Stellen. Das nächste Problem ergibt sich mit der dritten 
Stelle ($A). $A ist in dezimal 10, wenn wir auf 10 die 
ASCII-'0' 48 aufaddieren, kommen wir auf 58. Nun ist aber 
der ASCII-Code für 'A' nicht 58, sondern 65. Wir müssen also 
den Fall 'Code größer als 57' abfangen, indem wir dann noch 
eine 7 hinzuaddieren. So kommen wir von der 58 auf die benö¬ 
tigte 65 . 

Nun das Verfahren als Assembler-Programm. Es erwartet in do 
die umzuwandelnde Zahl und in aO den Zeiger auf einen Puf¬ 
fer, der groß genug sein sollte (bis zu 8 Zeichen). Die Rou¬ 
tine kann Zahlen bis zur maximalen Größe (Langwort, 0 - 
4294967296) umwandeln. 



moveq 

#7,dl 

; Schleife: 8 Nibbles 

labl: 

rol. 1 

#4,d0 

; 1 Nibble durch Rotieren 
; ins unterste Nibble holen 


move. b 

d0,d2 

; Zur Bearb. umkopieren, da 
; Ursprungszahl noch ge- 
; braucht wird 


and.b 

#$f,d2 

; Zahl maskieren 


add.b 

#"0",d2 

; ASCII-Code von '0' 

; aufaddieren 


cmp.b 

#"9",d2 

; Größer als '9'? 


ble 

lab2 

; Wenn nein 


add.b 

#7,d2 

; Sonst in 'A'-'F' umrechnen 

lab2: 

move. b 

d2,(a0)+ 

; In Puffer schreiben 
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dbra dl,labl ; Schleifenende 

move.b #0,(a0) ; Endekennung 

Bild 3.8: Umrechnung Hex-Zahl in ASCII-Text 


Die Hex-Zahl $f in der AND-Zeile entspricht dem binären 
%0000000000001111, ist allerdings "etwas" kürzer. Der letzte 
MOVE-Befehl dient dazu, die umgerechnete Zahl im Puffer mit 
einem Null-Byte (als Endekennung) abzuschließen. Ansonsten 
dürfte das Programm wohl ziemlich klar sein. 


3.6.2 Umrechnung Dezimal-Zahl -> ASCII-Text 

So gut das hexadezimale Zahlensystem auch für den Umgang mit 
dem Computer geeignet ist, manchmal sind dezimale Zahlen 
doch praktischer, da es unser Gewohnheit entspricht. Zum 
Beispiel hätte wohl kaum jemand gerne die Größe des freien 
Speicherplatzes in hex angegeben. Aus diesem Grund schreiben 
wir nun eine Routine, die eine Zahl in einen Dezimal-ASCII- 
Text umwandelt. 

Der Nachteil des Dezimalsystems ist, daß es nicht so 
"computernah", also dem Binärsystem verwandt, ist wie das 
Hexadezimalsystem. Man kann z.B. nicht sagen, so viele 
Binärstellen entsprechen einer Dezimalstelle (zumindest wäre 
das keine ganze Zahl). Unsere Methode der Stellen-Isolierung 
von vorhin kann hier also nicht angewandt werden. 
Stattdessen führt man eine wiederholte Divison der 
umzuwandelnden Zahl durch, und zwar eine Division, die ein 
ganzzahliges Ergebnis und den Rest liefert. Zuerst dividiert 
man die Zahl durch 10000. Das Ergebnis ist die 10000er- 
Stelle. Den Divisionsrest (der auf jeden Fall kleiner als 
10000 ist) dividiert man durch 1000. Das Ergebnis dieser 
Division ist die lOOOer-Stelle, den Rest verarbeitet man 
weiter. Dieses Verfahren wird mit 100, 10 und 1 als Dividend 
durchgeführt. Auf diese Weise kann man alle Stellen der Zahl 
isolieren. 

Bleiben wir beim Beispiel von vorhin. Die Zahl $45AB lautet 
in dezimal 17835. An ihr wollen wir die Rechnung durchführen 
(DIV bedeutet ganzzahlige Division): 

17835 DIV 10000 = 1, Rest 7835 

7835 DIV 1000 = 7, Rest 835 

835 DIV 100 = 8, Rest 35 

35 DIV 10 = 3, Rest 5 

5 DIV 1=5, Rest 0 

Die solchermaßen isolierten Stellen können wir wieder durch 
Hinzuaddieren der ASCII-'0' in ASCII-Text umrechnen. Dabei 
brauchen wir diesmal sogar den Sonderfall 'A'-'F' nicht zu 
berücksichtigen, denn das gibt es ja nur im Hex-System. 
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Jetzt dürften wir wohl für das Programm gerüstet sein. Es 
erwartet wieder die Zahl in do und den Pufferbeginn-Zeiger 
in aO. 



clr.b 

d2 


move. 1 

#10000,dl 

labl: 

divu 

dl,dO 


move. b 

d0,d3 


tst.b 

d3 


beg 

lab2 


add.b 

#"0",d3 


move. b 

d3,(a0)+ 


moveg 

#l,d2 


bra 

lab3 

lab2: 

tst.b 

d2 


beg 

lab3 


move. b 

#"0",(a0)+ 

lab3: 

and. 1 

#$ffff0000,d0 


swap 

dO 


cmp.w 

#1 ,dl 


beq 

lab4 


divu 

#10,dl 


bra 

labl 

lab4: 

move.b 

#0,(a0) 


Flag führende Nullen 
Wertigkeit höchste Stelle 

Eine Stelle ausrechnen 
und isolieren 
Stelle = 0? 

Wenn ja, Sprung 

in ASCII-Zeichen umrechnen 

Zeichen in Puffer 

Setze Führende-Nullen-Flag 


Führende Null? 

Wenn ja, weglassen 
Keine führende Null 

Divisons-Rest isolieren 
und ins untere Wort 
Letzte Stelle bearbeitet? 
Wenn ja, Sprung 

Neue Stellenwertigkeit 
Rücksprung 

Endekennung 


Bild 3.9: Umrechnung Dezimal-Zahl in ASCII-Text 

In dl halten wir die Zahl, durch die jeweils dividiert wird. 
Beim ersten Durchlauf ist das 10000, beim zweiten 1000 usw. 
Die Umrechnung ist abgeschlossen, wenn die letzte Stelle be¬ 
arbeitet wurde (dl beim Durchlauf also 1 war). 

Erklärt werden muß noch die Sache mit dem "Führende-Nullen- 
Flag". Zu Beginn der Routine wird das Register d2 gelöscht. 
Sobald die erste Stelle ungleich Null in den Puffer kommt, 
wird es gesetzt (auf 1). Solange es also nicht gesetzt ist, 
sind alle Nullstellen, führende Nullstellen (Nullen vor der 
Zahl). Solche Nullstellen werden nicht mit in den Puffer 
geschrieben. Sobald die erste Nicht-Null-Stelle erscheint, 
müssen natürlich auch alle nachfolgenden Nullen in den Puf¬ 
fer. Dazu dient das Register d2. 

Noch ein Wort zum Divisionsrest: Der DIV-Befehl schreibt ja 
das Ergebnis ins untere und den Rest ins obere Wort eines 
Langwort-Registers. Das Ergebnis kann nach der Disision ein¬ 
fach mit einem MOVE.B-Befehl herausgeholt werden, da es ja 
sowieso nie größer als 9 sein kann: 

move.b d0,d3 ; und isolieren 
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Um nun an den Rest heranzukommen, wird zunächst das untere 
Wort durch AND-Maskierung mit $FFFF0000 ausgeblendet, dann 
wird das obere Wort mit dem unteren per SWAP-Befehl ver¬ 
tauscht : 

lab3: and.l #$ffff0000,dO ; Divisons-Rest isolieren 

swap dO ; und ins untere Wort 

Nach der Verkleinerung der Stellenwertigkeit mit 

divu #10,dl ; Neue Stellenwertigkeit 

erfolgt der Rücksprung zur Hauptschleife. 

3.6.3 Umrechnung Dezimal-Langwort -> ASClI-Text 

So weit, so gut. Die Routine hat nur einen entscheidenden 
Nachteil: Sie kann nur Zahlen von 0 bis 65535 (also Wort- 
Größe) bearbeiten, da der DIVU-Befehl das Ergebnis und den 
Rest der Division jeweils in ein Wort packen muß. Wenn wir 
ein Langwort umrechnen wollen, müssen wir uns etwas anderes 
überlegen. 

Das Verfahren kann im Prinzip beibehalten werden, nur die 
Division müssen wir anders realisieren. Schauen wir uns doch 
mal an, was Multiplikation und Division überhaupt bedeuten: 

Anstatt '3 * 5' kann ich auch '5 + 5 + 5' schreiben. Ebenso 
gibt das Ergebnis von '20 / 4' an, wie oft ich 4 aufaddieren 
muß, um auf 20 zu kommen. Daraus folgt, daß wir, anstatt un¬ 
sere umzurechnende Zahl durch die Stellenwertigkeiten zu di¬ 
vidieren, auch die Stellenwertigkeit solange von ihr abzie- 
hen können, bis es einen Unterlauf gibt. Somit wird die 
Stelle auch isoliert. Als Beispiel nehmen wir uns die Zahl 
13241 vor: 

1. Subtr.: 13241 - 10000 = 3241 

2. Subtr.: 3241 - 10000 = -6758 (Unterlauf) 

Die Subtraktion war einmal möglich, also ist die erste 
Stelle eine 1. Mit dem Rest (dem letzten vor dem Unterlauf) 
wird weitergerechnet: 


1. 

Subtr.: 

3241 - 

1000 = 2241 

2. 

Subtr.: 

2241 - 

1000 = 1241 

3 . 

Subtr.: 

1241 - 

1000 = 241 

4 . 

Subtr.: 

241 - 

1000 = -759 (Unterlauf) 


Da 3 Subtraktionen ohne Unterlauf möglich waren, ist die 
zweite Stelle eine 3. Jetzt dürfte das System wohl klar 
sein. Das Auftreten eines Unterlaufs bei der Subtraktion 
überwachen wir über das C-Flag (Carry), das bei Über- und 
Unterlaufen gesetzt wird. Schauen wir uns jetzt das zugehö¬ 
rige Programm an (wie immer Zahl in dO und Pufferzeiger in 
ao): 
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clr.b 

lea 

d2 

values,al 

labl: 

clr.b 

dl 

lab2: 

addq 
sub. 1 
bcc 

#l,dl 
(al),d0 
lab2 


add.l 

subq 

(al),d0 
*1 ,dl 


tst.b 

beq 

dl 

lab3 


add.b 
move. b 
moveq 
bra 

#"0",dl 
dl,(a0)+ 

#1 ,d2 
lab4 

lab3: 

tst.b 

beq 

move. b 

d2 

lab4 

f"0",(a0)+ 

lab4: 

cmp.l 

beq 

#1/(al) 

lab5 


add.l 

bra 

#4,al 

labl 

lab5: 

move. b 

#0,(a0) 


; Führende-Nullen-Flag 
; Tabelle der Wertigkeiten 

; Zähler für gelungene 
; Subtraktionen 
; Subtr.-Zähler erhöhen 
; Subtraktion durchführen 
; Wenn kein Übertrag, 

; nochmal subtrahieren 
; Letzte Subtr. und Zähler- 
; erhöhung rückgängig 

; Stelle = 0? 

; Wenn ja, Sprung 

; In ASCII umrechnen 
; In den Puffer 
; Führende-Nullen-Flag 


; Führende Null? 

; Wenn ja 

; Sonst Null in Puffer 

; Letzte Stelle bearbeitet? 
; Wenn ja 

; Nächste Wertigkeit 
; Zur Hauptschleife 

; Endekennung 


values: dc.l 1000000000,100000000,10000000 

de.1 1000000,100000,10000,1000,100,10,1 


Bild 3.10: Umrechnung Dezimal-Langwort in ASCII-Text 


Das Flag für die führenden Nullen arbeitet genauso wie im 
letzten Programm. Zur Stellenwertigkeits-Bestimmung ist fol¬ 
gendes zu sagen: Wir können jetzt nicht mehr einfach mit der 
größten Wertigkeit anfangen und diese dann jeweils für die 
nächste Stelle durch 10 teilen, da die größte Wertigkeit 
1000000000 ist, was die Wort-Beschränkung von DIVU eindeutig 
überschreitet. Wir verwenden daher eine Tabelle, in der die 
Wertigkeiten der einzelnen Stellen aufgeführt sind. Zu Be¬ 
ginn des Programms holen wir uns den Beginn dieser Tabelle 
nach al: 

lea values,al ; Tabelle der Wertigkeiten 
Auf die Wertigkeiten wird dann per ARI zugegriffen: 
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sub.l (al),dO ; Subtraktion durchführen 

Für die nächste Stelle wird einfach der Tabellenzeiger al um 
4 erhöht (da jede Wertigkeit ein Langwort, also vier Bytes, 
belegt): 

add.l #4,al ; Nächste Wertigkeit 


3.6.4 Umrechnung ASCII-Text -> Hex-Zahl 

Jetzt können wir also Zahlen, die irgendwo in unseren Pro¬ 
grammen Vorkommen, in "Klartext" umwandeln. Was nützlich 
wäre, sind Umwandlungsroutinen von Klartext-Zahlen (etwa aus 
CLI-Eingaben) in computerinterne Zahlen. Dazu kommen wir 
jetzt. 

Als erstes die Interpretation eines ASCII-Textes als Hex- 
Zahl . Dazu geht man quasi den umgekehrten Weg wie bei der 
Umrechnung Hex-Zahl -> ASCII-Text. Man nimmt sich Stelle für 
Stelle vor, rechnet den ASCII-Wert in eine Zahl um und 
schiebt die Stellen von rechts nach links in die Ergebnis¬ 
zahl hinein. Am besten schauen wir uns zuerst das Programm 
an, das erleichtert die Erklärungen. Es erwartet in aO den 
Zeiger auf den Puffer, in dem die ASClI-Zahl steht. Als En¬ 
dekennzeichen wird ein Null-Byte erwartet. In do steht hin¬ 
terher die umgerechnete Zahl: 


labl: 

clr .1 
move. b 

dO 

(aO)+,dl 

; Ergebnis löschen 
; Eine Stelle bearbeiten 


cmp.b 

blt 

bclr 

sub.b 

158,dl 
lab2 
#5,dl 
#7,dl 

; Stelle ’A'-'F'? 

; Wenn nein 
; Force Uppercase 
; Auf 10-15 umrechnen 

lab2: 

sub.b 

or.b 

move.b 

148,dl 

dO,dl 

dl,dO 

; ASCII- 1 0' abziehen 
; Mit oberem Nibble des 
; Ergebnisbytes verknüpfen 


tst.b 

beq 

(aO) 

lab3 

; Noch weitere Stellen? 

; Wenn nein 


rol.l 

bra 

#4,d0 

labl 

; Ergebniszahl rotieren 
; Rücksprung 

lab3: 





Bild 3.11: Umrechnung ASCII-Text in Hex-Zahl 


Es wird jeweils eine Stelle zur Bearbeitung nach dl geholt. 
Dabei wird aO automatisch erhöht. Wenn die Hex-Stelle ’A' — 
'F' war, muß zunächst mal ein Großbuchstabe "erzwungen" wer- 
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den (Force Uppercase). Das geschieht, indem das 5. Bit im 
ASCII-Code gelöscht wird: 

bclr #5,dl ; Force Uppercase 

Falls es schon vorher ein Großbuchstabe war, wurde dieses 
Bit sowieso gelöscht, und es ändert sich nichts. Im Falle 
von Kleinbuchstaben entspricht das Bitlöschen einer 
Subtraktion von 32, da die Wertigkeit der 5. Binärstelle 
(von 0 ab gezählt) 32 ist. Die ASCII-Codes der 
Kleinbuchstaben sind alle um 32 größer als die der 
entsprechenden Großbuchstaben, daher die Subtraktion. Dann 
wird vom ASCII-Code 7 abgezogen, damit er sich direkt an die 
Codes für 1 0 1 — '9 1 anschließt. 

Nun wird die ASClI-Zahl durch Abziehen von 48 (ASCII- 1 0') in 
eine "normale" Zahl umgerechnet. Diese Zahl muß guasi ganz 
rechts in die Ergebniszahl "eingeschoben" werden, wobei die 
schon vorhandenen Stellen nach links rutschen. Nach dem Ein¬ 
schieben der letzten ASCII-Stelle steht dann die erste 
ASCII-Stelle automatisch da, wo sie hin muß, nämlich an der 
höchsten Hex-Stelle. 

Das "Einschieben" geschieht, indem die Stellenzahl, die 
höchstens 15 beträgt (also ein Nibble groß ist), zuerst mit 
der schon vorhandenen Ergebniszahl OR-verknüpft wird und das 
Verknüpfungsergebnis als neue Ergebniszahl verwendet wird: 

or.b d0,dl ; Mit oberem Nibble des 
move.b dl,dO ; Ergebnisbytes verknüpfen 

Wir erinnern uns: Beim Umrechnen Hex-ASCII mußten wir eine 
AND-Verknüpfung durchführen, um das unterste Nibble der Zahl 
zu isolieren. Jetzt gehen wir den umgekehrten Weg: Wir ver¬ 
binden das neue Ergebnisnibble mit der schon vorhandenen 
Zahl. Dann wird die Ergebniszahl mittels 

rol.l #4,d0 ; Ergebniszahl rotieren 

um vier Binärstellen (also um eine Hex-Stelle) nach links 
geschoben (falls noch weitere Stellen folgen), damit das 
nächste Nibble unten Platz hat. Die folgende Grafik soll den 
Ablauf noch etwas deutlicher machen: 


Ausgangstext: 


Ergebniszahl: 



<-—ROL— 
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Ausgangstext: 

Ergebniszahl: 



<-ROL— 


Ausgangstext: 

Ergebniszahl: 



<-ROL- 


Ausgangstext: 


Ergebniszahl: 



Ausgangstext: 



Zahlwert: 



Ergebniszahl: 


A 1 B 2 



Die OR-Verknüpfung ist notwendig, da wir die neuen Nibbles 
ja in der Ergebniszahl einschieben müssen, ohne andere 
Nibbles in dieser zu überschreiben. Die kleinste 
"Ansprechgröße" für ein Register ist das Byte. Da wir ein 
halbes Byte hinzufügen wollen, aber nur byteweise zugreifen 
können, müssen wir die Verknüpfung der beiden Nibbles des 
untersten Bytes auf einer noch tieferen Ebene, eben auf Bit- 
Ebene mittels OR, durchführen. 


3.6.5 Umrechnung ASCII-Text -> Dezimal-Zahl 

Die Interpretation eines Textes als Dezimal-Zahl ist wieder 
etwas einfacher. Wir gehen auch hier den umgekehrten Weg wie 
bei der Umrechnung Zahl-Text. Jede ASCII-Stelle wird in eine 
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Zahl umgerechnet. Dann wird so oft, wie die Zahl angibt, die 
Stellenwertigkeit auf eine Hilfszahl (die vor jedem Stellen¬ 
durchlauf gelöscht wird) aufaddiert, und diese dann auf die 
Ergebniszahl. Hier das Programm (Pufferzeiger in aO, Text 
mit Nullbyte abgeschlossen, Ergebnis hinterher in dO): 



move. 1 

a0,al 

labl: 

tst.b 

(al) + 


bne 

labl 


sub.l 

#1 ,al 


clr.l 

dO 


lea 

values,a2 

lab2: 

clr.l 

d2 


clr.l 

d3 


move. b 

-(al),d2 


sub.b 

#"0",d2 


tst.b 

d2 


beg 

lab4 


subg 

#1 ,d2 

lab3: 

add.l 

(a2),d3 


dbra 

d2,lab3 


add.l 

d3,d0 

lab4: 

cmp.l 

a0,al 


beg 

lab5 


add.l 

#4,a2 


bra 

lab2 


String-Beginn kopieren 
String-Ende erreicht? 

Wenn nein 
Wegen '(al)+' 

Ergebnis löschen 
Wertigkeitstabelle 

Zwischenspeicher löschen 

Eine Stelle isolieren 
ASCII- 1 0 1 abziehen 
Stelle = 0? 

Wenn ja 

DBRA läuft bis -1 

Wertigkeit aufaddieren 
Schleifenende 

Auf Ergebnis aufaddieren 

Höchste Stelle erreicht? 
Wenn ja 

Stellenwertigkeit erhöhen 
Rücksprung 


lab5: 

values: dc.l 1,10,100,1000,10000,100000,1000000 

dc.l 10000000,100000000,1000000000 


Bild 3.12: Umrechnung ASCII-Text in Dezimal-Zahl 


Bei diesem Verfahren müssen wir die ASCII-Zahl "von hinten 
aufrollen", also bei der Stelle mit der niedrigsten Wertig¬ 
keit anfangen. Das ist nötig, da wir nicht wissen, wieviele 
Stellen die Zahl überhaupt hat (führende Nullen sind nicht 
zwingend), mit welcher Wertigkeit wir also anfangen müßten. 

Im ersten Teil des Programms wird daher das Abschluß-Null¬ 
byte gesucht und der Zahltext dann von da aus zu den fallen¬ 
den Adressen hin bearbeitet (die höchste Stelle steht ja 
weiter vorne im Speicher). 

Noch ein paar Worte zu den beiden CLR-Befehlen bei 1 lab2 1 . 
Der erste CLR-Befehl ist nötig, da wir ein paar Zeilen spä¬ 
ter d2 über einen 'move.b'-Befehl belegen. Es wird also nur 
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das unterste Byte des Registers verändert, alles andere, was 
eventuell schon darin enthalten ist, bleibt bestehen. Da wir 
aber nur den Byte-Wert, den wir hineinschreiben, im Register 
haben wollen, müssen wir es zuvor mit 'clr.l' komplett 
löschen. Der zweite CLR-Befehl muß sein, da wir auf d3 nur 
Zahlen aufaddieren, aber nichts direkt hineinschreiben. Ein 
eventuell schon vorhandener Inhalt muß also vor der ersten 
Addition gelöscht werden. 

Damit hätten wir nun die wichtigsten Umrechnungsroutinen 
beisammen. Denken Sie nicht, daß wir sie nur so aus Spaß be¬ 
sprochen haben. Im Abschluß-Programm dieses Kapitels, das 
ein kleiner Taschenrechner-Befehl für den CLI sein wird, 
kommen sie alle zum Einsatz, ebenso wie die Techniken, die 
wir in den nächsten Abschnitten lernen werden. 


3.7 Unterprogramme 

Wie geht nun der Einbau der Umrechnungsroutinen in unsere 
Programme vonstatten? Ganz einfach, fügen Sie die Routine 
in ihren Quelltext ein, aber nicht überall dort, wor sie 
diese brauchen. Die Routine wird mit bestimmten Befehlen 
versehen, damit sie als Unterprogramm aufgerufen werden kann 
und kommt dann nur einmal in den Quelltext. Folgende Punkte 
müssen erfüllt sein, damit eine Routine als Unterprogramm 
dienen kann: 

1. RTS am Ende 

Die Routine wird mit einem BSR-Befehl (Branch to Subroutine) 
aufgerufen. Damit ins Hauptprogramm zurückgekehrt wird muß 
Sie mit RTS (Return from Subroutine) enden. 

2. Register retten 

Es ist üblich, die Register aO, al, do und dl als 
"Schmierpapier" ("Scratch") anzusehen. Das heißt, jedes Un¬ 
terprogramm (und insbesondere jede Library-Routine) kann sie 
verändern. Die übrigen Register aber müssen erhalten blei¬ 
ben. Wenn Sie also andere Register als die Scratch-Register 
verwenden, müssen Sie diese vor der ersten Veränderung si¬ 
chern, am besten mit MOVEM auf dem Stack, und vor dem Routi¬ 
nenende wieder zurückholen. 

3. Parameterübergabe vereinbaren 

Die Parameter, die die Routine erwartet, müssen in fest ver¬ 
einbarten Registern oder Adressen o.ä. stehen. Für jede Li¬ 
brary-Routine ist z.B. genau festgelegt, welche Parameter in 
welche Register müssen. Rückgabewerte kommen gewöhnlich ins 
Register do, aber das können Sie auch variieren. 
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4. Kur routinen-interne Referenzen 

Das bedeutet, daß Sie innerhalb einer Unterroutine nur La¬ 
bels u.ä. verwenden dürfen, die in der Routine selber Vor¬ 
kommen. Die Routine darf nicht an ein bestimmtes übergeord¬ 
netes Programm gebunden sein. 

Wir haben schon des öfteren Unterprogramme benutzt, nämlich 
die Library-Routinen (diese werden ja über JSR aufgerufen). 
Eigene Unterprogramme geschrieben haben wir jedoch noch 
nicht. Das wollen wir jetzt nachholen. Als erstes Beispiel 
schauen wir uns einmal die Hex-ASCII-Konvertierungsroutine 
als Unterprogramm an: 


hexascii: 



movem. 1 

dl/d2,-(sp) 

; Register retten 


moveq 

17,dl 

; Schleife: 8 Nibbles 

labl: 

rol.l 

#4,d0 

; 1 Nibble durch Rotieren 
; ins unterste Nibble holen 


move. b 

d0,d2 

; Zur Bearb. umkopieren, da 
; Ursprungszahl noch ge- 
; braucht wird 


and.b 

#$f,d2 

; Zahl maskieren 


add.b 

#"0",d2 

; ASCII-Code von '0' 

; aufaddieren 


cmp.b 

#"9",d2 

; Größer als '9'? 


ble 

lab2 

; Wenn nein 


add.b 

#7,d2 

; Sonst in ’A'-'F' umrechnen 

lab2: 

move.b 

d2,(a0)+ 

; In Puffer schreiben 


dbra 

dl,labl 

; Schleifenende 


move.b 

#0,(aO) 

; Endekennung 


movem.1 
rts 

(sp)+,dl/d2 

; Register zurückholen 
; Zurück zum Hauptprogramm 


Bild 3.13: Die Hex-ASCII-Routine als Unterprogramm 


So sehr viel hat sich gar nicht verändert. Zwei MOVEM-Be- 
fehle, ein RTS und ein Label sind hinzugekommen. Die Labels, 
die benutzt werden, sind alle routinen-intern, und auch die 
Parameter sind festgelegt: do enthält die Zahl und aO den 
Zeiger auf den Ausgabe-Puffer. Wichtig ist das neue Label: 
Es stellt die Einsprungstelle der Subroutine dar. 

Ein Aufruf dieser Routine könnte so aussehen: 

move.l #$AB12CD34,dO ; Testzahl 

lea buffer,aO ; Puffer für ASCII-Zahl 

bsr hexascii ; Aufruf der Routine 

... ; Verarbeitung des Puffers 
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Das wars vorläufig auch schon zum Thema Unterprogramme. Im 
Abschlußprogramm dieses Kapitels werden wir wieder 
Unterprogramme einsetzen. Jetzt kommen wir zuerst mal zu 
einem anderen Thema. 


3.8 Mehrfachverzweigungen 

In vielen Programmen kommen diverse Auswahlmenüs vor. Wenn 
der Benutzer einen Menüpunkt gewählt hat, muß das Programm 
entsprechend dieser Wahl zu bestimmten Teilen (meist Unter¬ 
programmen) verzweigen. Eine Möglichkeit, diese Mehrfach- 
Verzweigung zu realisieren, ist die Benutzung einer IF- 
Kette: 


3.8.1 Mehrfachverzweigung mit einer IF-Kette 

Angenommen, der Benutzer wird in einem Menü aufgefordert, 
die gewünschte Programmfunktion durch Eingabe von ' 1' , 1 2 1 
oder '3' usw. auszuwählen. Das eingegebene Zeichen soll nach 
do geschrieben werden. Eine Verzweigung könnte dann so aus- 
sehen: 


cmp.b 

#"l",dO 

beq 

prql 

cmp.b 

#"2",d0 

beq 

prg2 

cmp.b 

#"3\d0 

beq 

prg3 


Diese Methode hat aber zwei Nachteile: Erstens artet sie bei 
vielen Menüpunkten in eine Menge Schreibarbeit aus (von der 
Speicherplatzverschwendung mal ganz abgesehen), und außerdem 
dürfen die einzelnen Programmteile höchstens 32 KByte von 
der Verzweigekette entfernt sein (da die Zieladresse von BCC 
auf +32767 bis -32768 beschränkt ist), was bei größeren Pro¬ 
grammen zu Schwierigkeiten führen kann. 

Solange Sie nur kleine Programme mit wenigen Menüpunkten 
(bis zu 8 Stück) schreiben, können Sie eine IF-Kette zur 
Verzweigung benutzen, ansonsten sollten Sie eine der 
folgenden Methoden verwenden. 


3.8.2 Mehrfachverzweigung mit Sprungtabelle 

Diese Verzweigungstechnik basiert auf einer Tabelle, in der 
die Einsprungadressen aller Routinen verzeichnet sind. Aus 
dem eingegebenen Zeichen wird dann die Tabellenplatznummer 
des gewählten Menüpunktes berechnet. 

Das Anlegen dieser Tabelle ist ganz einfach. Angenommen, Sie 
haben folgende Routinen in Ihrem Programm: 
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prgl: 

... 

; Beginn der ersten Routine 

prg2: 

rts 

; Beginn der zweiten Routine 

prg3: 

rts 

; Beginn der dritten Routine 


rts 

; usw. usw. 


Dann legen Sie die Sprungadressen-Tabelle so an: 
table: dc.l prgl,prg2,prg3 

Mit der DC-Direktiven kann man beliebige Werte ins Programm 
einfügen, also auch Adressen. Labels repräsentieren die 
Adressen der Befehle oder Daten, vor denen sie stehen. Die 
Labels vor der ersten Zeile einer Routine repräsentieren 
dann natürlich die Startadresse der Routine, weshalb wir sie 
zum Aufbau der Tabelle benutzen können. Wichtig ist, daß die 
Einträge der Tabelle in der Reihenfolge der zugehörigen 
ASCII-Zeichen stehen müssen. In unserem Beispiel muß also 
zuerst die Routine, die bei ASCII-'1' aufgerufen wird, kom¬ 
men, dann die Routine für ASCII-'2' usw. 

Wenn in do das eingegebene Zeichen ( ' 1' , ' 2' oder ' 3' ) 
abgelegt wird, können wir aus ihm folgendermaßen die 
Startadresse der anzuspringenden Routine ableiten: 


lea 

table,aO 

; Tabellenstart 

sub.b 

#"l",dO 

; ASCII in Zahl umrechnen 

asl 

#2 ,d0 

; do mal 4 

move.1 

0(a0,d0),al 

; Startadresse aus Tabelle 

jsr 

(al) 

; Routine anspringen 


Bild 3.14: Einsprungadresse berechnen (1 Tabelle) 


Der Start der Tabelle wird nach aO geholt. Das Zeichen in do 
wird durch Subtraktion des ASCII-Codes des kleinstmöglichen 
Auswahlzeichens (hier also die '1') in eine Zahl (0-2) umge¬ 
rechnet. Diese Zahl gibt die Platznummer der gesuchten Ein¬ 
sprungadresse in der Tabelle an. Da jeder Tabelleneintrag 4 
Bytes lang ist (Adresse=Langwort), wird die Zahl noch mit 4 
malgenommen. An der Speicherstelle 'Tabellenstart plus Zahl' 
(Adressierungsart ARI mit Index und Offset) ist dann die ge¬ 
wünschte Einsprungadresse zu finden. Diese wird nach al ge¬ 
holt und angesprungen (JSR-Befehl indirekt über Adreßregi¬ 
ster), das wars. 

Zu diesem Thema wollen wir uns auch ein kleines Komplett- 
Beispielprogramm anschauen. Es soll ein Zeichen der Komman¬ 
dozeile auswerten und über eine Sprungtabelle einige Routi¬ 
nen anspringen. Als Eingabe-Zeichen lassen wir '!', '2' und 
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'3' zu, und die einzelnen Routinen sollen eine kleine 
Meldung ausgeben. 


* Programm 3.5: Mehrfachverzweigung mit Sprungtabelle 


ExecBase 

= 

4 



OpenLib 

= 

-552 



CloseLib 

i = 

-414 



Write 

= 

-48 



Output 

= 

-60 




movem.1 

aO,-(sp) 

; Kommandozeile 

sichern 


move. 1 

ExecBase,a6 

; DOS-Lib öffnen 


lea 

dosname,al 




clr.l 

dO 




jsr 

OpenLib(a6) 




move.1 

dO ,a6 




jsr 

Output(a6) 

; Output-Handle 

holen 


move.1 

d0,d4 




movem.1 

(sp)+,a0 

; Kommandozeile 

zurückholen 


clr.l 

dO 




* Einsprungadresse berechnen 



move.b 
lea 
sub.b 
asl 

move.1 
jsr 

(aO),d0 
table,a0 
#"1",dO 
#2 ,d0 

0(a0,d0),al 
(al) 

; Eingebenes Zeichen nach dO 
; Tabellenanfang 
; ASCII -> Zahl 
; dO mal 4 

; Einsprungadresse nach al 
; Routine anspringen 


move.1 
move.1 

jsr 

a6 ,al 

4,a6 

CloseLib(a6) 

; Lib schließen 


rts 


; Zum CLI 

ausgl: 

move.1 
move.1 
move.1 
jsr 
rts 

d4,dl 
#textl,d2 
#17,d3 
Write(a6) 

; Text 1 ausgeben 

ausg2: 

move.1 
move.1 
move.1 
jsr 
rts 

d4 ,dl 
#text2,d2 
#17,d3 
Write(a6) 

; Text 2 ausgeben 

ausg3: 

move.1 

d4,dl 

; Text ausgeben 
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#text3,d2 
#17,d3 
Write(a6) 


move.1 
move.1 
jsr 
rts 

* Datenbereich 


dosname: dc.b 

even 

table: dc.l 

textl: dc.b 

even 

text2: dc.b 

even 

text3: dc.b 

even 


"dos.library",0 

ausgl,ausg2,ausg3 
"Kommandozeile: 1",10 
"Kommandozeile: 2",10 
"Kommandozeile: 3",10 


Programm 3.5: Mehrfachverzweigung mit Sprungtabelle 


Die Funktionsweise dieses Programms dürfte eigentlich klar 
sein. Anzumerken ist noch, daß wir hier nur die Adresse der 
Kommandozeile (aO) auf dem Stack sichern. Die Länge brauchen 
wir nicht, da wir sowieso nur ein Zeichen auswerten wollen. 
Sie sollten beachten, daß das Programm den Fall, daß sie ein 
anderes Zeichen als '1', '2' oder '3' (oder auch gar kein 
Zeichen) in die Kommandozeile schreiben, nicht abfängt. Das 
Programm im nächsten Abschnitt wird dies aber tun. 

Einen Nachteil hat diese Verzweigungs-Methode noch: Die 
Menüpunkt-ASCII-Codes müssen alle hintereinander stehen, da 
aus ihnen direkt der Tabellenplatz bestimmt wird. Sie können 
also nur Menüs der Art "l=Laden, 2=Speichern, 3=Drucken, 
4=Ende usw." benutzen, aber nicht z.B. "L=Laden, 
S=Speichern, D=Drucken, E=Ende". Zur Realisierung solcher 
Abfragen kommen wir jetzt. 


3.8.3 Mehrfachverzweigung mit zwei Tabellen 

Die Benutzung von zwei Tabellen läßt auch nicht-aufeinander¬ 
folgende Menüpunkt-ASCII-Codes zu. In der ersten Tabelle 
stehen die möglichen ASCII-Zeichen und in der zweiten die 
Einsprungadressen, und zwar in der selben Reihenfolge wie 
die zugehörigen Menüzeichen. Bleiben wir beim Beispiel mit 
dem "Laden, Speichern, Drucken, Ende". Die Routinen könnten 
dann folgendermaßen im Programm stehen: 

load: ... ( . Start der Lade-Routine 

rts 

save: ... ; Start der Speicher-Routine 

rts 

print: ... ; ... 
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rts 

quit: ... ; ••• 

Die erste Tabelle enthält die zugelassenen Buchstaben: 

tablel: dc.b "L”,"S","D","E" 

tablelend: 

Das zweite Label unter der Tabelle dient als "Endemarke". Es 
repräsentiert die erste Adresse direkt nach der Tabelle. 
Wenn wir später beim Suchen des Zeichens an diese Adresse 
kommen, wissen wir, daß die Tabelle zuende ist (Zeichen 
wurde nicht gefunden). In der zweiten Tabelle stehen wieder 
die Einsprungadressen: 

table2: dc.l load,save,print,quit 

Die Berechnung des Tabellenplatzes und damit der Ein¬ 
sprungadresse läuft dann so ab (in do soll das ausgewählte 
Zeichen stehen): 


lea 

tablel,aO 

lea 

tablelend,al 

bclr 

#5,d0 

clr.l 

dl 

cmp.b 

(a0)+,d0 

beq 

lab2 

addq 

#l,dl 

cmp.l 

al,aO 

bne 

labl 

bra 

notfound 

asl 

#2,dl 

lea 

table2,a0 

move. 1 

0(a0,dl),al 

jsr 

(al) 


Start der Zeichen-Tabelle 
Ende der Zeichen-Tabelle 
Force Uppercase 
Zähler löschen 
Zeichen gefunden? 

Wenn ja 

Sonst Zähler erhöhen 
Tabellenende erreicht? 
Wenn nein 

Zeichen nicht gefunden 
Zähler mal 4 
Start Adreß-Tabelle 
Einsprungadresse holen 
Anspringen 


Bild 3.15: Berechnung der Einsprungadresse (2 Tabellen) 


Dieses Verfahren ist ein wenig aufwendiger, bietet aber 
große Vorteile. Als erstes muß das in do stehende Zeichen in 
der ersten Tabelle gesucht werden. Dazu holen wir den Start 
der Tabelle nach aO und ihr Ende (bzw. Ende+l) nach al. Das 
Zeichen in do wandeln wir in einen Großbuchstaben um. Wir 
müssen zählen, an der wievielten Stelle in der Tabelle das 
Zeichen gefunden wurde, also ernennen wir dl zum Zähler (der 
zunächst gelöscht wird). Dann vergleichen wir immer ein Zei¬ 
chen aus der Tabelle mit dem zu suchenden Zeichen, wobei der 
Tabellenzähler automatisch erhöht wird. Haben wir das Zei¬ 
chen gefunden, wird nach ’lab2' verzweigt. Ansonsten wird 
der Tabellenzähler erhöht und zurückgesprungen, falls das 
Tabellenende noch nicht erreicht wurde (ansonsten springen 
wir nach ’notfound', wo entsprechend reagiert werden muß). 
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Bei 'lab2' wird der Tabellenzähler, der ja jetzt die Platz- 
nummer des gesuchten Zeichens in der ersten Tabelle und da¬ 
mit auch die der gesuchten Adresse in der zweiten angibt, 
mit vier malgenommen. Die Adresse wird aus der Tabelle gele¬ 
sen und angesprungen. Damit hat sich die Sache. 

Schauen wir uns noch ein Komplett-Beispielprogramm an, dann 
wird es bestimmt klarer. Es soll wieder die Kommandozeile 
auswerten und bei eingegebenem 'L', 'S', ' D' oder ' E' eine 
kleine Meldung ausgeben. Diesmal wird auch der Fall 'nicht 
gefunden' berücksichtigt. 

Im letzten Programm mußten wir für die Textausgaben drei 
fast identische Programmteile schreiben. Diesmal verwenden 
wir dafür ein Unterprogramm (genannt ’print'), dem nur die 
Startadresse des Textes übergeben wird. Das Output-Handle 
wird in d4 vorausgesetzt, und die Länge des Textes steht als 
Byte-Wert im ersten Zeichen des Textes, das dann natürlich 
nicht mit ausgegeben wird. Einen solchen Text, der als er¬ 
stes Zeichen seine Länge enthält, nennt man übrigens "BCPL- 
String". BCPL ist eine C-ähnliche Programmiersprache, aber 
auch in Pascal werden beispielsweise die Strings 
(Zeichenketten) so verwaltet. Jetzt aber das Programm: 


* Programm 3.6: Mehrfachverzweigung mit zwei Tabellen 


ExecBase = 

4 

OpenLib 

= 

-552 

CloseLib = 

-414 

Write 

= 

-48 

Output 

= 

-60 


movem.l 

a0,-(sp) 


move.1 

ExecBase,a6 


lea 

dosname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


jsr 

0utput(a6) 


move.1 

d0,d4 


movem.l 

(sp)+,a0 


clr.l 

dO 


move.b 

(aO),d0 

* Zeichen in Tabelle suchen 


lea 

tablel,aO 


lea 

tablelend,al 


bclr 

#5,d0 


clr.l 

dl 

labl: 

cmp.b 

(a0)+,d0 


; Kommandozeile sichern 
; DOS-Lib öffnen 


; Output-Handle holen 


; Kommandozeile zurückholen 
; Zeichen nach dO 


; Start der Zeichen-Tabelle 
; Ende der Zeichen-Tabelle 
; Force Uppercase 
; Zähler löschen 
; Zeichen gefunden? 
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beq 

lab2 

; Wenn ja 


addq 

#1 ,dl 

; Sonst Zähler erhöhen 


cmp.l 

al,aO 

; Tabellenende erreicht? 


bne 

labl 

; Wenn nein 

* Zeichen nicht 

gefunden 



lea 

text5,a0 

; 'Nicht gefunden'-Text 


bsr 

print 

; Ausgeben 


bra 

ende 


* Einsprungadresse holen 


lab2: 

lea 

table2,a0 

; Tabellenanfang 


asl 

#2,dl 

; dl mal 4 


move. 1 

0(a0,dl),al 

; Einsprungadresse nach al 


jsr 

(al) 

; Routine anspringen 

ende: 

move. 1 

a6,al 

; Lib schließen 


move. 1 

4,a6 



jsr 

CloseLib(a6) 



rts 


; Zum CLI 

load: 

lea 

textl,aO 

; Start von Text 1 laden 


bsr 

print 

; Zur Schreib-Subroutine 


rts 



save: 

lea 

text2,aO 



bsr 

print 



rts 



print: 

lea 

text3,aO 



bsr 

print 



rts 



quit: 

lea 

text4,aO 



bsr 

print 



rts 



print: 

move.1 

d4,dl 

; Output-Handle 


clr.l 

d3 

; Länge löschen 


move.b 

(aO),d3 

; Erstes Textzeichen = Länge 


lea 

1(aO),al 

; Neuer Textbeginn 


move.1 

al,d2 

; nach d2 


jsr 

Write(a6) 



rts 




* Datenbereich 


dosname: 

dc.b 

"dos.library",0 


even 


tablel: 
tablelend: 

dc.b 

"L","S","D","E" 
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table2: 

dc.l 

load,save,print,quit 

textl: 

dc.b 

19,"Menüauswahl: 

Laden",10 

text2: 

even 

dc.b 

23,"Menüauswahl: 

Speichern",10 

text3: 

even 

dc.b 

21,"Menüauswahl: 

Drucken",10 

text4: 

even 

dc.b 

18,"Menüauswahl: 

Ende",10 

texts: 

even 

dc.b 

24,"Zeichen nicht gefunden!", 10 


even 




Programm 3.6: Mehrfachverzweigung mit zwei Tabellen 


Also nochmal: Start und Ende der Zeichentabelle werden mit 

lea tablel,aO ; Start der Zeichen-Tabelle 

lea tablelend,al ; Ende der Zeichen-Tabelle 

in Adreßregister geholt. Das Zeichen wird in einen Großbuch¬ 
staben umgewandelt, übrigens: Falls Sie sowohl Groß- als 
auch Kleinbuchstaben in Ihrem Menü haben, können Sie das 
Force Uppercase natürlich auch weglassen. Es hat hier nur 
den Zweck, daß große und kleine Buchstaben gleich behandelt 
werden. 

Dann wird der Tabellenzähler dl gelöscht. In einer Schleife 
wird die Tabelle nach dem gewünschten Zeichen durchsucht: 

labl: cmp.b (aO)+,dO ; Zeichen gefunden? 

Wenn es gefunden wird, geht es nach 'lab2', ansonsten wird 
der Zähler erhöht und zum Schleifenanfang zurückgesprungen, 
wenn das Tabellenende noch nicht erreicht wurde: 

cmp.l al,aO ; Tabellenende erreicht? 

bne labl ; Wenn nein 

Wurde das Zeichen nicht gefunden, wird ein entsprechender 
Text ausgegeben und anschließend zum Programmende verzweigt: 

lea text5,a0 ; 'Nicht gefunden'-Text 

bsr print ; Ausgeben 

bra ende 

Bei erfolgreicher Suche steht in dl die Tabellenplatznummer 
des Zeichens. Die Nummer wird mit 4 malgenommen (Langwort 
für Adresse), und über Nummer und Start der Adreßtabelle 
wird die Einsprungadresse der Routine geholt: 

lab2: lea table2,a0 ; Tabellenanfang 

asl #2,dl ; dl mal 4 


103 





Kapitel 3 


move.l 0(a0,dl),al ; Einsprungadresse nach al 

jsr (al) ; Routine anspringen 

Danach folgt das Programmende (Lib schließen und RTS). 

Nun noch eine kurze Erklärung zum Print-Unterprogramm: Es 
erwartet, wie gesagt, in aO einen Zeiger auf den Text, wobei 
die Länge im ersten Byte des Textes steht. Das Output-Handle 
wird in d4 vorausgesetzt (dorthin hatten wir es ja gerettet) 
und nach dl geholt. Das Textlängen-Register d3 wird zuerst 
long-gelöscht, dann wird die Länge byte-weise 

hineingeschrieben. Nun folgt ein adreß-erhöhender LEA- 
Befehl: 

lea l(aO),al ; Neuer Textbeginn 

Hier hätten wir auch den ADD-Befehl auf aO verwenden 
können, aber LEA ist schneller und kürzer. Der neue 
Textbeginn in al kommt ins Write-Textbeginn-Register d2, 
dann wird Write aufgerufen. 

Zum Abschluß dieses Kapitels werden wir das versprochene 
CLI-Taschenrechner-Programm entwickeln. 


3.9 Abschluß-Programm: CLI-Taschenrechner 

Das zum Programm gehörende Listing finden Sie nur auf der 
Diskette (weil es zum Abdrucken etwas zu lang ist). Hier 
wollen wir seine Funktionsweise beschreiben und auf 
Neuheiten eingehen. 

In diesem Kapitel haben wir uns hauptsächlich mit Zahlenum¬ 
rechnungen und Verzweigetechniken beschäftigt. Daher soll 
das Abschluß-Programm ein kleiner Taschenrechner für den CLI 
sein. Er soll folgende Funktionen haben: 

1. Die Kommandozeile ist in bis zu drei Parameter, getrennt 
durch Leerzeichen zu zerlegen. Der erste Parameter ist 
die erste Zahl, der zweite die Rechenoperation und der 
dritte die zweite Zahl. 

2. Die Parameter 2 und 3 können auch wegfallen. 

3. Die Zahlen können dezimal oder hexadezimal sein (bei hex 
muß ein '$' davor stehen). 

4. Die Rechenoperation kann, falls vorhanden, 

oder '/' (für Addition, Subtraktion, Multiplikation oder 

Division) sein. Falls die Parameter 2 und 3 fehlen, wird 
nicht gerechnet. 

5. Das Ergebnis wird in dezimal und hexadezimal ausgegeben. 
Die Möglichkeit, keine Operation und zweite Zahl anzuge¬ 
ben, dient dazu, eine Zahl nur umzurechnen (dez-hex oder 
hex-dez). 

Den Sourcecode finden Sie auf der Diskette im Verzeichnis 
"KAPITEL 3" unter dem Namen "PRG_3_7.S". 
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Fangen wir mit den Unterprogrammen an. Als erstes kommt eine 
Routine, die die Kommandozeile in ihre Einzelteile "zerlegt" 
(ein sog. Parser). Sie hat die Aufgabe, den Teil der Komman¬ 
dozeile bis zum nächsten Leerzeichen oder zum Zeilenende 
(Return-Code) in einen Puffer zu schreiben. In aO erwartet 
sie den Zeiger auf den Quelltext (also die Kommandozeile), 
in al den Ziel-Zeiger und in dO die maximale Länge des Ziel¬ 
textes. do dient als Schleifenzähler, wird also zunächst um 
eins erniedrigt: 

parser: subq #l,dO 

Dann wird immer ein Zeichen aus dem Quell- in den Zieltext 
kopiert, und zwar solange, bis ein Leerzeichen oder Return 
übertragen wurde oder do abgelaufen ist: 

psl: move.b (aO),(al)+ 

cmp.b #" ",(a0) 
beq ps2 

cmp.b #10,(aO) 

beq ps2 

add.l #l,a0 

dbra d0,psl 

Danach wird das letzte übertragene Zeichen, das entweder ein 
Leerzeichen oder ein Return war, durch ein Nullbyte ersetzt 
(im Hinblick auf spätere Benutzung der Umwandlungsroutinen): 

ps2: move.b #0,-l(al) ; Letztes Zeichen durch O-Byte ersetzen 

Wenn der Quellzähler jetzt auf einem Return steht, welches 
das Ende der Kommandozeile anzeigt, bleibt er unverändert. 
Ansonsten wird er um eins erhöht, da er in diesem Fall auf 
einem Trenn-Leerzeichen stand, welches beim nächsten Parser¬ 
aufruf nicht als Startzeichen Vorkommen darf. 

Damit ist die Parser-Routine klar. Die vier Zahlen-Umrech- 
nungsroutinen sind auch schon bekannt, deshalb kommen wir 
nun zur neuen, etwas komfortableren Print-Subroutine, die 
wir auch später des öfteren verwenden werden: 

print: movem.l dl-d3,-(sp) ; Register sichern 

move.l a0,d2 ; Text-Start nach d2 (für Write) 

clr.l d3 ; Länge löschen 

prl: addq #l,d3 ; Länge plus 1 

tst.b (a0)+ ; Textende-Kennzeichen erreicht? 

bne prl ; Wenn nein 

subq #l,d3 ; Letzten addq rückgängig 

move.l d4,dl ; Output-Handle wird in d4 erwartet 

jsr Write(a6) ; Write aufrufen 

movem.l (sp)+,dl-d3 ; Register zurück 

rts ; Bye bye 
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Bisher mußten wir die Länge unserer Texte immer abzählen. Ab 
jetzt sparen wir uns das. Wir schreiben einfach ein Null- 
Byte als Endekennzeichen hinter den Text und lassen die 
Print-Routine die Zeichen bis zum Null-Byte zählen. Die 
Routine erwartet in aO den Textbeginn, welchen wir gleich 
nach d2 schreiben (wo Write ihn erwartet). Die Länge löschen 
wir zunächst. In der Schleife 


prl: addq fl,d3 ; Länge plus 1 

tst.b (a0)+ ; Textende-Kennzeichen erreicht? 

bne prl ; Wenn nein 

erhöhen wir d3 und aO solange, bis wir das Null-Byte finden. 
Da wir d3 einmal zuviel erhöht haben (die Erhöhung kommt vor 
der Abfrage, und das Null-Byte gehört nicht mehr zum Text 
selbst) müssen wir wieder eins abziehen: 

subq #l,d3 ; Letzten addq rückgängig 


Die Parameter d2 und d3 (Start und Länge 1 sind nun schon 
richtig gesetzt, nur das Filehandle in dl v-, ehlt noch. Wir 
lassen die Routine das gewünschte Handle d4 voraussetzen, 
von wo aus es nach dl kopiert wi dy Dann wird Write 
aufgerufen und die Sache ist gegessen 


Nun kommen wir zum Hauptprogramm- zur Zeile 


move.l (sp) + ,aO ; Ko \> .dozeile zurück 

ist noch aller klar. Die fc : .ende Abfrage, ob eine Kommando¬ 
zeile vorhanden ist, nüt^t die Tatsache, daß das Return- 
Zeichen, welches eine ..-Eingabe abschließt, auch immer als 
letztes Zeichen in dd.v Kommandozeile steht. Falls nun das 
erste Zeichen das Jkdturn ist, springen wir sofort zum Pro¬ 
grammende, da ke . t Eingabe erfolgt ist: 


lea 

txt5,a0 

; Text "Erste Zahl fehlt" 

bsr 

print 

; ausgeben 

bra 

ende 

; Zum Prograimnende 


Als nächstes wird die Parser-Routine angesprungen und die 
erste eingegebene Zahl im Puffer 'zahll' untergebracht. 
Falls dann das Return-Zeichen gefunden sein sollte, gibt es 
nur die eine Zahl, kein Rechenzeichen und keine zweite, wes¬ 
halb wir das Parsen dieser beiden Teile überspringen. Anson¬ 
sten werden Rechenzeichen und zweite Zahl in ihre Puffer 
'Zeichen' und 'zahl2' geparst. 

Danach müssen die Zahlen, die als ASCII-Text vorliegen, in 
Binärzahlen umgerechnet werden. Dazu wird mit 
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cmp.b (aO) ; Beginnt Zahl mit "$"? 

geprüft, ob das erste Zeichen der Zahl ein '$' ist. In die¬ 
sem Fall wird die ASCII-Hex-Umrechnungsroutine aufgerufen 
(wobei das erste Zeichen natürlich übersprungen wird), an¬ 
sonsten die ASCII-Dez-Routine. Das wird für beide Zahlen 
durchgeführt, bzw. nur für die erste, wenn es keine zweite 
gibt. Die Zahlen werden in d6 und d7 abgelegt. 

Dann wird getestet, ob ein Rechenzeichen vorhanden ist, ob 
also überhaupt gerechnet werden muß. Wenn dies der Fall ist, 
wird das eingegebene Rechenzeichen in der ersten Tabelle ge¬ 
sucht : 


lea 

tabl,aO 

; Suche Rechenzeichen in der 

lea 

table,al 

; Zeichen-Tabelle 

move.b 

Zeichen,dO 


clr.l 

dl 


cmp.b 

(aO)+,dO 


beq 

ts2 


addq 

#1 ,dl 


cmp. 1 

al ,a0 


bne 

tsl 


lea 

txtl,aO 

; Text "Illegales Rechenzeichen" 

bsr 

print 

; Ausgeben 

bra 

ende 

; Zum Programmende 

asl 

#2,dl 

; Einsprung der Rechen-Routine holen 


Wird es nicht gefunden, wurde ein ungültiges Zeichen einge¬ 
geben, was mit einem entsprechenden Text quittiert wird. An¬ 
sonsten wird aus der Tabellenplatznummer des Rechenzeichens 
die Platznummer der Tabelle der Einsprungadressen bestimmt 
(Mehrfachverzweigung mit zwei Tabellen) und die Routine auf¬ 
gerufen : 

lea tab2,a0 

move.l 0(a0,dl),al 

jsr (al) ; Anspringen 

Es gibt vier Routinen, welche die jeweils gewünschte 
Rechenoperation auf die Register d6 und d7 ausführen. Danach 
wird die Ergebniszahl sowohl in Hex als auch in Dezimal 
ausgegeben (Aufruf der Umrechnungsroutinen) und das Programm 
ist beendet. 
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Die Libraries sind, wie eingangs schon erwähnt, die Grund¬ 
lage und wichtigste Einrichtung im Amiga-System. Daher wol¬ 
len wir nun jeweils ein Kapitel einer bestimmten Library 
widmen. Wir beginnen mit der DOS-Lib (die am einfachsten zu 
handhaben ist) und kommen später zu Intuition, Diskfont, 
Graphics und Exec. Außerdem wird noch ein Kapitel "DOS für 
Fortgeschrittene" folgen, in dem all das erklärt wird, was 
eigentlich auch zur DOS-Library gehört, aber zu diesem Zeit¬ 
punkt noch zu kompliziert ist (Prozeß-Strukturen, File- 
handle-Strukturen usw.). 

Bisher haben wir die DOS-Library nur dazu benutzt, Texte im 
CLI-Fenster auszugeben und Zeichen von der Tastatur zu le¬ 
sen. Das ist natürlich noch lange nicht alles, was sie zu 
bieten hat, aber mit Read und Write haben wir schon zwei 
sehr wichtige Funktionen benutzt. Die DOS-Lib ist, wie die 
Bezeichnung "Disk Operating System" schon sagt, hauptsäch¬ 
lich für die Verwaltung von Speichermedien (Disketten, Fest¬ 
platten usw.) bzw. den darauf enthaltenen Dateien und Ver¬ 
zeichnissen zuständig. Für das Amiga-DOS ist der Begriff 
"Datei" aber nicht streng an eine Diskettendatei gebunden. 
Auch einfache Fenster, der Drucker, die "Serielle Schnitt¬ 
stelle" und sogar das Sprachausgabe-System können als Datei 
angesprochen werden. 


4.1 Grundlegende Datei-Operationen 

Zu Beginn wollen wir uns mit grundlegenden Datei-Operationen 
wie Öffnen, Schließen, Lesen, Schreiben usw. beschäftigen 
und uns dabei nur auf Disk-Dateien beziehen. Die Ansteuerung 
von Fenste von Fenstern, Drucker usw. kommt später. 


4.1.1 Öffnen und Schließen 

Bevor man mit einer Datei arbeiten kann, muß man deren 
Benutzung quasi beim System anmelden. Man nennt das "öffnen" 
der Datei. Ebenso muß man die Datei wieder abmelden, sie 
also "schließen", wenn sie nicht mehr benötigt wird. Dazu 
gibt es zwei Routinen in der DOS-Library. 

Zum öffnen einer Datei verwendet man die DOS-Routine Open: 


Open 



= -30 (DOS-library) 

*name 

dl 

< 

Zeiger auf Namenstext der Datei (0-ter- 
miniert) 

mode 

d2 

< 

Öffnungs-Modus 

*file 

Erklärung 

d0 

> 

Handle der Datei oder 0 bei Fehler 

Öffnet eine Datei 
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Das 'O-terminiert' bedeutet, daß der Namenstext (mit ’dc.b’ 
im Programm abgelegt) mit einem Nullbyte enden muß. Generell 
müssen alle Namen und ähnliches, die per Pointer an Library- 
Routinen übergeben werden, mit einem Nullbyte enden (es sei 
denn, es wird auch die Länge des Namens übergeben). 

Öffnungs-Modus: Man kann in d2 verschiedene Zahlen 
eintragen, welche die Art der zu öffnenden Datei bestimmen. 
Diesen Zahlen werden in den Assembler-Include-Files Texte 
zugewiesen, aus denen die Bedeutungen der Zahlen besser er¬ 
sichtlich sind. Die Texte werden von Commodore vorgegeben 
und sind "standardisiert". Immer, wenn bestimmte Zahlen zur 
Auswahl irgendwo eingetragen werden müssen, stellen wir sie 
in zwei Tabellen vor. In der ersten Tabelle stehen die sym¬ 
bolischen Texte mit ihren zugehörigen konkreten Zahlen und 
einer kurzen Erklärung ihrer Bedeutungen und in der zweiten 
die ausführlichen Beschreibungen. Hier nun die Tabellen der 
Öffnungs-Modi: 

Öffnungs-Modus Wert Bedeutung 


MODE_OLDFILE 1005 öffnet bestehende Datei 

MODE_READWRITE 1004 Öffnet neue oder bestehende Datei 

MODE NEWFILE 1006 Erstellt neue Datei 


MODEOLDFILE 

MODE READWRITE 


MODE NEWFILE 


Öffnet eine schon bestehende Datei zum Lesen und 
Schreiben. Sollte es die Datei nicht geben, wird 
ein Fehler gemeldet. 

Öffnet eine Datei zum Lesen und Schreiben. Wenn 
die Datei schon existiert, wird die vorhandene 
Version benutzt, falls nicht, wird sie neu ange¬ 
legt. 

Legt eine neue Datei an und öffnet sie zum Lesen 
und Schreiben. Falls es die Datei schon gab, 
wird sie gelöscht und durch die Neue ersetzt. 
Das aufrufende Programm erhält die alleinige Zu¬ 
griffsberechtigung. Andere Programme können die 
Datei so lange nicht öffnen, bis sie vom aufru¬ 
fenden Programm geschlossen wurde. 


über diese Öffnungs-Modi herrscht offensichtlich ziemliche 
Verwirrung. Wir haben in jeder Dokumentation eine leicht 
unterschiedliche Erklärung gefunden. Die von uns 
deklarierten Erläuterungen haben wir allerdings ausprobiert, 
sie sollten also wirklich stimmen. 

In do steht nach dem Aufruf das File-Handle der geöffneten 
Datei oder eine 0, wenn ein Fehler auftritt. Das Handle, das 
wir bei der Textausgabe im CLI-Fenster schon benutzt haben, 
ist auch hier eine "Identifikationsnummer" der Datei. Bei 
vielen weiteren Operationen, die wir mit der Datei 
durchführen, müssen wir das Handle angeben. (Eigentlich 
handelt es sich dabei um einen Zeiger auf die FileHandle- 
Struktur, die im DOS-Fortgeschrittenen-Kapitel besprochen 
wird.) Falls die Datei nicht geöffnet werden konnte, kann 
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man sich mit einer weiteren Funktion genauere Informationen 
über aufgetretene Fehler besorgen. 

Für jede geöffnete Datei gibt es einen sog. "Datenzeiger", 
der auf die Position des nächsten zu lesenden bzw. zu 
schreibenden Bytes zeigt. Unmittelbar nach dem öffnen steht 
er immer am Dateianfang. Bei jedem Zugriff auf die Datei 
wird der Datenzeiger um so viele Bytes zum Dateiende hin 
verschoben, wie gelesen bzw. geschrieben wurden. Es sei 
denn, es soll über das Dateiende hinaus gelesen werden, dann 
werden nur die vorhandenen Bytes gelesen, ohne daß ein 
Fehler gemeldet wird. Wichtig ist auch, daß die Datei immer 
gelesen und geschrieben werden kann, egal, wie sie geöffnet 
wurde. Wenn der Datenzeiger nicht am Dateiende steht, also 
auf schon vorhandene Daten zeigt, werden diese bei einem 
Schreibzugriff durch die neuen Daten ersetzt. 

Wenn man die Datei nicht mehr benötigt, muß sie geschlossen 
werden. Dieses Schließen ist vor allem dann sehr wichtig, 
wenn man Daten in die Datei schreibt, da diese zunächst nur 
in einen bestimmten Speicherbereich geschrieben werden (in 
den sog. "Dateipuffer"). Der Puffer wird erst dann wirklich 
auf die Diskette gebracht, wenn er voll ist oder die Datei 
geschlossen wurde. Wenn Sie also Daten in eine Datei schrei¬ 
ben, die den Puffer nicht ganz füllen, die Datei später aber 
nicht schließen, bekommt die Diskette die Daten niemals zu 
sehen. 

Das Schließen einer Datei übernimmt die DOS-Routine Close: 


Close 


-36 (DOS-library) 


*file dl < Handle der zu schließenden Datei 

Erklärung Schließt eine Datei 


Die Close-Routine bekommt nur einen Parameter (das Handle 
der Datei, das wir bei Open bekamen) und liefert keinen 
Rückgabewert. 


4.1.2 Abfrage von Fehlern 

Zur Behandlung von Fehlern gibt es .die DOS-Routine IoErr. 
Immer, wenn eine DOS-Routine einen Rückgabewert liefert, der 
das Auftreten eines Fehlers anzeigt, kann man mit IoErr 
genauere Informationen darüber abholen, was eigentlich 
schief gelaufen ist: 
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IoErr 

= -132 (DOS-Library) 

error 

Erklärung 

do > DOS-Fehlercode 

Ermittelt den DOS-Fehlercode 


Die wichtigsten Fehlercodes, die bei Einsteigern auftreten 
können, haben folgende Bedeutungen: 


ERROR 

NO FREE STORE 

equ 

103 


ERROR 

‘FILE NOT OBJECT 

equ 

121 


ERROR 

"OBJECT IN USE 

equ 

202 


ERROR 

"OBJECT EXISTS 

equ 

203 


ERROR" 

OBJECT NOT FOUND 

equ 

205 


ERROR 

"OBJECT WRONG TYPE 

equ 

212 


ERROR' 

"DISK NOT VALIDATED 

equ 

213 


ERROR" 

"DISK WRITE PROTECTED 

equ 

214 


ERROR" 

"RENAME ACROSS DEVICES 

equ 

215 


ERROR" 

"DIRECTORY NOT EMPTY 

equ 

216 


ERROR" 

'DEVICE NOT MOUNTED 

equ 

218 


ERROR" 

"SEEK ERROR 

equ 

219 


ERROR" 

"COMMENT TOO BIG 

equ 

220 


ERROR" 

‘DISK FULL 

equ 

221 


ERROR" 

"DELETE PROTECTED 

equ 

222 


ERROR" 

"WRITE PROTECTED 

equ 

223 


ERROR" 

'READ PROTECTED 

equ 

224 


ERROR" 

"NOT A DOS DISK 

equ 

225 


ERROR" 

"NO DISK 

equ 

226 


ERROR" 

"NO_MORE_ENTRIES 

equ 

232 


ERROR 

NO FREE STORE 

Nicht genug Speicherplatz. 


ERROR' 

'FILENOTOBJECT 

Sie 

haben versucht, eine Textdatei 

o.ä. 



als Programm zu starten. 


ERROR 

OBJECTIN USE 

Objekt (Datei, Verzeichnis usw.) 

wird 



schon von einem anderen Programm benutzt. 



das 

sich die Exklusivrechte geben ließ. 

ERROR 

OBJECT EXISTS 

Das 

Objekt existiert schon. 


ERROR" 

OBJECT NOT FOUND 

Das Objekt wurde nicht gefunden. 


error" 

OBJECTWRONG TYPE 

Der 

Objekts-Typ stimmt nicht. Sie 

haben 



z.B. 

versucht, ein Verzeichnis als 

Datei 



zu öffnen. 


ERROR 

DIS KNOTVAL ID AT E D 

Die 

angesprochene Diskette wurde 

noch 



nicht vom DOS als gültig erklärt. 


ERROR 

DISK WRITE PROTECTED 

Die 

Diskette ist schreibgeschützt. 


ERROR" 

RENAMEACROSS DEVICES 

Mittels RENAME kann man eine Datei ledig- 



lieh in ein anderes Verzeichnis, 

nicht 



aber auf eine andere Diskette bringen 


ERROR 

DIRECTORY NOT EMPTY 

Nur 

ein leeres Verzeichnis kann gelöscht 



werden. 


ERROR 

DEVICE NOT MOUNTED 

Das 

angesprochene Gerät ist dem DOS 

nicht 


ERROR SEEK ERROR 


ERROR COMMENT TOO BIG 


bekannt. 

Der SEEK-Befehl wurde über die Dateigren¬ 
zen hinaus angewandt. 

Der angegebene Dateikommentar ist zu lang. 
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ERROR DISKJPUI.L 
ERRORDELETEPROTECTED 

ERROR_WRITE_PROTECTED 

ERROR_READ_PROTECTED 

ERRORNOTADOSDISK 

ERRORNODISK 

ERROR NO MORE ENTRIES 


Die Diskette ist voll. 

Eine löschgeschützte Datei sollte gelöscht 
werden. 

Eine schreibgeschützte Datei sollte verän¬ 
dert werden. 

Eine lesegeschützte Datei sollte gelesen 
werden. 

Die angesprochene Diskette ist keine gül¬ 
tige DOS-Diskette. 

Im angegebenen Laufwerk ist keine Dis¬ 
kette . 

Das untersuchte Verzeichnis enthält keine 
weiteren Einträge. 


Falls Sie den einen oder anderen Fehler nicht verstehen 
sollten, macht nichts, später gehen wir noch genauer darafu 
ein. Die Tabelle steht nur der Vollständigkeit halber in 
dieser Form hier. Anhand des Fehlercodes, den Sie bekommen, 
können Sie dann im Programm entsprechend reagieren. Im Falle 
"Write Protected" könnten Sie z.B. den Benutzer auffordern, 
den Schreibschutz zu entfernen, bei "Disk Full" oder "No 
Disk" möchte er doch bitte eine passende Diskette einlegen, 
usw. 


Als nächstes ein kleines Beispielprogramm zum Öffnen und 
Schließen einer Datei und zur Fehlerbehandlung. Die Datei 
'test' soll in der RAM-Disk erzeugt und geöffnet werden. 
Wenn ein Fehler auftritt, wird in eine entsprechende Routine 
verzweigt, ansonsten wird die Datei wieder geschlossen. Die 
DOS-Basis wird in a6 vorausgesetzt: 


move.1 

#fname,dl 

; Zeiger auf Namenstext nach dl 

move.1 

11006,d2 

; Öffnungs-Modus: Neue Datei 

jsr 

-30(a6) 

; Open anspringen 

tst.l 

do 

; Fehler beim öffnen? 

bne 

labl 

; Ungleich 0 = kein Fehler 

jsr 

—13 2(a6) 

; DOS-Routine IoErr 

move.1 

d0,d2 

; Fehlercode zur Weiterverarbeitung 
; nach d2 

bra 

error 

; Zur Fehlerbehandlungs-Routine 

move.1 

d0,d4 

; Handle in d4 sichern 
; Weitere Programmteile 

move.1 

d4,dl 

; File-Handle nach dl 

jsr 

-36(a6) 

; Zur Close-Routine 


; Und weiter im Programm 


fname: dc.b "ranntest",0 

even 


Bild 4.1: Beispielprogramm Öffnen und Schließen einer Datei 
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4.1.3 Lesen und Schreiben 

Nun können wir also Dateien öffnen und schließen. Das 
alleine reicht noch nicht. Wir wollen ja auch irgendetwas 
mit der Datei anstellen, sprich Daten in ihr speichern. Die 
DOS-Routinen, die wir dazu benötigen (Read und Write), 
wurden im 3. Kapitel schon ausführlich vorgestellt, deshalb 
hier nur noch einmal der "Library-Routinen-Kasten": 


Read 



= -42 (DOS-Library) 


*file 

dl 

< 

Handle der zu lesenden Datei 


*buffer 

d2 

< 

Startadresse des Lese-Puffers 


length 

d3 

< 

Anzahl Datenbytes 


reallyread 

do 

> 

Anzahl wirklich gelesener 

(-l=Fehler) 

Bytes 

Erklärung 



Liest Daten aus einer Datei 


Write 



= -48 (DOS-Library) 


*f ile 

dl 

< 

Handle der zu schreibenden Datei 


*buffer 

d2 

< 

Startadresse der Daten 


length 

d3 

< 

Anzahl Datenbytes 


writtenOut 

do 

> 

Anzahl wirklich geschriebener 

Bytes 




(-l=Fehler) 


Erklärung 



Schreibt Daten in eine Datei 



Da die beiden Routinen schon bekannt sind, können wir gleich 
das Beispiel-Programm erläutern. Wir wollen die 
Kommandozeile in eine RAM-Testdatei schreiben, sofort wieder 
aus ihr lesen und auf den Bildschirm schreiben. Hinweis: Zur 
Benutzung der RAM-Disk muß sich die Datei "ram-handler" im 
L-Verzeichnis Ihrer Startdiskette befinden! 


* Programm 4.1: Kommandozeile in Datei schreiben 


ExecBase 

= 

4 

OpenLib 

= 

-552 

CloseLib 

= 

-414 

Output 

= 

-60 

Open 

= 

-30 

Close 

= 

-36 

Read 

= 

-42 

Write 

= 

-48 


115 





Kapitel 4 


movem.l 

a0/d0,-(sp) 

; Kommandozeile sichern 

move.1 

ExecBase,a6 

; DOS-Lib öffnen 

lea 

dosname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


jsr 

Output(a6) 

; Output-Handle holen 

move.1 

d0,d4 


move.1 

#fname ; dl 

; RAM-Datei öffnen 

move.1 

#1006,d2 

; Neue Datei 

jsr 

Open(a6) 


tst.l 

dO 


bne 

labl 


Fehler aufgetreten 


add. 1 

#8,sp 

; Kommandozeile vom Stack löschen 

lea 

fehtext,aO 

; Text 'Fehler aufgetreten' 

bsr 

print 

; Im Window ausgeben 

bra 

ende 



* Kein Fehler: Daten in Datei schreiben 


labl: move.l 

d0,d5 

; Handle der RAM-Datei in dB sichern 

movem.l 

(sp)+,a0/d0 

; Kommandozeile zurückholen 

move.1 

d5,dl 

; Handle der Schreib-Datei nach dl 

move.1 

a0,d2 

; Startadresse der Daten (Kommandoz.) 

move.1 

d0,d3 

; Länge der Daten 

jsr 

Write(a6) 

; Write aufrufen 

* RAM-Datei wieder schließen 


move.1 

d5,dl 

; Handle der RAM-Datei 

jsr 

Close(a6) 

; Datei schließen 

* Jetzt existierende RAM-Datei 

öffnen 

move.1 

#fname,dl 

; Datei-Name 

move.1 

#1006,d2 

; Existierende Datei 

jsr 

Open(a6) 

; Datei öffnen 

move.1 

d0,d5 

; Handle sichern 

* Text aus RAM- 

Datei lesen 


move.1 

d5,dl 

; Handle nach dl 

move.1 

#buff,d2 

; Adresse des Puffers 

move.1 

#40,d3 

; Maximal 40 Zeichen 

jsr 

Read(a6) 

; Lese-Aufruf 

move.1 

d0,d3 

; Rückgabe: Anzahl wirklich gelesener 
; Bytes in d3 sichern 
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* Gelesene Daten in Window schreiben 



lea 

move.b 
bsr 

buff,a0 

#0,0(a0,d3) 

print 

; Start des Puffers 
; Text-Endekennzeichen: O-Byte 
; Ausgabe-Subroutine 


move.1 
jsr 

d5,dl 

Close(a6) 

; RAM-Datei schließen 

ende: 

move.1 
move.1 
jsr 

a6,al 

ExecBase,a6 

CloseLib(a6) 

; Lib schließen und Ende 


rts 



print: 

prl: 

movem.1 

move. 1 

clr.l 

addq 

tst.b 

bne 

subq 

dl-d3,-(sp) 

a0,d2 

d3 

#l,d3 
(a0) + 
prl 
#1 ,d3 

; SUB Textausgabe für DOS-Write 
; *a0 < Zeiger auf Text (O-terminiert) 
; d4 < Handle der Ausgabedatei 


move.1 
jsr 

movem.1 
rts 

d4,dl 

Write(a6) 

(sp)+,dl-d3 



* Datenbereich 


dosname: 

fnarae: 

buff: 

fehtext: 


dc.b "dos.library",0 

even 

dc.b "ram:test",0 

even 

ds.b 40 

dc.b 42,"Fehler beim Öffnen der Datei aufgetreten!",10 


Programm 4.1: Kommandozeile in Datei schreiben 


Im Programmteil 'Fehler aufgetreten' wird die Kommandozeile 
auf eine neue, etwas ungewohnte Weise vom Stack gelöscht. Da 
sie nicht mehr gebraucht wird, ist es nicht nötig, sie beim 
Herunternehmen vom Stack noch in ein Register zu schreiben. 
Alle Daten, die man auf den Stack gelegt hat, muß man 
allerdings vor dem Programmende auch wieder von dort 
entfernen, weil sie sonst fälschlicherweise als Return- 
Adresse interpretiert würden. Eine solche Adresse würde aber 
sicherlich nicht zum CLI zurückführen, sondern höchstens ins 
Reich des Gurus. Da wir die Daten nicht in einem Register 
ablegen müssen, erhöhen wir nur den Stackpointer durch einen 
ADD-Befehl. Wir addieren also 8 zum Stackpointer, wodurch 8 
Bytes oder 2 Langworte vom Stack verschwunden sind. 
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Die Benutzung von Read und Write dürfte eigentlich klar 
sein. Ein paar Worte noch zur folgenden Stelle: 

move.l #40,d3 ; Maximal 40 Zeichen 

jsr Read(a6) ; Lese-Aufruf 

move.l d0,d3 ; Rückgabe: Anzahl wirklich gelesener 

; Bytes in d3 sichern 

Unsere eigene Print-Routine erwartet ja als Endekennzeichen 
des Textes ein Nullbyte. Die Datenlänge in d3 ist hier als 
Maximalwert anzusehen. Nach dem Read steht in do die Anzahl 
wirklich gelesener Bytes (falls die Datei kleiner war als in 
d3 angegeben). Diese Anzahl wird in d3 gesichert. Ein paar 
Befehle später wird mittels 

lea buff,a0 ; Start des Puffers 

move.b #0,0(a0,d3) ; Text-Endekennzeichen: O-Byte 

das Nullbyte hinter den Text geschrieben. Wir verwenden die 
Adressierungsart ARI mit Index und Offset, wobei wir den 
Offset nicht benötigen. Zur Startadresse des Textpuffers in 
aO wird die Textlänge in d3 hinzuaddiert, wodurch wir genau 
ein Byte hinter dem letzten Textzeichen landen. Dort wird 
das Nullbyte amgefügt. 

öfters vorkommende Subroutinen, wie z.B. die Print-Routine 
werden wir nur beim ersten Auftreten komplett kommentieren, 
in den weiteren Programmen werden wir dann nur noch ihren 
Zweck und die zu übergebenden Parameter angeben. 


4.1.4 Versetzen der Lese/Schreib-Position 


Die Routinen Read und Write bearbeiten eine Datei 
"sequentiell", d.h. man kann sie immer nur "am Stück" vom 
Anfang bis zum Ende lesen oder beschreiben. Wenn Sie z.B. 
das 50. Byte einer Datei lesen wollen, müssen Sie, wenn Sie 
mit Read arbeiten, zuerst die Bytes 1-49 lesen, um an das 
50. heranzukommen. Dieser Umstand kann, vor allem bei länge¬ 
ren Dateien, zu unnötigem Leseaufwand führen. Es gibt daher 
eine DOS-Routine, die Abhilfe schafft. Sie heißt Seek und 
dient zum Versetzen des Datenzeigers, der ja immer auf das 
nächste zu lesende oder zu schreibende Byte einer Datei 
zeigt: 


Seek 

*file 

dl 

pos 

d2 

offset 

d3 

oldpos 

do 
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< Handle der Datei, deren Datenzeiger ver¬ 
setzt werden soll 

< Anzahl der Bytes, um die der Datenzeiger 
versetzt wird 

< Gibt an, wie 'pos' zu interpretieren ist 

> Vorige Position des Datenzeigers relativ 
zum Dateianfang 
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Erklärung 


Versetzt den Datenzeiger einer Datei 

Folgende Werte für ' 

offset' sind möglich: 

Offset-Typ 

Wert 

Bedeutung 

OFFSET BEGINNING -1 

Relativ zum Dateianfang 

OFFSET CURRENT 

0 

Relativ zur derzeitigen Position 

OFFSET END 

1 

Relativ zum Ende 

OFFSET BEGINNING 

Der Datenzeiger wird an den Dateianfang plus Po- 



sitionszahl, die positiv sein muß, gesetzt. 

OFFSET CURRENT 


Der Datenzeiger wird relativ zur derzeitigen Po- 



sition versetzt, und zwar in Richtung Dateiende, 
wenn 'pos' positiv ist und in Richtung Dateian- 



fang, wenn 'pos' negativ ist. 

OFFSET END 


Der Datenzeiger wird an das Dateiende minus Po- 



sitionszahl, die positiv sein muß, gesetzt. 

Da uns Seek 

die alte Position des Datenzeigers zurückgibt. 

kann man auf 

einfache Weise die Länge einer geöffneten Datei 

feststellen, 

und zwar so: 

move.1 

d5,dl 

; Das Handle stehe in d5 

move.1 

#0,d2 

; Seek nach 0 Bytes 

move.1 

#1 ,d3 

; relativ zum Dateiende 

jsr 

-66(a6) 

move.1 

d5,dl 


move.1 

#0,d2 

; Diesmal nach 0 Bytes 

move.1 

#-l,d3 

; relativ zum Anfang 

jsr 

—66(a6) 

move.1 

d0,d3 

; Länge steht dann in dO 


Bild 4.2: Dateilänge feststellen mit Seek 


Mit dem ersten Seek-Befehl springen wir zum Dateiende. Der 
zweite führt zum Dateianfang. Wichtig ist nun der 
Rückgabewert des zweiten Seek: Er entspricht der 
Datenzeiger-Position vor dem Seek relativ zum Dateianfang. 
Da diese das Dateiende war, ist sie gleichzeitig die 
Dateilänge. Einfach, aber wirkungsvoll. 

Nun noch ein weiteres Beispiel für Seek-Anwendungen: Aus ei¬ 
ner Datei, deren Handle in d5 stehe, sollen ab dem 60. Byte 
10 Bytes gelesen werden und dann ab dem 30. Byte 20 Bytes. 
Hier das Programm: 
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move.1 

d5,dl 

; Handle nach dl 

move.1 

#0,d2 

; Seek nach 60 Bytes 

move.1 

#-l,d3 

; relativ zum Dateianfang 

jsr 

-66(a6) 


bsr 

lesenl 

; Fiktive Lese-Routine 

move.1 

d5,dl 


move.1 

#-40,d2 

; Jetzt -40 Bytes relativ zur 

move.1 

#0 ,d3 

; derzeitigen Position 

jsr 

-66(a6) 


bsr 

lesen2 



Bild 4.3: Weitere Seek-Anwendungen 


Der erste Seek wird wohl einleuchten, aber der zweite? Nach 
dem ersten (fiktiven) Lesen steht der Datenzeiger auf Posi¬ 
tion 70, da Lese- und Schreibbefehle den Zeiger um so viele 
Bytes zum Dateiende hin verschieben, wie gelesen (oder ge¬ 
schrieben) wurden. Um dann zum 30. Byte zu kommen, muß der 
Zeiger um -40 Bytes relativ zur derzeitigen Position ver¬ 
schoben werden. Aller klar? 

Übrigens ist ein Seek relativ zur derzeitigen Position immer 
schneller als ein Seek relativ zum Dateianfang oder -ende. 


4.1.5 Umbenennen und löschen 

Dies sind zwei ganz einfache Funktionen, und sie sind auch 
schnell erklärt. Für beide gibt DOS-Routinen, und zwar fol¬ 
gende : 


Rename = -78 (DOS-Library) 


♦oldname 

dl 

< 

Zeiger auf 
den Datei 

Namenstext 

der umzubenennen- 

♦newname 

d2 

< 

Zeiger auf 

neuen Namenstext 

success 

do 

> 

0 = Fehler 

aufgetreten 


Erklärung 



Gibt einer 

Datei oder 

einem Verzeichnis 


einen neuen Namen 


In dl erwartet die Routine einen Zeiger auf den Namen der 
Datei, die umbenannt werden soll, und in d2 einen Zeiger auf 
den neuen Namen. Zu beachten ist, daß mit Rename eine Datei 
sehr wohl in ein anderes Verzeichnis verlagert werden kann, 
indem man im neuen Namen einen anderen Pfad angibt. Sollte 
man allerdings versuchen, eine Datei auf ein anderes Spei- 
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chermedium zu verlagern, wird Renarae mit einer Fehlermeldung 
(Rename across Devices) abbrechen. Ein kleines Beispiel: Wir 
haben die Datei 'Test' vom letzten Programm immer noch im 
RAM stehen. Angenommen, wir haben im RAM ein Unterverzeich¬ 
nis namens 'Texte', dann bringen wir unser 'Test' auf fol¬ 
gende Weise unter einem neuen Namen dort hinein: 


move.l #oldname,dl 
move.l #newname,d2 
jsr -78(a6) 


; Zeiger auf alten Namen 
; Neuer Name 
; Aufruf Rename-Routine 


oldname: 

dc.b 

even 

"ram:test",0 

newname: 

dc.b 

even 

"ram:texte/testl",0 


Bild 4.4: Umbenennen einer Datei 


Das war's schon. Wenn wir unsere Test-Datei endgültig los¬ 
werden wollen, benutzen wir DeleteFile: 


DeleteFile 

= 

-72 (DOS-Library) 

*name 

dl 

< Zeiger auf 

Namenstext 

success 

dO 

> 0 = Fehler 

aufgetreten 

Erklärung 


Löscht eine Datei oder ein leeres Ver 


zeichnis 


Beispiel: Löschen der Datei "ram:texte/testl": 

move.l #fname,dl ; Name der Datei 

jsr -72(a6) ; Datei löschen 

fname: dc.b "ram:texte/testl",0 

even 

Bild 4.5: Löschen einer Datei 

Einfacher geht's wirklich nicht mehr, oder? 
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4.2 Ordnung ins Chaos: Die Unterverzeichnisse 

Unterverzeichnisse sind eine wichtige Einrichtung im Amiga- 
Dateisystem, denn sie tragen erheblich zur Ordnung auf Ihren 
Datenträgern bei. Stellen Sie sich nur einmal vor. Sie haben 
eine Festplatte von 40 MB und schreiben alle Dateien aller 
darauf befindlichen Programme einfach ins Hauptverzeichnis. 
Das würde sehr schnell in ein unübersehbares Chaos ausarten. 
Wir wollen daher als nächstes lernen, wie man in Assembler 
mit Unterverzeichnissen umgeht, wie man sie anlegt und 
löscht und wie man das aktuelle Verzeichnis wechseln kann. 


4.2.1 Unterverzeichnisse anlegen 

Zu diesem Zweck gibt es die DOS-Routine CreateDir, die ähn¬ 
lich wie die DeleteFile-Routine aufgerufen wird: 

CreateDir = -120 (DOS-Library) 


*name dl < Zeiger auf Namen des anzulegenden Ver¬ 

zeichnisses 

♦newlock dO > Lock des neuen Verzeichnisses oder 0 bei 

Fehler 

Erklärung Erzeugt ein neues Verzeichnis 


Als Name muß der komplette Pfadname des neuen Verzeichnisses 
angegeben werden, also mit Gerätebezeichnung und mit eventu¬ 
ellen Namen von übergeordneten Verzeichnissen (es sei denn, 
das Verzeichnis, in dem ein neues angelegt werden soll, ist 
als das aktuelle Verzeichnis gesetzt). Beispiel: Im Ver¬ 
zeichnis "df0:texte" soll ein Unterverzeichnis namens 
"Sicherung" angelegt werden: 


move.1 

#dirname,dl 


jsr 

-120(a6) 


tst.l 

dO 

; Fehler beim Anlegen? 

beq 

fehler 

; Wenn ja 

move.1 

dO ,d5 

; Lock zur Weiterverarbeitung sichern 


dirname: dc.b "dfO:texte/sicherung",0 

even 


Bild 4.6: Anlegen eines neuen Verzeichnisses 


Sie haben sich sicher schon über den neuen 
gewundert. Ein "Lock" ist etwas ähnliches 


Begriff "Lock" 
wie ein File- 
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Handle. Es ist eine Art Zugriffsnummer einer Datei oder 
eines Verzeichnisses, bezieht sich allerdings nicht auf den 
Inhalt der Datei, sondern dient zum Einholen von Informatio¬ 
nen wie Länge, Schutzstatus usw. Hauptsächlich werden Locks 
beim Einlesen von Verzeichniseinträgen benutzt. Dazu kommen 
wir später noch, zunächst sind Locks für uns einfach Zu¬ 
grif fsnummern auf ein Verzeichnis. 

Genauso, wie Sie eine Datei nach Ende ihrer Bearbeitung 
schließen müssen, muß auch ein Lock wieder freigegeben 
werden. Die entsprechende DOS-Routine heißt UnLock: 


UnLock = -90 (DOS-Library) 


*lock dl < Freizugebendes Lock 

Erklärung Gibt ein Lock wieder frei 


Auch das Lock auf ein neu erzeugtes Verzeichnis müssen Sie 
freigeben (spätestens bei Programmende), es sei denn. Sie 
wollen es noch irgendwie bearbeiten. 

move.l d5,dl ; Lock vom Sicherungsregister nach dl 

jsr -90(a6) ; UnLock anspringen 


4.2.2 Unterverzeichnisse umbenennen und löschen 

Die Datei-Rename-Routine läßt sich auch auf Verzeichnisse 
anwenden. Es gelten die selben Regeln wie bei der Datei-Um¬ 
benennung (alten und neuen Namen angeben, Verschiebung in 
ein anderes Verzeichnis möglich, aber nicht auf ein anderes 
Speichermedium). Benennen wir unser Test-Verzeichnis von 
vorhin in "sicherung2" um: 


move.l #olddirname,dl ; Zeiger auf alten Verz.-Namen 

move.l #newdirname,d2 ; Neuer Name 

jsr -78(a6) ; Aufruf Rename-Routine 


olddirname: dc.b "ram:texte/sicherung”,0 

even 

newdirname: dc.b "ram:texte/sicherung2",0 

even 


Bild 4.7: Umbenennen eines Verzeichnisses 


Zum Löschen von Verzeichnissen verwenden Sie die selbe 
Routine wie zum Löschen von Dateien (DeleteFile). Zwei Vor¬ 
aussetzungen muß das Verzeichnis allerdings erfüllen, um ge¬ 
löscht werden zu können: 
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1. Es darf zur Zeit nicht "gelockt" sein (weder vom eigenen 
Programm noch von einem anderen). 

2. Es muß völlig leer sein. 

Diese Punkte vorausgesetzt können wir unser Test-Verzeichnis 
jetzt löschen: 


move.l #dirname,dl 
jsr -72(a6) 

dirname: dc.b "df0:texte/sicherung2",0 

even 


Bild 4.8: Löschen eines (leeren) Verzeichnisses 


4.2.3 Setzen des aktuellen Verzeichnisses 

Der sicherste Weg, eine Datei oder ein Verzeichnis anzuspre¬ 
chen, ist es, den kompletten Pfadnamen anzugeben. Das kann, 
vor allem bei vielen, geschachtelten Unterverzeichnissen, 
eine Menge Schreibarbeit bedeuten (das kennen Sie vielleicht 
vom CLI her). Daher bietet das Dateisystem die Möglichkeit, 
ein Verzeichnis zum aktuellen Verzeichnis zu erheben. Alle 
Dateien werden, wenn Sie nur über ihren Namen und ohne 
Pfadangabe abgesprochen werden, zuerst dort gesucht. In As¬ 
sembler verwenden wir dafür die DOS-Routine CurrentDir: 


CurrentDir 


-126 (DOS-Library) 


*lock 

dl 

< Lock des zu setzenden aktuellen Ver¬ 
zeichnisses 

*oldlock 

do 

> Lock des bisherigen aktuellen Verzeich¬ 
nisses 

Erklärung 


Setzt das aktuelle Verzeichnis 


Diese Routine erwartet, wie wir sehen, als Parameter ein 
Lock auf ein Verzeichnis. Das müssen wir uns aber erstmal 
besorgen, und zwar mit der Routine Lock: 


Lock 


= -84 (DOS-Library) 

*name 

dl 

< Zeiger auf Namen des zu lockenden Ob¬ 
jekts 

type 

d2 

< Geforderter Typ des Locks 

*lock 

dO 

> Lock oder 0 bei Fehler 

Erklärung 


Holt ein Datei- oder Verzeichnis-Lock 
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'Name' kann ein Verzeichnis oder eine Datei sein (für unser 
Beispiel CurrentDir natürlich ein Verzeichnis). Für 'type' 
sind folgende Werte möglich: 

Lock-Typ Wert Bedeutung 


EXCLUSIVE LOCK 

-1 

ACCESS WRITE 

-1 

SHARED LOCK 

-2 

ACCESS READ 

-2 


Exklusiv-Recht des aufrufenden Programms 
Siehe EXCLUSIVE_LOCK 
Kein Exklusiv-Recht 
Siehe SHARED LOCK 


EXCLUSIVE LOCK 

ACCESS WRITE 
SHARED LOCK 

ACCESS READ 


Exklusiv-Lock-Recht des aufrufenden Programms. 
Geht nicht, wenn schon ein anderes Programm das 
Objekt mit EXCLUSIVE_LOCK gelockt hat. 

Identisch mit EXCLUSIVE_LOCK 

Andere Programme dürfen das Objekt auch zur 
gleichen Zeit locken. 

Identisch mit SHARED LOCK 


Da wir nur das aktuelle Verzeichnis wechseln und nichts 
schreiben wollen, geben wir uns mit SHARED_LOCK zufrieden. 
Als Beispiel soll das Verzeichnis "dfO:texte" zum aktuellen 
werden. Nachdem wir das Lock haben, können wir CurrentDir 
aufrufen. Diese Routine schickt uns als Rückgabewert das 
Lock des vorigen aktuellen Verzeichnisses, welches wir Un- 
Locken müssen. 


move.1 

#dirname,dl 

move. 1 

#-2,d2 

jsr 

-84(a6) 

move.1 

d0,d4 

move.1 

d0,dl 

jsr 

-126(a6) 

move.1 

d0,dl 

jsr 

-90(a6) 


; Name des Verzeichnisses 
; Modus: SHARED_LOCK 
; Lock holen 
; und sichern 

; Nach dl für CurrentDir 
; Dir setzen 

; Altes Dir-Lock nach dl 
; und UnLocken 


dirname: dc.b "df0:texte",0 

even 


Bild 4.9: Wechseln des aktuellen Verzeichnisses 


So langsam wird es mal wieder Zeit für ein Komplett-Bei- 
spielprogramm. Das Thema "aktuelles Verzeichnis" ist dafür 
auch gut geeignet, denn wir können nun einen CLI-Befehl 
"nachprogrammieren": den CD-Befehl. Das zu setzende 
Verzeichnis wird nun aus der Kommandozeile geholt, der Rest 
bleibt gleich: 
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* Programm 4.2: Selbstprogrammierter CD-Befehl 


ExecBase = 

4 



OpenLib = 

-552 



CloseLib 

-414 



Lock 

-84 



CurrentDir = 

-126 



UnLock 

-90 



movem.1 

a0/d0,-(sp) 

; Kommandozeile retten 


move.1 

ExecBase,a6 

; DOS-Lib öffnen 


lea 

dosname,al 



clr.l 

dO 



jsr 

0penLib(a6) 



move.1 

d0,a6 



movem.1 

(sp)+,d0/a0 

; Kommandozeile zurück 


move.b 

#0,-l(a0,d0) 

; Schluß-Return durch Nullbyte 

ersetzen 

move.1 

a0,dl 

; Kommandozeilenstart nach dl 

für Lock 

move.1 

#-2,d2 

; Modus SHARED_L0CK 


jsr 

Lock(a6) 

; Lock holen 


move.1 

dO,dl 

; Lock nach dl für CurrentDir 


jsr 

CurrentDir(a6) 

; Dir setzen 


move.1 

dO,dl 

; Altes CurrentDir nach dl für 

UnLock 

jsr 

UnLock(a6) 

; UnLock aufrufen 


move.1 

a6,al 

; DOS-Lib schließen und Ende 


move.1 

ExecBase,a6 



jsr 

CloseLib(a6) 



rts 





* Datenbereich 

dosname: dc.b "dos.library",0 

even 


Prograitut) 4.2: Selbstprogrammierter CD-Befehl 


Das Programm verhält sich genauso wie der bekannte CD-Be¬ 
fehl. Auch die Angabe eines '/' zum Wechsel in das nächsthö¬ 
here Verzeichnis ist möglich. Die Zeile 

move.b #0,-l(a0,d0) ; Schluß-Return durch Nullbyte ersetzen 

hat folgenden Sinn: Die Lock-Routine erwartet den, mit einem 
Nullbyte abgeschlossenen Verzeichnisnamen. In der Kommando¬ 
zeile steht jedoch als letztes Zeichen ein Return (ASCII- 
10). Dieses muß durch ein Nullbyte ersetzt werden. Dies ge- 
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schieht, indem wir an die Adresse 'Kommandozeilenstart plus 
Kommandozeilenlänge minus 1' eine 0 schreiben. Etwas ähnli¬ 
ches hatten wir ja schon einmal im ersten Programm dieses 
Kapitels. Folgendes Beispiel soll die Rechnung verdeutli¬ 
chen: Angenommen, wir haben den Text 'dfO:' in die Kommando¬ 
zeile geschrieben. Diese liege ab Adresse 1000 im Speicher. 
Ihre Länge beträgt 5 (vier Zeichen plus Return). Das zu er¬ 
setzende Return steht also in der Adresse 1004. In unserer 
Rechnung ergibt sich: 1000 (Startadresse) plus 5 (Länge) mi¬ 
nus 1 = 1004, also die richtige Adresse. 


4.2.4 Ermitteln des übergeordneten Verzeichnisses 

Wenn Sie das Lock eines Verzeichnisses haben, können Sie 
sich von der Routine ParentDir das Lock des übergeordneten 
Verzeichnisses geben lassen (also des Verzeichnisses, in dem 
das erste Verzeichnis steht). Die Amiga-Bezeichnung für ein 
übergeordnetes Verzeichnis lautet "Parent Directory" 
(Eltern-Verzeichnis). 


ParentDir = -210 (DOS-Library) 


♦lock 

♦newlock 

Erklärung 


dl < Lock des gewünschten Verzeichnisses 

do > Lock des übergeordneten Verzeichnisses 

Holt das Lock des übergeordneten Ver¬ 
zeichnisses 


Die Routine gibt Null zurück, wenn kein übergeordnetes 
Verzeichnis vorhanden ist. Auch hier gilt: Wenn Sie das auf 
diese Weise ermittelte Parent-Verzeichnis nicht mehr 
benötigen, müssen Sie es UnLocken. 


4.3 Dateikommentar und Schutzstatus 

Nun kommen wir zu zwei Routinen, die für Verzeichnisse und 
Dateien gleichermaßen einsetzbar sind (wenn Sie im folgenden 
'Objekt' lesen, ist 'Datei oder Verzeichnis' gemeint). Sie 
arbeiten nicht mit Locks oder File-Handles, sondern erwarten 
einfach den Namen des zu bearbeitenden Objekts als Text. 

Den Kommentar eines Objektes setzt man mit der DOS-Routine 
SetComment: 
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SetConunent 

= 

-180 (DOS-Library) 


*name 

dl 

< 

Zeiger auf Namen der gewünschten 

Datei 

*coiranent 

d2 

< 

Zeiger auf Kommentartext (max. 
chen) 

116 Zei- 

success 

do 

> 

0 = Fehler aufgetreten 


Erklärung 



Setzt den Kommentar einer Datei 
nes Verzeichnisses 

oder ei- 

Beispiel: 

Wir wollen die Datei "dfO:test" mit dem Kommentar 


"Dies ist eine Test-Datei" versehen: 


move.l #filename,dl 
move.l #comment,d2 


jsr 

-180(a6) 

filename: 

dc.b 

"df0:test",0 


even 


coiranent: 

dc.b 

"Dies ist eine Test-Datei",0 


even 



Bild 4.10: Setzen des Datei-Kommentars 


Der Schutzstatus einer Datei gibt an, was mit der Datei 
gemacht werden kann (Lesen, Löschen usw.) und enthält 
außerdem diverse Attribute (archiviert, Script-Datei usw.). 
Man verändert ihn mit der Routine SetProtection: 


SetProtection = -186 (DOS-Library) 


*name 

mask 


dl < Zeiger auf Dateinamen 
d2 < Neuer Schutzstatus 


success 


do > 0 = Fehler aufgetreten 


Erklärung 


Setzt den Datei-Schutzstatus 


Im Masken-Langwort steht jedes Bit für ein Schutzattribut. 
Das erste Bit z.B. gibt an, ob die Datei gelöscht werden 
darf (Bit gelöscht) oder nicht (Bit gesetzt). In der Tabelle 
werden die Wertigkeiten der Bits angegeben. Wenn Sie mehrere 
Schutzattribute setzen möchten, können Sie die jeweiligen 
Werte aufaddieren: 
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Schutzattribut Wert Bedeutung 


FIBF DELETE 

1 

Löschschutz 

FIBF EXECUTE 

2 

Ausführungsschutz 

FIBF WRITE 

4 

Schreib-(Veränderungs-)schutz 

FIBF READ 

8 

Leseschutz 

FIBF ARCHIVE 

16 

Datei ist archiviert 

FIBF PURE 

32 

Datei ist resident ladbar 

FIBF SCRIPT 

64 

Datei ist eine Batch-Datei 

FIBF_HIDE 

128 

Datei soll nicht angezeigt werden 

FIBF DELETE 


Die Datei kann nicht gelöscht werden. 

FIBF EXECUTE 


Die Datei kann nicht als Programm geladen und 



ausgeführt werden. 

FIBFWRITE 


Die Datei kann nicht verändert (beschrieben) 
werden. 

FIBF READ 


Die Datei kann nicht gelesen werden. 

FIBF ARCHIVE 


Dieses Bit dient zur Anzeige, daß die Datei ar- 



chiviert wurde. Ein Backup-Programm (z.B. Fest- 
platten-Backup) setzt das Bit nach der Siche¬ 
rung. Bei jeder Veränderung an der Datei wird es 
automatisch vom DOS wieder gelöscht. Das Backup- 
Programm kann so feststellen, welche Dateien 
seit dem letzten Backup verändert wurden. 

FIBF PURE 


Das Pure-Bit zeigt an, daß die Datei, die ein 



Programm beinhalten sollte, mit dem CLI-Befehl 
'Resident' fest in den Speicher geladen werden 
kann. Das Programm muß dazu sowohl mehrfach hin¬ 
tereinander gestartet als auch von mehreren 
Tasks gleichzeigtig benutzt werden können. 

FIBFSCRIPT 


Dieses Bit kennzeichnet die Datei als Script-Da¬ 
tei (ASCII-Datei mit CLI-Befehlen), die über den 
Execute-Befehl des CLI ausgeführt werden kann. 
Ab Kickstart 1.3 werden Dateien mit gesetztem 
Script-Bit bei alleiniger Eingabe ihres Namens 
per Execute ausgeführt, die Angabe von Execute 
ist nicht mehr nötig. 

FIBF_HIDE 


Dieses Bit soll bewirken, daß die Datei im In¬ 
haltsverzeichnis nicht mehr erscheint (wie die 
MS-DOS-Systemdateien), wird aber vom derzeitigen 
Betriebssystem noch nicht ausgewertet. 

Als Beispiel 

setzen wir den Schutzstatus der Datei 


dfO:test" auf Löschbar, Lesbar, Schreibbar und Scriptdatei: 


move.l #filename,dl 

move.l #77,d2 ; = 1 + 4 + 8 + 64 (siehe Tabelle) 

jsr -186(a6) 


filename: dc.b "df0:test",0 

even 


Bild 4.11: Setzen des Datei-Schutzstatus 
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4.4 Bearbeitung von Verzeichniseinträgen 

Der nächste CLI-Befehl, dessen Funktionsweise wir untersu¬ 
chen wollen, ist der Dir-Befehl. Wir beschäftigen uns also 
mit dem Einlesen und Bearbeiten von Verzeichnissen. Dazu 
erläutern wir Ihnen einige Grundlagen. 


4.4.1 Datenstrukturen in Assembler 

Ein sehr wichtiger Bestandteil des Amiga-Systems sind die 
sogenannten "Datenstrukturen" ("Structures"). Eine Struktur 
ist im Prinzip eine Ansammlung von hintereinander im Spei¬ 
cher stehenden Daten. Ähnlich, wie man die CPU-Register für 
Library-Aufrufe mit Daten füllt, kann man sich auch den Auf¬ 
bau einer Struktur vorstellen: Angenommen, wir wollen die 
für eine Textausgabe wichtigen Informationen, die z.B. von 
einer Library-Routine benötigt werden, in einer Struktur zu¬ 
sammenstellen, dann sagen wir, ab der symbolischen Adresse 
(Label) 'struct' soll sie in unserem Programm beginnen. 

Zuerst wollen wir jedoch die Vorder- und Hintergrundfarbe 
eintragen: 

struct: dc.b 1,0 ; Vorder- und Hintergrundfarbe 

Damit haben wir zwei Bytes, jedes für eine Farbe, abgelegt. 
Ein Byte reicht hier aus, da die Farbnummer im Normalfall 
höchstens 64 sein kann. Im Gegensatz zu den Register-Bele¬ 
gungen bei Library-Aufrufen, wo man 'MOVE.L' benutzen kann, 
ist bei Strukturen die Wahl der richtigen Datengröße für die 
einzelnen Einträge sehr wichtig, da sich die weiteren 
Einträge ja sonst verschieben würden. Als nächstes soll die 
Startkoordinate des Textes in x- und y-Position folgen: 

dc.w 0,10 ; Startposition X und Y 

Der Text wird also horizontal ab Pixel 0 (also ganz links am 
Rand) und vertikal ab Pixel 10 ausgegeben. Hier ist schon 
ein Wort nötig (x-Position reicht bis 640). Nun brauchen wir 
noch den Text selber. In unsere "Text-Info-Struktur" fügen 
wir einen Zeiger auf den Text, der woanders im Programm 
steht (bzw. stehen kann), ein: 

dc.l text ; Zeiger auf Text 

Da Adressen immer "lang" sind, verwenden wir hier ein 
Langwort. Der Text selber kommt gleich hinter der Struktur, 
mit einem eigenen Label (das 'text', das wir in der Struktur 
verwendet haben): 

text: dc.b "Test-Text",0 

even 
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Hier sehen Sie schon die Methode, Zeiger (z.B. auf andere 
Strukturen oder auch Texte und Daten) in Strukturen zu 
verwenden. Nochmal die ganze Struktur: 


struct: 

dc.b 

1,0 

; Farben 


dc.w 

0,10 

; X- und Y-Startposition 


dc.l 

text 

; Zeiger auf Text 

text: 

dc.b 

even 

"Test-Text",0 



Wichtig ist, daß der Text mit dem Label davor, nicht mehr 
zur Struktur selber gehört. 

Nun könnten wir z.B. einer Library-Routine einen Zeiger auf 
die Struktur übergeben und von ihr den Text ausgeben lassen. 
Das könnte so aussehen: 

lea struct,aO ; Zeiger auf Struktur-Start 
jsr Print(a6) ; Fiktive Library-Routine 

Beachten Sie, daß es eine Library-Routine "Print", die mit 
unserer Beispiel-Struktur etwas anfangen könnte, nicht gibt. 
In der Intuition-Library gibt es aber eine Routine zur Text¬ 
ausgabe, die eine ähnliche, etwas größere Struktur erwartet. 


4.4.2 BCPL-Pointer und BCPL-Strings 

BCPL ist eine C-ähnliche Programmiersprache, und die BCPL- 
Pointer und -Strings sind zwei Datentypen dieser Sprache. 
BCPL hat die Besonderheit, den Speicher nicht byte-orien- 
tiert, sondern langwort-orientiert anzusprechen. Man kann 
sich das in Assembler übertragen so vorstellen, daß alle Be¬ 
fehle dort mit '.L' enden müssen. 

Ein BCPL-Pointer ist, wie ein Assembler-Pointer, eine Spei¬ 
cheradresse, an der Daten beginnen. Der Unterschied ist der, 
daß ein BCPL-Pointer immer die Adresse dividiert durch 4 
enthält. Um aus einem BCPL-Zeiger die Adresse zu erhalten, 
muß man ihn also mit 4 mainehmen. Daraus folgt auch die 
Beschränkung auf Langwort-Adressen: Wenn man eine Zahl mit 4 
malnimmt, bekommt man immer eine Adresse, die genau auf 
einer Langwort-Grenze liegt. 

Ein BCPL-String ist ein Text im Speicher, der in seinem er¬ 
sten Byte die Länge enthält. Der eigentliche Text beginnt ab 
dem zweiten Byte. Der BCPL-String muß, wie der BCPL-Pointer, 
an einer Langwort-Grenze beginnen. Wenn ein BCPL-String in 
einer Struktur enthalten ist, bedeutet das, daß in der 
Struktur ein BCPL-Zeiger auf den eigentlichen String, der 
woanders im Speicher liegen kann, steht. 

Für uns ist im Umgang mit BCPL-Strukturen wichtig, dafür zu 
sorgen, daß sie an einer Langwort-Grenze liegen. Beim Devpac 
verwendet man dazu die Direktive "cnop 0,4". Sie hat eine 
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ähnliche Wirkung wie die "even"-Direktive, sie richtet das 
Programm aber nicht nur auf eine gerade, sondern auf eine 
durch 4 teilbare Adresse aus. Also genau das, was wir brau¬ 
chen. Hinweis: Beim Profimat-Assembler heißt diese Direktive 
'align.1'! 


4.4.3 Die File-Info-Block-Struktur 

Zum Einbau von eigenen Strukturen in Programme werden wir 
später noch ausführlich kommen. Im Moment wollen wir keine 
Routinen mit Daten versorgen, wir wollen Daten von den Rou¬ 
tinen bekommen. Viele Library-Routinen legen ihre Informa¬ 
tionen an das aufrufende Programm auch in einer Struktur ab 
und schicken als Rückgabewert einen Zeiger auf sie. Dies tut 
auch die Routine, die zur Untersuchung von Verzeichnisein¬ 
trägen zuständig ist. Zur Routine selbst kommen wir gleich, 
erst wollen wir uns die Struktur, in der wir unsere Infos 
bekommen, begutachten. Sie nennt sich File-Info-Block-Struk- 
tur (kurz FIB) und sieht so aus: 


Die FilelnfoBlock-Struktur 


000 

dc.l 

fib DiskKey 

004 

de. 1 

fib DirEntryType 

008 

ds.b 

fib FileName,108 

116 

dc.l 

fib Protection 

120 

dc.l 

fib EntryType 

124 

dc.l 

fib_Size 

128 

dc.l 

fib NumBlocks 

132 

ds.b 

fib DateStamp,l2 

144 

ds.b 

fib Comment,116 

260 


fib SIZEOF 


; Nummer des Verwaltungsblocks 
; > 0 bei Verz., sonst Datei 
; Dateiname, max. 30 Zeichen 
; Schutzstatus 

; Dateilänge in Bytes 

; Zeitpunkt der letzten Änderung 
; Dateikoimnentar 
; SIZEOF = Größe der Struktur 


Von nun an werden alle Strukturen, die uns über den Weg lau¬ 
fen, in dieser Form vorgestellt. Jede Zeile steht für einen 
Eintrag. Ganz links steht jeweils der (dezimale) Offset, das 
heißt der Abstand des Eintrages von der Startadresse der 
Struktur in Bytes. Dann folgt der Eintrags-Typ. Ein 'de' 
steht für einen einzelnen Wert als Byte, Wort oder Langwort. 
Das 'ds.b' steht für einen Eintrag mit mehr als 4 Bytes (wie 
Name, Kommentar usw). In der letzten Zeile der Struktur ist 
dieser Platz leer. Achtung: diese Zeile ist kein Eintrag der 
Struktur mehr, sondern gibt nur ihre Länge in Bytes an. Als 
nächstes kommt die Commodore-Bezeichnung des Eintrages (so 
zu finden in den Include-Files) . Im Falle von 'ds.b' kommt 
hinter der Bezeichnung die Größe des Eintrages, durch ein 
Komma abgetrennt und als Dezimalzahl. In der letzten Zeile 
steht hier "_SIZEOF", was den Eintrag für die Strukturgröße 
deutlich machen soll. Hinter dem Semikolon folgt eine kurze 
Erklärung. Eine ausführliche Erläuterung aller Einträge bzw. 
all derer, die im aktuellen Programm-Zusammenhang benötigt 
werden, erfolgt nach der Struktur, und zwar auf folgende 
Weise: 
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fibDiskKey 

Dieser Eintrag gibt die Blocknummer auf dem Datenträger an, 
auf dem die Verwaltungsdaten des Files oder Directories zu 
finden sind. Damit werden wir uns näher befassen, wenn wir 
Diskettenaufbau und File-System besprechen. 

fib_DirEntryType 

Hier steht eine 0, falls es sich um eine Datei handelt, bei 
einem Verzeichnis ein Wert ungleich 0. 

fib_FileName 

Obwohl dieser Eintrag 108 Bytes in der Struktur einnimmt, 
darf der Dateiname höchstens 30 Zeichen lang sein. 

fib_Protection 

Dieses Langwort entspricht der Schutz-Maske, wie sie bei der 
SetProtection-Routine verwendet wird. Nähere Erklärungen 
siehe dort. 

fibsize 

Dürfte wohl klar sein, 
fibDateStamp 

Dieser Eintrag enthält den Zeitpunkt der letzten Änderung an 
der Datei, wobei Datum und Uhrzeit in einer etwas ungewöhn¬ 
lichen Kodierung angegeben werden. Der Eintrag besteht aus 
drei Langworten, wobei das erste die Anzahl der seit dem 
1.1.1978 vergangenen Tage enthält, das zweite die Anzahl Mi¬ 
nuten seit Mitternacht und das dritte die Anzahl der 50stel 
Sekunden in der laufenden Minute. Dummerweise stellt das DOS 
keine Umrechnungs-Routine zur Verfügung, wir müssen diese 
also selbst schreiben. 

fib_Comment 
Auch klar. 


Zur Untersuchung von Verzeichnissen und Dateien gibt es zwei 
Routinen: Examine und ExNext (Untersuche und Untersuche 
nächsten Eintrag). Sie legen die gerade besprochene Struktur 
an, wir müssen ihnen nur sagen, wo in den Speicher sie ge¬ 
schrieben werden soll, sprich wir müssen Platz im Programm 
für die Struktur reservieren. Sie ist laut SIZEOF $104 Bytes 
lang, also verwenden wir im Programm folgenden Befehl: 

cnop 0,4 

fib: ds.b $104 

Damit haben wir Platz im Speicher. Wie Sie sehen, ist die 
FIB-Struktur eine BCPL-Struktur, weshalb die 'cnop'-Direk¬ 
tive immer vor der Speicherreservierung für einen FIB stehen 
muß. Die Examine-Routine sieht folgendermaßen aus: 
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Examine 

= 

-102 (DOS-Library) 


*lock 

dl 

< Lock des zu untersuchenden 

Objekts 

*fib 

d2 

< Zeiger auf Speicherstelle 
angelegt wird 

, an der FIB 

success 

dO 

> 0 = Fehler aufgetreten 


Erklärung 


Untersucht eine Datei oder 
nis 

ein Verzeich- 

Mit Examine 

kann 

man sowohl Dateien als auch 

Verzeichnisse 


untersuchen. Der Eintrag fib_DirEntryType in der Struktur 
wird dann entsprechend gesetzt. Klar ist auch, daß der Ein¬ 
trag für die Dateilänge bei einem Verzeichnis unbenutzt ist. 
Nach dem Examine-Aufruf können wir die gewünschten Informa¬ 
tionen aus der FIB-Struktur ablesen. Ein Beispiel: Die Länge 
der Datei "dfO:test" soll ermittelt werden: 


move.l #filename,dl 
move.l #-2 
jsr -84(a6) 

; Lock auf Datei holen 

move.l dO,dl 

; Lock nach dl 

move.l #fib,d2 

; Startadresse unseres FIB-Speichers 

jsr -102(a6) 

; Examine aufrufen 

tst.l dO 

; Fehler? 

beq fehler 

; Wenn ja 

lea fib,aO 

move.l $7c(a0),d0 

; Startadresse FIB 

; Die Länge hat den Offset $7c 

filename: dc.b "dfO:test" 

even 

cnop 0,4 

fib: ds.b $104 

,0 


Bild 4.12: Auslesen der Dateilänge aus der FIB-Struktur 


Danach steht die Dateilänge in do. So weit, so gut. Nur 
wollten wir uns ja nicht eine einzelne Datei anschauen, son¬ 
dern wir wollten wissen, welche Dateien denn in einem Ver¬ 
zeichnis stehen. Dazu müssen wir zunächst mal das Verzeich¬ 
nis "examinen" (Lock holen, dann Examine aufrufen). Haben 
wir das getan, stehen die Informationen über das Verzeichnis 
in unserem FIB. Mit der Routine ExNext können wir uns jetzt 
immer den nächsten Eintrag des Verzeichnisses geben lassen. 
Die Informationen kommen in den selben FIB, den wir zu Be¬ 
ginn für das Verzeichnis verwendet hatten. ExNext sieht so 
aus: 
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ExNext 

*lock 

dl 

*fib 

d2 

success 

dO 

Erklärung 



-108 (DOS-Library) 


< Lock auf das zu untersuchende Verzeich¬ 
nis 

< Zeiger auf FIB-Speicherbereich 

> 0 = Keine weiteren Dateien 

Untersucht den nächsten Eintrag eines 
Verzeichnisses 


Die ExNext-Routine wird also genauso aufgerufen wie die Ex- 
amine-Routine. Der große Unterschied ist, daß Examine den 
FIB immer mit den Informationen des gelockten Objekts voll¬ 
schreibt, ExNext aber versucht, den nächsten Eintrag eines 
mit Examine untersuchten Verzeichnisses zu holen. Auch ist 
wichtig, daß eine Verzeichnis-Durchsuchung immer zuerst mit 
Examine eingeleitet werden muß, bevor ExNext benutzt werden 
darf. Nach Examine auf ein Verzeichnis steht aber nicht so¬ 
fort der erste Eintrag im FIB, sondern zuerst die Informa¬ 
tionen des Verzeichnisses selbst. Den ersten Eintrag bekom¬ 
men wir erst nach ExNext. 


4.4.4 Verzeichnisausgabe mit Examine und ExNext 

Als Beispiel nun eine Routine, die "dfO:" einliest und nach 
jedem Eintrag in eine (hier nicht eingebaute) Bearbeitungs- 
Routine springt: 


move.1 

dirname,dl 

; Lock auf "dfO:" holen 

move. 1 

#-2,d2 


jsr 

-84(a6) 


move.1 

d0,d4 

; Lock sichern 

move.1 

d4,dl 

; "dfO:" examinen 

move.1 

#fib,d2 


jsr 

—102(a6) 


tst.l 

dO 

; Fehler? 

beq 

fehler 

; Wenn ja 

move.1 

d4,dl 

; Nächsten Eintrag holen 

move.1 

#fib,d2 

; Wieder FIB-Adresse 

jsr 

-108(a6) 

; ExNext aufrufen 

tst.l 

dO 

; Weiterer Eintrag vorhanden? 

beq 

keineintr 

; Wenn nein 

lea 

fib,a0 

; Startadresse des FIB 

move.1 

4(a0),d0 

; Eintrags-Art nach dO 

lea 

8(a0),al 

; Startadresse Name nach al 

move.1 

$7c(a0),dl 

; Länge nach dl 

bsr 

printeintr 

; Fiktive Routine "Eintrag ausgeben 
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bra 

labl 


; Zur Hauptschleife 

dirname: 

dc.b 

"df0:",0 



even 



fib: 

cnop 

ds.b 

0,4 

$108 



Bild 4.13: Verzeichnisausgabe über FIB 


Damit hätten wir die Grundlagen zum Durchforsten eines Ver¬ 
zeichnisses. Ein Komplett-Programm zu diesem Thema gibt's 
natürlich auch, und das wollen wir uns jetzt anschauen. Es 
soll die Einträge eines von uns bestimmbaren Verzeichnisses 
ausgeben. Hinter dem Namen soll "(DIR)" stehen, wenn es ein 
Unterverzeichnis ist und die Länge, wenn es eine Datei ist. 
Den Namen des zu lesenden Verzeichnisses holen wir diesmal 
zur Abwechslung nicht aus der Kommandozeile, sondern wir be¬ 
nutzen die Read-Routine über das Input-Handle. 


* Programm 4.3: Einfacher Dir-Befehl 

ExecBase = 4 

OpenLib = -552 

CloseLib = -414 

Output = -60 

Write = -48 

Input = -54 

Read = -42 

Lock = -84 

Examine = -102 

ExNext = -108 

UnLock = -90 

move.l ExecBase,a6 ; DOS-Lib öffnen 

lea dosname,al 

clr.l dO 

jsr OpenLib(a6) 

move.l d0,a6 

jsr 0utput(a6) ; Output- und Input-Handle holen 

move.l d0,d4 

jsr Input(a6) 

move.l d0,d5 

lea textl,aö ; Aufforderung zur Eingabe des Ver- 

bsr print ; zeichnisnamens 

move.l d5,dl ; Verzeichnisname von Tastatur lesen 

move.l |dirname,d2 

move.l #50,d3 

jsr Read(a6) 
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lea 

dirname,aO 

; Return-Zeichen nach Dir-Name durch 

move.b 

#0,-l(a0,d0) 

; Null-Byte ersetzen 

* Lock auf Verzeichnis holen 


move.1 

#dirname,dl 

; Name des Dir 

move.1 

#-2,d2 

; Lock-Typ SHMED 

jsr 

Lock(a6) 

; Lock holen 

tst.l 

do 

; Fehler? 

bne 

mainl 

; Wenn nein 

lea 

text2,a0 

; Fehler-Text 

bsr 

print 

; Ausgeben 

bra 

ende 

; Zum Programmende 

* Verzeichnis examinen 


mainl: move.l 

d0,d6 

; Lock sichern 

move.1 

d6,dl 

; Lock nach dl 

move.1 

#fib,d2 

; Startadresse FIB nach d2 

jsr 

Examine(a6) 

; Examine aufrufen 

* Nächsten Eintrag holen 


main2: move.l 

d6,dl 

; Lock nach dl 

move.1 

#fib,d2 

; FIB nach d2 

jsr 

ExNext(a6) 

; Nächsten Eintrag holen 

tst.l 

do 

; Noch Einträge da? 

beq 

main4 

; Wenn nein 

* Informationen ausgeben 


move.1 

#fib+8,a0 

; Startadresse Dateiname im FIB 

bsr 

print 

; Name ausgeben 

tst.l 

fib+4 

; Eintragstyp = Verzeichnis? 

blt 

main3 

; Wenn nein (kleiner Null=File) 

lea 

text3,a0 

; Text " (DIR)" ausgeben 

bsr 

print 


bra 

main2 


main3: move.l 

fib+$7c,d0 

; Dateilänge aus FIB nach do 

lea 

dezbuff,a0 

; Buffer für Dezimal-ASCIl-String 

bsr 

dezascii 

; Umwandlungsroutine aufrufen 

lea 

text4,a0 

; Text " (" mit Länge dahinter ausgeben 

bsr 

print 


lea 

text5,a0 

; Text " Bytes)" ausgeben 

bsr 

print 


bra 

main2 

; Zur Hauptschleife 
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* Verzeichnis-Ende, Dir UnLocken 


main4: 

move.1 

d6,dl 

UnLock(a6) 

; Lock nach dl 


jsr 

; UnLocken 

ende: 

move.1 

a6,al 

; Lib schließen und Ende 


move.1 

ExecBase,a6 



jsr 

CloseLib(a6) 



rts 




print: movem.l dl-d3,-(sp) 

move.l a0,d2 
clr.l d3 

prl: addq #l,d3 

tst.b (a0) + 

bne prl 

subq |l,d3 

move.l d4,dl 
jsr Write(a6) 

movem.l (sp)+,dl-d3 

rts 

dezascii: ; SUB Umrechnung Dez-Zahl -> ASCII-Text 

movem.l dl/d2/al,-(sp) ; dO < Dezimalzahl 

clr.b d2 ; *a0 < Pufferzeiger 

lea values,al 

dal: clr.b dl 

da2: addq fl,dl 

sub.l (al),dO 

bcc da2 

add.l (al),d0 

subq #l,dl 

tst.b dl 

beq da 3 

add.b #"0",dl 

move.b dl,(aO)+ 

moveq #l,d2 

bra da4 

da3: tst.b d2 

beq da4 

move.b #"0",(a0)+ 

da4: tst.b dO 

beq da 5 

add.l #4,al 

bra dal 

da5: move.b #0,(a0) 


; SUB Textausgabe für DOS-Wnte 
; *a0 < Zeiger auf Text (O-terminiert) 
; d4 < Handle der Ausgabedatei 
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movem.l (sp)+,dl/d2/al 
rts 


* Datenbereich 


dosname: 

dc.b 

even 

"dos.library",0 

textl: 

dc.b 

even 

"Name des auszugebenden Verzeichnisses: ",0 

text2: 

dc.b 

even 

"Fehler beim Zugriff auf Verzeichnis!",10,0 

dirname: 

ds.b 

50 

text3: 

dc.b 

even 

" (DIR)",10,0 

text4: 

dc.b 

» i ii 

dezbuff: 

ds.b 

12 

text5: 

dc.b 

11 Bytes) ”, 10,0 

fib: 

cnop 

0,4 

ds.b 

$104 

values: 

dc.l 

1000000000,100000000,10000000 


dc.l 

1000000,100000,10000,1000,100,10,1 


Programm 4.3: Einfacher Dir-Befehl 


Das war schon ein recht langes Programm, nicht wahr? In den 
Zeilen 

lea dirname,aO ; Return-Zeichen nach Dir-Name durch 

move.b #0,-l(a0,d move.b #0,-l(a0,d0) ; Null-Byte ersetzen 


wird das Return-Zeichen am Ende des eingegebenen Textes 
durch ein Null-Byte ersetzt. Diese Methode haben wir schon 
einmal angewandt (beim CD-Programm). 

Wenn beim Locken des Verzeichnisses ein Fehler auftritt, 
wird in 


lea 

text2,a0 

; Fehler-Text 

bsr 

print 

; Ausgeben 

bra 

ende 

; Zum Programmende 


eine entsprechende Meldung ausgegeben. Auf einen Fehler-Test 
nach dem Examine können wir verzichten (wenn Lock geklappt 
hat, wird Examine bestimmt auch klappen). Bei ExNext müssen 
wir einen eventuellen Fehler allerdings berücksichtigen, 
denn als solcher zählt ja auch der Fall "kein Verzeichnis- 
Eintrag mehr da". 

Im Datenbereich haben wir den Text Nr. 4 unmittelbar vor dem 
Dez-ASCII-Wandel-Puffer stehen, ohne abschließendes Null- 
Byte : 


11 ^ ii 

12 


text4: 
dezbuff: 


dc.b 

ds.b 
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Damit erreichen wir, daß wir den Text und die umgerechnete 
Zahl in einem Print-Aufruf ausgeben können, da die Dez- 
ASCII-Routine ja ihrerseits ein Ende-Nullbyte hinter die 
Zahl schreibt. Beachten Sie auch das 'cnop 0,4' vor dem FIB- 
Puffer (BCPL-Struktur)! 


4.4.5 Disketten-Infonnationen 

Nachdem wir nun den Inhalt eines Verzeichnisses ausgelesen 
haben, wollen wir noch ein paar Informationen über die Dis¬ 
kette selbst haben (Diskette bezieht sich hier nicht nur auf 
Floppy-Disks, sondern auch auf Festplatten, die RAM-Disk 
u.ä.) Wir wollen ihren Namen, ihre Größe und ihren Füllungs¬ 
grad wissen. Dazu müssen wir uns zunächst mit einer weiteren 
Struktur herumschlagen, der infoData-Struktur: 


Die 

InfoData-Struktur 


00 

dc.l 

id NumSoftErrors 

Anzahl "weicher" Fehler 

04 

dc.l 

id UnitNumber 

Nummer des Laufwerks 

08 

dc.l 

id DiskState 

Disketten-Zustand, siehe unten 

12 

dc.l 

id NumBlocks 

Anzahl Datenblöcke 

16 

dc.l 

id NumBlocksüsed 

Anzahl belegter Blöcke 

20 

dc.l 

id BytesPerBlock 

Anzahl Bytes in einem Block 

24 

dc.l 

id DiskType 

Disketten-Typ, siehe unten 

28 

dc.l 

id VolumeNode 


32 

dc.l 

id InUse 

1 = Disk wird benutzt 

36 


id SIZEOF 



id_NumSoftErrors 

Hier wird die Anzahl der seit Systemstart auf der Diskette 
aufgetretenen "weichen" Fehler (Checksummenfehler, falsche 
Blocktypen u.ä.) eingetragen. 

idUnitNumber 

Wenn man nicht die Laufwerksbezeichnung (DF0-DF3) zur An¬ 
sprache einer Disk benutzt, sondern ihren Namen, ist es 
vielleicht interessant zu wissen, in welchem Laufwerk die 
Disk liegt. 

idDiskState 

Folgende Werte sind möglich: 

Diskstatus Wert Bedeutung 


ID WRITE PROTECTED 80 Schreibgeschützt 

ID - VALIDÄTING 81 Wird gerade auf Gültigkeit überprüft 

ID~VALIDATED 82 Ist gültig 


ID WRITEPROTECTED Dürfte wohl klar sein. 

ID - VALIDÄTING Die Diskette wurde gerade eingelegt und wird nun 

vom DOS auf Gültigkeit überprüft. Solange dieser 
Zustand anhält, kann von der Disk nur gelesen 
werden. 
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ID_VALIDATED Wenn die Disk gültig ist, wechselt der Status 

auf VALIDATED. Von jetzt an kann auch auf die 
Disk geschrieben werden. Wenn sie fehlerhaft 
ist, bleibt der Status auf VALIDATING. 


id_NumBlocks 

Die Anzahl der insgesamt auf der Disk vorhandenen Daten¬ 
blöcke. Beim Amiga-System umfaßt ein Datenblock immer 512 
Bytes. Eine normale Diskette mit 880 KB hat 1760 Blöcke. 

id_NumBlockUsed 

Die Anzahl der benutzten Blöcke, die unbenutzten kann man 
über die Differenz zu NumBlocks berechnen. 

id_BytesPerBlock 

Anzahl verfügbarer Datenbytes in einem Block. Von den 512 
Bytes in jedem Block werden 24 für Verwaltungsinformationen 
verwendet. Daher sind zur reinen Datenspeicherung 488 Bytes 
in jedem Block verfügbar. 

id_DiskType 

Folgende Werte sind möglich: 

Disk-Typ Wert Bedeutung 


ID_NO_DISK_PRESENT -1 
ID_UNREADABLE_DIS K $42414400 
ID_N0T_REALLY_D0S $4E444F53 
ID_DOS_DISK $444F5300 
ID_FFS_DISK $444F5301 
IDJUCKSTART DISK $4B49434B 


Keine Disk im Laufwerk 
Disk nicht lesbar 
Keine DOS-Disk 
Disk o.k. 

FastFileSystem-Disk 

AlOOO-Kickstart-Disk 


ID_NO_DISK_PRESENT 
ID UNREADABLE DISK 


ID NOTREALLYDOS 

ID DOSDISK 
IDFFS DISK 

ID KICKSTART DISK 


Klar, oder? 

Die Diskette ist nicht lesbar. Die egu-Langworte 
dieses und der folgenden drei Werte stellen je¬ 
weils vier ASCII-Zeichen, die ja ein Byte lang 
sind, dar. Bei UNREADABLE ist es "BAD" (und ein 
O-Byte). 

Die Diskette ist lesbar, ihr fehlen aber wich¬ 
tige Informationen für das Amiga-DOS. Die vier 
ASCII-Zeichen sind "NDOS". 

Eine ganz normale DOS-Diskette ("DOS"+0-Byte). 
Eine Diskette, die mit dem FastFileSystem 
(schnelleres Dateisystem vor allem für Festplat¬ 
ten, ab Kickstart 2.0 auch für Disketten) forma¬ 
tiert wurde. Kennung: "DOS"+l-Byte. 

Die Diskette, die beim Amiga 1000 das Betriebs¬ 
system enthält ("KICK"). Der Amiga 1000 hat, im 
Gegensatz zu den sonstigen Amigas, sein Be¬ 
triebssystem nicht im ROM, sondern auf einer 
Diskette. Nur die grundlegendsten Routinen zum 
Laden von der Disk stehen im ROM. 
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Wie Sie sehen, steht in dieser Struktur alles drin, was wir 
benötigen. Wichtig: Auch dies ist eine BCPL-Struktur (cnop 
0,4 nicht vergessen)! Gefüllt wird sie von der DOS-Routine 
Info: 


Info 


-114 (DOS-Library) 


*lock 

dl 

< Lock auf irgendein Objekt auf 
kette 

der Dis- 

♦Parameter 

d2 

< Adresse des Speichers für 
Struktur 

InfoData- 

success 

dO 

> 0 = Fehler aufgetreten 


Erklärung 


Holt Informationen über eine Diskette 


Wir müssen diese Routine mit einem Lock, das sich in irgend¬ 
einer Form auf die gewünschte Diskette bezieht, versorgen. 
Am besten nimmt man die Geräte-Bezeichnung (z.B. "dfO:"). 
Dazu ein kurzes Beispiel: 


move.l #diskname,dl 

; Geräte-Bezeichnung 

move.l #-2,d2 

; Lock-Typ SHARED 

jsr -84(a6) 

; Lock holen 

move.l dO,dl 

; Lock nach dl für Info 

move.l #dinfo,d2 

; Speicher für Struktur 

jsr -114(a6) 

; Info holen 

diskname: dc.b "df0:",0 


even 


cnop 0,4 

; Nicht vergessen! 

dinfo: ds.b $24 



Bild 4.14: infoData-Struktur füllen 


Und gleich noch ein Komplett-Programm hinterher. Den Parame¬ 
ter (Laufwerksbezeichnung) geben wir diesmal wieder in der 
Kommandozeile an. Wir wollen den Namen wissen (zu finden im 
FileName-Eintrag des FIB, der bei Examine auf ein Laufwerk 
den Diskettennamen enthält), die Gesamtblockzahl und die An¬ 
zahl der freien Blöcke (in der InfoData-Struktur). Also 
frisch ans Werk: 


* Programm 4.4: Ausgabe von Disketten-Informationen 

ExecBase = 4 

OpenLib = -552 

CloseLib = -414 
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Output 

= 

-60 


Write 

= 

-48 


Lock 

' = 

-84 


Info 

= 

-114 


Examine 

= 

-102 


UnLock 

= 

-90 



movem.1 

a0/d0,-(sp) 

Kommandozeile sichern 


move.1 

ExecBase,a6 ; 

DOS-Lib öffnen 


lea 

dosname,al 



clr.l 

dO 



jsr 

OpenLib(a6) 



move.1 

d0,a6 



jsr 

Output(a6) ; 

Output-Handle holen 


move.1 

d0,d4 



movem.1 

(sp)+,a5/d5 

Kommandozeile zurück 


move.b 

#0,-l(a5,d5) 

Schluß-Return durch Nullbyte ersetzen 


move.1 

a5,dl ; 

Lock auf Diskette holen 


move.1 

#-2,d2 



jsr 

Lock(a6) 



tst. 1 

dO ; 

Fehler? 


bne 

mainl ; 

Wenn nein 


lea 

textl,a0 ; 

Fehler-Text 


bsr 

print ; 

ausgeben 


bra 

ende ; 

Zum Programmende 

* InfoData-Struktur füllen 


mainl: 

move.1 

dO ,d6 

Lock sichern 


lea 

dinfo,a4 ; 

Speicher für Diskinfo in Merk-Register 


lea 

fib,a5 ; 

FIB-Speicher ebenso 


move.1 

d6,dl ; 

Lock nach dl 


move.1 

a4,d2 ; 

Diskinfo-Speicher nach d2 


jsr 

Info(a6) ; 

Info holen 

* Diskettentyp prüfen 



cmp.l 

#$444f5300,$18(a4) ; DOS-Diskette? 


beq 

main2 

; Wenn ja 


cmp.l 

#$444f5301,$18(a4) ; FastFileSystem-Diskette? 


beq 

main2 

; Wenn ja 

* Keine 

DOS-Diskette im Laufwerk 



lea 

text2,a0 ; 

Fehlertext 


bsr 

print ; 

ausgeben 


bra 

main4 ; 

Zum UnLocken 


* Diskettennamen ausgeben 
main2: move.l d6,dl 


; Lock 
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move.1 

a5,d2 

Speicher für FIB 


jsr 

Examine(a6) 

Examine rufen 


lea 

text3,a0 

Text "Diskname: " ausgeben 


bsr 

print 



lea 

8(a5),a0 

Disknamen ausgeben 


bsr 

print 



cmp.l 

#81,8(a4) 

Diskstatus "Validating"? 


bne 

main3 

Wenn nein 

* Diskette wird validiert, Block- 

Infos sind ungültig 


lea 

text4,a0 

Fehler-Text 


bsr 

print 

ausgeben 


bra 

main4 


main3: 

lea 

dezbuff,a3 

Speicher für Dezzahl in Merkregister 

* Anzahl Datenblöcke ausgeben 



lea 

text5,a0 

Text "Anzahl Datenblöcke: " 


bsr 

print 



move.1 

12(a4),d0 

Anzahl Blöcke nach dO 


move.1 

a3,a0 

Dez-Puffer 


bsr 

dezascii 

Zahl umrechnen 


move.1 

a3,a0 

Pufferinhalt 


bsr 

print 

ausgeben 

* Anzahl freier 

Blöcke und Bytes ausgeben 


lea 

text6,a0 

Text "Freie Blöcke" 


bsr 

print 



move.1 

12(a4),d3 

Gesamtzahl Blöcke 


sub. 1 

16(a4),d3 

Belegte Blöcke abziehen 


move.1 

d3,d0 

Nach dO 


move.1 

a3, sO 

Dez-Puffer 


bsr 

dezascii 

Umrechnen 


move.1 

a3,a0 

Puffer 


bsr 

print 

ausgeben 


lea 

text7,a0 

Text "Freie Bytes" 


bsr 

print 



mulu 

#488,d3 

Anzahl Blöcke mal 488 (siehe Anm.) 


move. 1 

d3,d0 

Umrechnen 


move. 1 

a3,a0 



bsr 

dezascii 



move. 1 

a3,a0 

Puffer 


bsr 

print 

ausgeben 


lea 

text8,a0 

Text " Bytes)" und Return-Zeichen 


bsr 

print 


main4: 

move.1 

d6,dl 

Lock auf Diskette 


jsr 

UnLock(a6) 

UnLocken 

ende: 

move. 1 

a6,al 

Lib schließen 
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move.1 

jsr 

rts 

ExecBase,a6 

CloseLib(a6) 

; Und tschüß! 

print: 

prl: 

movem.1 

move.1 

clr.l 

addq 

tst.b 

bne 

subq 

dl-d3,-(sp) 

a0,d2 

d3 

#l,d3 
(a0) + 
prl 
#1 ,d3 

SUB Textausgabe für DOS-Write 
*a0 < Zeiger auf Text (0-terminiert) 
d4 < Handle der Ausgabedatei 


move.1 
jsr 

movem.1 
rts 

d4,dl 

Write(a6) 

(sp)+,dl-d3 


dezascii: 

movem.1 
clr .b 
lea 

dl/d2/al f -(sp) , 
d2 

values,al 

SUB Umrechnung Dez-Zahl -> ASCII-Text 
dO < Dezimalzahl 
*a0 < Pufferzeiger 

dal: 

clr.b 

dl 


da2: 

addq 
sub. 1 
bcc 
add. 1 
subq 

#l,dl 
(al),d0 
da 2 

(al),d0 
#l,dl 



tst.b 

beq 

dl 
da 3 



add.b 
move.b 
moveq 
bra 

#"0",dl 
dl,(a0)+ 

#1 ,d2 
da4 


da3: 

tst.b 

beq 

move.b 

d2 
da 4 

#"0",(a0)+ 


da4: 

cmp.l 

beq 

#1/(al) 

da 5 



add. 1 
bra 

#4,al 

dal 


da5: 

move.b 
movem.1 

#0,(aO) 

(sp)+,dl/d2/al 



rts 

* Datenbereich 

dosname: dc.b "dos.library",0 
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textl: 

even 

dc.b 

"Fehler beim Zugriff auf Laufwerk!",10,0 

text2: 

even 

dc.b 

"Keine gültige DOS-Disk im Laufwerk!", 10, 

text3: 

even 

dc.b 

"Diskettenname: ",0 

text4: 

even 

dc.b 

10,"Disk nicht validiert - Anzahl freier 


dc.b 

"Blöcke ungültig!", 10,0 

texts: 

even 

dc.b 

10,"Anzahl Datenblöcke: ",0 

text6: 

even 

dc.b 

10,"Anzahl freie Datenblöcke: ",0 

text?: 

dc.b 

" (\o 

text8: 

even 

dc.b 

" freie Bytes)",10,0 


even 

cnop 

0,4 

fib: 

ds .b 

$104 

dinfo: 

ds.b 

$24 

dezbuff: 

ds.b 

12 

values: 

dc.l 

1000000000,100000000,10000000 


dc.l 

1000000,100000,10000,1000,100,10,1 


Programm 4.4: Ausgabe von Disketten-Informationen 


Keine Sorge, die nächsten Programm werden wieder etwas kür¬ 
zer ausfallen. Das erste Neue in diesem Programm ist das 
Füllen der Info-Struktur. Vor dem Info-Aufruf holen wir uns 
mit 

lea dinfo,a4 ; Speicher für Diskinfo in Merk-Register 

lea fib,a5 ; FIB-Speicher ebenso 

die Startadressen unserer Diskinfo- und FIB-Struktur in 
Adreßregister, weil wir sie noch des öfteren brauchen werden 
und ein Zugriff auf ein Adreßregister schneller geht als je¬ 
desmal die Speicheradresse zu holen. Der Aufruf von Info mit 

move.l d6,dl ; Lock nach dl 

move.l a4,d2 ; Diskinfo-Speicher nach d2 

jsr Info(a6) ; Info holen 

wurde ja schon besprochen. Als nächstes wird der Disktyp ge¬ 
prüft. Im Falle von UNREADABLE oder NOT_DOS usw. wird ein 
Fehlertext ausgegeben. Zulässig sind die Typen DOS_DISK 
($444f5300) und FFS DISK ($444f5301). In diesen beiden Fäl¬ 
len geht es weiter Im Text (bei 'main2'). Die Diskette wird 
examined. Dabei muß man wissen, daß bei Examine auf ein Ver¬ 
zeichnis der Verzeichnisname im FIB steht, und ebenso der 
Diskettenname bei Examine auf das Hauptverzeichnis. So kann 
der Name also direkt aus dem FileName-Eintrag ausgegeben 
werden. 
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Als nächstes wird getestet, ob der Diskstatus "Validating" 
ist, ob die Diskette also gerade die DOS-Gültigkeitsprüfung 
über sich ergehen lassen muß. In diesem Fall sind die Anga¬ 
ben über Blockanzahl und belegte Blöcke noch nicht gültig, 
der entsprechende Ausgabeteil im Programm wird also über¬ 
sprungen. Ansonsten wird die Blockzahl aus der Diskinfo- 
Struktur ausgelesen, umgerechnet und ausgegeben: 


move.1 

12(a4),d0 

; Anzahl Blöcke nach do 

move.1 

a3,a0 

; Dez-Puffer 

bsr 

dezascii 

; Zahl umrechnen 

move.1 

a3,a0 

; Pufferinhalt 

bsr 

print 

; ausgeben 

Die Anzahl freier Blöcke 

wird berechnet, indem von der Ge 

samtblockzahl 

die Anzahl 

belegter Blöcke abgezogen wird 

Diese Zahl wird ausgegeben 


move.1 

12(a4),d3 

; Gesamtzahl Blöcke 

sub.l 

16(a4),d3 

; Belegte Blöcke abziehen 

move.1 

d3,d0 

; Nach do 

move.1 

a3,a0 

; Dez-Puffer 

bsr 

dezascii 

; Umrechnen 


Dann wird der freie Diskplatz noch in Bytes ausgegeben. Die 
Blockanzahl wird mit 488 malgenommen. Eigentlich sind zwar 
512 Bytes in jedem Diskblock, aber aus systemtechnischen 
Gründen nutzt das Amiga-DOS nur 488 Bytes jedes Blocks für 
reine Daten. Beim FastFileSystem ist das allerdings nicht 
mehr so. 

Der Rest des Programms (Disk UnLocken, Lib schließen) dürfte 
klar sein, ebenso die schon bekannten Unterroutinen 'print' 
und 'dezascii'. 


4.5 Arbeit mit einfachen DOS-Fenstern 

Wir verlassen nun den Bereich der Verzeichnisbearbeitung und 
kommen zu den DOS-Spezialgeräten. 

Wir wir schon wissen, sind der Begriff "Datei" und die damit 
verbundenen Routinen nicht streng an eine Disketten-Datei 
gebunden. Es gibt im DOS die Möglichkeit, den Drucker, die 
serielle Schnittstelle oder das Sprachausgabesystem anzu¬ 
sprechen, und man kann sogar einfache Fenster öffnen. Das 
ist auch unser nächstes Thema: die DOS-Fenster. 

Die Gerätebezeichnungen "DFO:" bis "DF3:" für die Disketten¬ 
laufwerke sind sicherlich bekannt. Neben diesen gibt es aber 
noch einige weitere, z.B. für eine Festplatte ("DHO:"), für 
die RAM-Disk ("RAM:"), die resetfeste RAM-Disk ("RAD:") usw. 
Die DOS-Fenster werden auch über solche Gerätenamen verwal¬ 
tet, nämlich über "CON:" und "RAW:". Zunächst wollen wir uns 
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mit CON: beschäftigen. Die mit CON: geöffneten Fenster haben 
sowohl Vor- als auch Nachteile gegenüber "richtigen" 
Intuition-Fenstern (mit denen wir uns im nächsten Kapitel 
beschäftigen werden). Sie sind wesentlich einfacher zu 
handhaben als Intuition-Fenster, bieten aber nicht so 
umfangreiche Möglichkeiten, ihr Aussehen und ihre Funktionen 
zu verändern. 


4.5.1 Öffnen und Schließen von CON-Fenstern 

CON: steht für "Console", also die Tastatur. Dieses 

Bezeichnung soll demnach eigentlich die Tastatur ansprechen, 
aber da man normalerweise auch sehen will, was man eintippt, 
wird ein Fenster geöffnet, das die Eingaben zeigt. 

So wie man beim Ansprechen des Disklaufwerks hinter dem 
Gerätenamen den Dateinamen angibt, schreibt man bei der Be¬ 
nutzung von CON: diverse Informationen über das zu öffnende 
Fenster hinter den Gerätenamen. Genauer gesagt, man gibt an, 
wo die linke, obere Ecke des Fensters liegen soll, wie groß 
es sein soll und welchen Titel es bekommen soll. Diese Para¬ 
meter trennt man jeweils durch einen Schrägstrich ab. Gleich 
ein Beispiel: 

CON:0/0/640/256/Mein CON-Fenster 

; 1 - Fenstertitel 

I- Höhe des Fensters 

- Breite des Fensters 

- Obere Ecke 

- Linke Ecke 

- Gerätebezeichnung 

Diese Angaben für CON würden also ein Fenster öffnen, dessen 
linke, obere Ecke ganz oben auf dem Bildschirm liegt, das 
640 Punkte breit und 256 Punkte hoch ist (also die volle 
Bildschirmgröße einnimmt) und dessen Fenstertitel "Mein CON- 
Fenster" lautet. Da die DOS-Spezialgeräte wie Dateien behan¬ 
delt werden, kann man den ganzen Text als Dateinamen anse- 
hen. Um das Fenster zu öffnen, brauchen wir also lediglich 
die DOS-Routine Open mit diesem Namen aufzurufen, und die 
Close-Routine, um es wieder zu schließen: 


move.1 

#conname,dl 

; Zeiger auf Fenstertext 

move.1 

#1005,d2 

; Status = Gerät schon vorhanden 

jsr 

-30(a6) 

; Open aufrufen 

move.1 

d0,d5 

; Handle sichern 

move.1 

d5,dl 

; Handle nach dl 

jsr 

-36{a6) 

; Fenster schließen per Close 


conname: dc.b "CON:0/0/640/256/Mein CON-Fenster",0 

even 


Bild 4.15: CON-Fenster öffnen und schließen 


148 





Die DOS-Library 


4.5.2 Lesen und Schreiben von CON-Fenstern 

Ebenso wie zum öffnen und Schließen verwendet man auch zur 
Ein- und Ausgabe in CON-Fenster die normalen DOS-Dateirouti- 
nen. Natürlich sind nicht alle Routinen sinnvoll anwendbar, 
wie sollte man z.B. ein CON-Fenster löschen oder umbenennen 
oder es als Verzeichnis ausgeben können. Neben Open und 
Close sind nur Read und Write für CON-Dateien zugelassen. 
Mehr brauchen wir auch gar nicht. 

Die Ein- und Ausgabe in ein CON-Fenster funktioniert genauso 
wie mit den Input- und Output-Handies (also dem Standard- 
CLI-Fenster), hier wird allerdings das selbe Handle für Ein- 
und Ausgabe benutzt. Ein Beispiel darf natürlich nicht 
fehlen: 


* Programm 4.5: 

Ein- und Ausgabe 

in ein CON-Fenster 

ExecBase 

4 


OpenLib = 

-552 


CloseLib 

-414 


Open = 

-30 


Write = 

-48 


Read = 

-42 


Close = 

-36 


move.1 

ExecBase,a6 

DOS-Lib öffnen 

lea 

dosname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


* CON-Fenster öffnen 


move.1 

Iconname,dl 

CON-Dateiname nach dl 

move.1 

#1005,d2 

Gerät schon vorhanden 

jsr 

0pen(a6) 

'Datei' öffnen 

tst.l 

dO 

Fehler beim Öffnen? 

beq 

ende 

Wenn ja 

move.1 

d0,d4 

Handle in d4 sichern 

lea 

textl,a0 

Text im Fenster ausgeben 

bsr 

print 


* Text von Tastatur lesen 


move.1 

d4,dl 

CON-Handle 

move.1 

Ibuff,d2 

Startadresse Textbuffer 

move.1 

#40,d3 

Max. 40 Zeichen 

jsr 

Read(a6) 

Von CON lesen 

move.1 

d0,d3 

Länge sichern 
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* Gelesenen Text wieder ausgeben: 


lea 

text2,a0 

; Einleitungs-Text 

bsr 

print 


lea 

buff,a0 

; Pufferstart 

move.b 

#0,0(a0,d0) 

; Text mit Nullbyte abschließen 

bsr 

print 

; Und raus damit 


* Auf Return-Tastendruck warten (1 Zeichen einiesen) 



move. 1 
move. 1 
move. 1 
jsr 

d4,dl 
#buff,d2 
#l,d3 

Read(a6) 

; CON-Handle 
; Pufferstart 

; Eingabetext ist unwichtig 
; Lesen 

* CON- 

Fenster schließen 



move. 1 
jsr 

d4,dl 

Close(a6) 

; Handle 

; 'Datei' schließen 

ende: 

move. 1 
move. 1 
jsr 
rts 

a6,al 

ExecBase,a6 

CloseLib(a6) 

; Lib schließen und Auf Wiedersehen 

print: 

prl: 

movem.l 

move. 1 

clr.l 

addg 

tst.b 

bne 

subg 

dl-d3,-(sp) 

a0,d2 

d3 

#l,d3 

(a0)+ 

prl 

#l,d3 

; SUB Textausgabe für DOS-Write 
; *a0 < Zeiger auf Text (O-terminiert) 
; d4 < Handle der Ausgabedatei 


move. 1 
jsr 

movem.l 

rts 

d4,dl 

Write(a6) 

(sp)+,dl-d3 



* Datenbereich 

dosname: de.b 

"dos.library",0 

conname: 

even 

dc.b 

"con:0/0/640/60/Ein CON-Fenster 

textl: 

even 

dc.b 

"Geben Sie einen Text ein: ",0 

text2: 

even 

dc.b 

"Sie haben eingegeben: ",0 

buff: 

even 

ds.b 

40 


Programm 4.5: Ein- und Ausgabe in ein CON-Fenster 
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Ob es sinnvoll ist, einen Text einzulesen und sofort wieder 
auszugeben, sei dahingestellt. Am besten betrachten Sie nur 
den Demonstrationszweck des Programms. Neues bringt es 
eigentlich nicht, es soll nur noch einmal zeigen, daß man 
auf ein CON-Fenster genauso zugreifen kann wie auf eine 
Datei. 


4.5.3 RAW-Fenster contra CON-Fenster 

Das zweite Fenster-Konsolen-Gerät des DOS nennt sich "RAW:". 
Das bedeutet soviel wie "roh", woraus sich schließen läßt, 
daß dieser Fenstertyp dem Anwender nicht so viel Arbeit ab¬ 
nimmt wie CON. Letzteres übernimmt nämlich schon alle 
Editierfunktionen: Es zeigt den eingetippten Text im Fenster 
an und läßt Korrekturen mit den Backspace-Taste zu. Dafür 
hat es aber auch einen Nachteil: Nicht alle Tastendrücke 
werden ans aufrufenden Programm weitergeleitet. Das gilt 
z.B. für die Backspace-Taste, aber auch für die ESC-, DEL- 
und HELP-Taste oder die Funktionstasten. Wenn man diese 
Tasten im Programm auswerten will, z.B. in einem Menü, kann 
man mit CON nichts anfangen. 

RAW verhält sich etwas anders: Es zeigt den eingetippten 
Text weder selbstständig im Fenster an, noch läßt es Korrek¬ 
turen mit Backspace o.ä. zu. Alle Tastendrücke werden so wie 
sie kommen (eben 'roh') ans aufrufende Programm weitergelei¬ 
tet. Das gilt auch für die Funktionstasten, die man bei Be¬ 
nutzung von RAW problemlos abfragen kann. Der Nachteil von 
RAW liegt allerdings auf der Hand: Man kann im Programm 
nicht einfach sagen: Lese 40 Zeichen von RAW an die Adresse 
"buff". Im Prinzip wäre Texteingabe auf diese Weise zwar 
möglich, aber der Benutzer würde dann ja gar nicht sehen, 
was er tippt und hätte keinerlei Möglichkeiten zur Kor¬ 
rektur . 

Bei Benutzung von RAW darf man sich also immer nur ein Zei¬ 
chen von der Read-Routine geben lassen, welches dann im Pro¬ 
gramm selbst ausgewertet werden muß. Im einfachsten Fall muß 
also ein Backspace in Form von Löschen der letzten Eingabe 
(falls schon etwas eingegeben wurde) im Speicher und auf dem 
Bildschirm bearbeitet werden, Return zeigt das Eingabeende 
and und sonstige (gültige) Zeichen müssen auf dem Bildschirm 
ausgegeben und in den Textspeicher geschrieben werden. Wir 
müssen also einiges an Arbeit auf uns nehmen, die CON uns 
abnimmt, dafür können wir aber unseren eigenen, individuel¬ 
len Editor schreiben. 


4.6 Sonstige DOS-Geräte 

Nachdem wir uns nun ausgiebig mit CON- und RAW-Fenstern be¬ 
schäftigt haben, wollen wir sehen, was es sonst noch für 
DOS-Geräte gibt. Wichtig zu wissen ist, daß es zwei Arten 
von Geräten gibt, die richtigen Geräte (DFO:, CON: usw.) und 
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die sog. logischen Geräte. Diese stehen nicht für ein wirk¬ 
liches Gerät wie ein Disklaufwerk oder die Tastatur, sondern 
sind frei wählbare Bezeichnungen, die einem Verzeichnis oder 
einer Datei auf einem Datenträger zugewiesen werden. Bei¬ 
spiele dafür sind die LIBS:, FONTS: usw. Diese werden beim 
Systemstart den entsprechenden Verzeichnissen auf der 
Startdiskette zugewiesen. Ansehen und ändern kann man diese 
Zuweisungen mit dem CLI-Befehl 'Assign'. Weitere 
Informationen zum Thema logische Geräte finden Sie im Anhang 
"CLI-Schnellkurs". 

Eine Zusammenstellung aller Gerätebezeichnungen, die im 
Amiga-System verwendet werden, finden Sie ebenfalls im CLI- 
Anhang. 


4.6.IBenutzung von NIL: in Assembler 

Wie CON: und RAW: kann auch NIL: als Datei geöffnet werden. 
Als Dateiname braucht nur NIL: angegeben zu werden. Das 
Gerät verwirft alle Daten, die an es gesendet werden, und 
gibt bei Leseversuchen immer 'wirklich gelesene Bytes = 0' 
zurück. Interessant ist NIL: im Zusammenhang mit der DOS- 
Execute-Funktion. 


4.6.2Das verbesserte Konsolen-Gerät NETWCON: 

NEWCON: ist nur in Kickstart 1.3 verfügbar. In früheren 
Kickstart-Versionen existiert es noch nicht, und ab 
Kickstart 2.0 hat das normale Konsolen-Gerät CON die selben 
Funktionen wie NEWCON. Um NEWCON unter 1.3 benutzen zu kön¬ 
nen, muß es gemounted werden. Der "newcon-handler" im L-Ver- 
zeichnis und ein entsprechender Eintrag in der Mountlist 
sind also nötig. 

Die Benutzung von NEWCON entspricht der von CON, bietet 
allerdings einige verbesserte Funktionen zur Editierung. 
Dies sind folgende: 

1. Mit den Cursortasten Links und Rechts kann im eingegebe¬ 
nen Text herumgewandert werden. 

2. Die DEL-Taste entfernt das Zeichen unter dem Cursor. 

3. Mit Cursor-Hoch-Runter kann man die Liste der bisher ein¬ 
gegebenen Texte durchblättern. In der Eingabezeile er¬ 
scheint dann jeweils der vorige (Cursor hoch) oder näch¬ 
ste (Cursor runter) Befehl. 

Wenn Sie Kickstart 1.3-Besitzer sind und die Möglichkeit ha¬ 
ben, NEWCON zu benutzen, sollten Sie diese auf jeden Fall 
wahrnehmen, da NEWCON wesentlich umgänglicher ist als CON. 
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4.6.3 Schnittstellenansprache mit SER:, PAR: und PRT: 

Beim Öffnen der entsprechenden Datei, die normalerweise nur 
beschrieben werden kann (es sei denn, Sie haben ein Modem 
o.ä. am seriellen Port), muß nur die Gerätebezeichnung als 
Dateiname angegeben werden. Das Schreiben erfolgt genauso 
wie bei einer "normalen" Datei. 

Das folgende Beispielprogramm gibt die in der Kommandozeile 
angegebene Diskdatei auf dem PRT:-Drucker aus (bei der Datei 
sollte es sich natürlich günstigerweise um eine Textdatei 
handeln). Die Dateigröße ist auf 5000 Zeichen begrenzt. Sie 
können das aber auch durch Vergrößerung des Puffers im Da¬ 
tenbereich ändern (falls Sie wirklich von diesem Beispiel¬ 
programm eine Riesen-Textdatei ausdrucken lassen wollen). 


* Programm 4.6: Ausgabe einer Datei auf dem Drucker 


ExecBase = 

4 

OpenLib 

= 

-552 

CloseLib = 

-414 

Open 

= 

-30 

Output 

= 

-60 

Write 

= 

-48 

Read 

= 

-42 

Close 

= 

-36 


movem.1 

a0/d0,-(sp) 


move.1 

ExecBase,a6 


lea 

dosname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


jsr 

Output(a6) 


move.1 

d0,d4 


movem.1 

(sp)+,a0/d0 


move.1 

#0,-l(a0,d0) 

* Inhalt der Textdatei einiesen 


move.1 

aO,dl 


move.1 

#1005,d2 


jsr 

0pen(a6) 


tst.l 

dO 


bne 

mainl 


lea 

textl,a0 


bsr 

print 


bra 

ende 


; DOS-Lib öffnen 


; Output-Handle holen 


; Return durch Nullbyte ersetzen 


; Kommandozeile = Dateiname 
; Datei existiert (hoffentlich) 
; öffnen 

; Fehler beim öffnen? 

; Wenn nein 

; Fehler beim Dateizugriff 
; Ausgeben 
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mainl: 

move.1 

d0,d5 

; Handle sichern 


move.1 

d5,dl 

; Textdatei 


move.1 

♦buff,d2 

; Startadresse Textbuffer 


move.1 

#5000,d3 

; Max. 5000 Zeichen 


jsr 

Read(a6) 

; Einlesen 


move.1 

d0,d6 

; Länge sichern 


move.1 

d5,dl 

; Textdatei 


jsr 

Close(a6) 

; Schließen 

* Drucker-Datei 

öffnen 



move.1 

#prtname,dl 

; Dateiname für Drucker 


move.1 

#1005,d2 

; Datei existiert (hoffentlich) 


jsr 

Open(a6) 

; Öffnen 


tst.l 

dO 

; Fehler beim Öffnen? 


bne 

main2 

; Wenn ja 


lea 

text2,a0 

; Fehler beim Öffnen des Druckers 


bsr 

print 

; Ausgeben 


bra 

ende 


main2: 

move.1 

d0,d5 



move.1 

d5,dl 

; Handle des Druckers 


move.1 

#buff,d2 

; Pufferstart 


move.1 

d6,d3 

; Länge 


jsr 

write(a6) 

; Gut druck! 

* Drucker-Datei 

schließen 



move.1 

d5,dl 

; Drucker-Handle 


jsr 

Close(a6) 

; schließen 

ende: 

move.1 

a6,al 

; Lib schließen und Ende 


move.1 

ExecBase,a6 



jsr 

CloseLib(a6) 



rts 



print: 

movem.l 

dl-d3,-(sp) 

; SUB Textausgabe für DOS-Write 


move.1 

a0,d2 

; *a0 < Zeiger auf Text (0-terminiert) 


clr.l 

d3 

; d4 < Handle der Ausgabedatei 

P rl: 

addq 

#1 ,d3 



tst.b 

(a0) + 



bne 

prl 



subq 

#1 ,d3 



move.1 

d4,dl 



jsr 

Write(a6) 



movem.l 

(sp)+,dl-d3 



rts 




* Datenbereich 

closname: dc.b "dos.library",0 
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textl: 

even 

dc.b 

"Fehler beim Öffnen 

der Datei!",1 

text2: 

even 

dc.b 

"Fehler beim Öffnen 

des Druckers! 

prtname: 

even 

dc.b 

"PRT:",0 


buff: 

even 

ds.b 

5000 



Programm 4.6: Ausgabe einer Datei auf dem Drucker 


4.6.4 Sprachausgabe in Assembler mit SPEAK: 

Die Ansteuerung dieses Gerätes erfolgt genauso wie bei SER: , 
PAR: und PRT:. Sie können also das vorige Beispielprogramm 
geringfügig ändern (das "PRT:" in der drittletzten Zeile in 
ein "SPEAK:" ändern), um die Textdatei nicht auf dem Drucker 
auszugeben, sondern sich "vorlesen" zu lassen. Viel Spaß! 


4.7 Ausführung von CLI-Befehlen 


Nun kommen wir zu einer weiteren interessanten Möglichkeit, 
die uns die DOS-Library bietet: Die Ausführung der CLI-Be- 
fehle von Programmen aus. Dazu dient die DOS-Routine Exe- 
cute, nicht zu verwechseln mit dem gleichnamigen CLI-Befehl 
(obwohl die Arbeitsweise sehr ähnlich ist): 


Execute = -222 (DOS-Library) 


*string 

dl 

< 

Zeiger auf Kommandotext 
nicht gewünscht 

oder 0, 

falls 

*infile 

d2 

< 

Handle einer Datei, aus der weitere 

CLI- 




Befehle gelesen werden 
nicht gewünscht 

oder 0, 

falls 

♦outfile 

d3 

< 

File-Handle einer Datei, 

in die eventu- 




eile Ausgaben der Befehle 
den (z.B. CON-Fenster) 

geschickt 

wer- 

status 

dO 

> 

0 = Fehler aufgetreten 



Erklärung 



Führt CLI-Kommandos aus 

(einzelne 

Be- 


fehlszeile und/oder Stapeldatei) 


In dl übergibt man der Routine einen Zeiger auf den Text des 
auszuführenden Befehls. Dieser entspricht einer ganz 
normalen CLI-Eingabezeile mit Befehlsnamen und 
Kommandozeile. Da jeder CLI-Befehl einen Ausgabekanal 
(Datei, CON-Fenster o.ä.) braucht, an den er eventuelle 
Texte schicken kann, muß in d3 ein File-Handle übergeben 
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werden. Das Kann z.B. auch das Handle sein, das man von der 
Output-Routine bekommt. 

Besonders interessant ist die Möglichkeit, ein Handle auf 
eine Textdatei zu übergeben (das 'infile'), aus dem weitere 
CLI-Befehle gelesen werden. Jede Zeile dieser Datei, die mit 
einem normalen Return (ASCII-10) abgeschlossen sein muß, 
wird als eine Befehlszeile interpretiert. Eine solche Datei 
nennt man "Batchfile" ("Stapeldatei"). Da die Angabe der 
einzelnen Befehlszeile in dl nicht nötig ist (dl kann auch 
auf 0 stehen), dürfte Ihnen so langsam klar werden, wie der 
CLI-Execute-Befehl arbeitet .. . 


4.7.1 Ausführung von einzelnen Befehlen 

Als erstes Beispiel-Programm wollen wir den CLI-Befehl "dir 
dfO:" von ausführen lassen: 


* Programm 4.7: Ausführung eines CLI-Befehls 


ExecBase 

4 


OpenLib = 

-552 


CloseLib = 

-414 


Output = 

-60 


Execute = 

-222 


move.1 

ExecBase,a6 

; DOS-Lib öffnen 

lea 

dosname,al 


clr. 1 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


jsr 

Output(a6) 

; Output-Handle holen 

move.1 

d0,d4 


move.1 

#command,dl 

; Zeiger auf Kommandotext 

clr.l 

d2 

; Keine Eingabedatei 

move.1 

d4,d3 

; Ausgabe nach Standard-Output 

jsr 

Execute(a6) 

; Execute aufrufen 

move.1 

a6,al 

; Lib schließen und Ende 

move.1 

ExecBase,a6 


jsr 

rts 

CloseLib(a6) 


* Datenbereich 

dosname: de 

.b "dos.library",0 

even 


command: de 

.b "dir dfO: 

:", 0 

even 



Programm 4.7: Ausführung eines CLI-Befehls 
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Sie können natürlich auch ein anderes Kommando ausführen 
lassen, indem Sie die entsprechende Zeile im Datenbereich 
ändern. Beachten Sie, daß vor dem Execute-Aufruf mit 

move.l d4,d3 ; Ausgabe nach Standard-Output 

festgelegt wird, wohin Ausgaben des Befehls geschickt werden 
sollen. Das ist sehr wichtig. Auch bei Ausführung von CLI- 
Befehlen, die gar keine Ausgabe produzieren, muß ein Ausga¬ 
bekanal angegeben werden, sonst gibt es einen Systemabsturz. 
Falls Sie Textausgabe unterdrücken wollen, können Sie natür¬ 
lich auch eine Datei mit dem Namen "NIL:" öffnen und die 
Ausgabe dorthin schicken. 


4.7.2 Ausführung von Stapeldateien 

Nun wollen wir noch den Execute-Befehl des CLI nachprogram¬ 
mieren. In der Kommandozeile wird der Name der auszuführen¬ 
den Datei übergeben, die geöffnet wird. Das Handle der Datei 
wird an Execute weitergereicht. 


* Programm 4.8: Ausführung von Stapeldateien 


ExecBase = 

4 


OpenLib 

= 

-552 


CloseLib = 

-414 


Open 

= 

-30 


Output 

= 

-60 


Write 

= 

-48 


Execute 

= 

-222 


Close 

= 

-36 



movem.l 

a0/d0,-(sp) 



move.1 

ExecBase,a6 

; DOS-Lib öffnen 


lea 

dosname,al 



clr.l 

do 



jsr 

OpenLib(a6) 



move.1 

d0,a6 



jsr 

Output(a6) 

; Output-Handle holen 


move.1 

d0,d4 



movem.l 

(sp)+,a0/d0 



move.1 

#0,-l(a0,d0) 

; Return durch Nullbyte ersetzen 

* Datei 

öffnen 




move.1 

a0,dl 

; Kommandozeile = Dateiname 


move.1 

#1005,d2 

; Datei existiert (hoffentlich) 


jsr 

0pen(a6) 

; öffnen 


tst.l 

do 

; Fehler beim Öffnen? 
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bne 

mainl 

; Wenn nein 


lea 

textl,aO 

; Fehler beim Dateizugriff 


bsr 

print 

; Ausgeben 


bra 

ende 


mainl: 

move.1 

d0,d5 

; Handle sichern 

* Stapeldatei ausführen 



clr.l 

dl 

; Keine einzelne Befehlszeile 


move.1 

d5,d2 

; Input-File = geöffnete Datei 


move.1 

d4,d3 

; Output-File = Standard-Output 


jsr 

Execute(a6) 

; Datei ausführen 


move.1 

d5,dl 

; Datei wieder schließen 


jsr 

Close(a6) 

; (nicht vergessen!) 

ende: 

move.1 

a6,al 

; Lib schließen und Ende 


move.1 

ExecBase,a6 



jsr 

CloseLib(a6) 



rts 



print: 

movem.l 

dl-d3,-(sp) 

; SUB Textausgabe für DOS-Write 


move.1 

a0,d2 

; *a0 < Zeiger auf Text (0-terminiert) 


clr.l 

d3 

; d4 < Handle der Ausgabedatei 

prl: 

addq 

#1 ,d3 



tst.b 

(a0) + 



bne 

prl 



subq 

#1 ,d3 



move.1 

d4,dl 



jsr 

Write(a6) 



movem.1 

(sp)+,dl-d3 



rts 



* Datenbereich 



dosname 

: de 

.b "dos.library",0 


even 


textl: 

dc.b "Fehler beim Dateizugriff10,0 


Programm 4.8: Ausführung von Stapeldateien 


Die Verfahrensweise ist fast dieselbe wie beim letzten Pro¬ 
gramm. Hier wird allerdings beim Execute-Aufruf der Zeiger 
auf die einzelne Befehlszeile (dl) auf Null gesetzt und in 
d2 das Handle, der zuvor geöffneten Eingabedatei, 
eingetragen. Ansonsten ist alles bekannt. 
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4.8 Laden und Ausführen von Segmenten 

Neben der Möglichkeit, einen Befehl (also ein Programm) per 
Execute auszuführen, wobei die Steuerung an das CLI überge¬ 
ben wird, kann man die Ausführung auch "selbst in die Hand 
nehmen". Es gibt eine DOS-Routine, die eine Programmdatei in 
den Speicher lädt, die nötigen Anpassungen vornimmt 
(Umrechnung der absoluten Adressen) und dem aufrufenden Pro¬ 
gramm die Startadresse mitteilt. 

Die Adreßumrechnung, die im Abschnitt über die PC-relative 
Adressierung (2.4.9) schon einmal erwähnt wurde, geschieht 
anhand einer Tabelle, die im Anschluß an das eigentliche 
Programm in der Datei steht. In dieser Tabelle sind alle 
Stellen im Programm (relativ zum Programmanfang) ver¬ 
zeichnet. Auf alle diese Adressen wird einfach die wirkliche 
Startadresse des Programms im Speicher aufaddiert. 

Damit eine Datei als ausführbares Programm erkannt wird, muß 
sie einige Bedingungen erfüllen. So müssen z.B. die Adreß- 
Umrechnungstabelle und einige Verwaltungsdaten vorhanden 
sein. Im Normalfall brauchen wir uns um die Einrichtung der 
Tabelle und der sonstigen Daten nicht zu kümmern, das 
übernimmt der Assembler für uns. Den genauen Aufbau eines 
ausführbaren Programms werden wir in einem späteren Kapitel 
besprechen. 


Die Programmlade-Routine des DOS heißt LoadSeg: 


LoadSeg 


= -150 (DOS-Library) 

*filename 

dl 

> Zeiger auf Namenstext des zu ladenden 
Programmes 

♦segment 

dO 

> BCPL-Zeiger auf erstes Segment oder 0 
bei Fehler 

Erklärung 


Lädt ein Programm als Segment ein 


Das 'Seg' steht für Segment. Ein Programm kann aus mehreren 
Teilen bestehen, die nicht unbedingt hintereinander im Spei¬ 
cher stehen müssen. Diese Teile nennt man Segmente. Die La¬ 
deroutine legt die Segmente entsprechend des verfügbaren 
Speicherplatzes ab. In dO bekommen wir von LoadSeg einen 
BCPL-Zeiger auf das erste Segment in der Programmdatei, wel¬ 
ches auch immer als erstes gestartet wird. Da es sich um 
einen BCPL-Zeiger handelt, müssen wir ihn mit 4 mainehmen, 
um die wirkliche Speicheradresse zu erhalten. Das erste 
Langwort jedes Segmentes ist wiederum ein BCPL-Zeiger auf 
das jeweils nächste Segment (im letzten Segment steht in 
diesem Langwort eine 0), welchen wir überspringen müssen. 
Die von LoadSeg gemeldete Zahl muß also mit 4 multipliziert, 


159 







Kapitel 4 


und auf diese Zahl muß 4 aufaddiert werden. Die Adresse, die 
wir dann bekommen, können wir per JSR anspringen. Allerdings 
brauchen wir die, von LoadSeg gemeldete Zahl selbst später 
auch noch, weshalb sie erhalten bleiben muß. Im Programm 
sähe das dann so aus: 


move.1 

dO,dl 

; Die LoadSeg-Rückgabe wird noch 
; gebraucht 

asl.l 

#2,dl 

; Zahl mal 4 

addq 

#4,dl 

; Und plus 4 

move.1 

dl ,a0 

; In ein Adreßregister 

jsr 

(aO) 

; Und anspringen 


Zunächst müssen wir allerdings noch ein bißchen Vorarbeit 
leisten. Man darf nämlich erstens nicht davon ausgehen, daß 
sich ein LoadSeg-Programm an die Routinenaufruf-Konventionen 
hält und alle Register bis auf do, dl, aO und al rettet. Vor 
dem JSR-Aufruf müssen wir daher die Register selbst sichern, 
am besten mit dem Befehl 

movem.l d0-d7/a0-a6,-(sp) 

Nach dem Aufruf holen wir sie mit 

movem.l (sp)+,d0-d7/a0-a6 

zurück. Im Prinzip muß man natürlich nicht alle Register 
retten, sondern nur die, welche später noch benötigt werden. 
Aber da es vor allem bei längeren Programmen immer schwerer 
wird, den überblick über die benötigten Registerinhalte zu 
behalten, sichert man am besten alle (lieber ein Register 
mehr retten als eins zu wenig). 

Bei manchen Programmen besteht die Möglichkeit, diese 
mehrfach hintereinander aufzurufen, ohne sie neu laden zu 
müssen. Das funktioniert dann, wenn das Programm nicht 
während des Ablaufs irgendwelche Werte (oder auch Befehle) 
verändert, die beim Start nicht wieder in ihre ursprüngliche 
Form zurückgebracht werden. Es gibt nur eine Möglichkeit, 
herauszufinden, ob ein Programm mehrfach startbar ist: Sie 
müssen es ausprobieren. Wenn es nicht geht, werden Sie es 
sehr wahrscheinlich an einem Absturz, zumindest aber an 
einem fehlerhaften Programmablauf merken. 

Die DOS-Routine, die ein Programm nach der Ausführung wieder 
aus dem Speicher entfernt (sprich den belegten Speicher 
freigibt), heißt UnLoadSeg: 
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UnLoadSeg 

= 

-156 (DOS-Library) 


♦segment 

error 

Erklärung 


dl < BCPL-Zeiger auf Start des freizugebenden 
Segments 

dO > 0 = Fehler aufgetreten 

Gibt Speicher von geladenen Segmenten 
frei 


In dl ist hier exakt der Wert einzutragen, den uns LoadSeg 
gemeldet hat, ohne irgendwelche Umrechnungen. Der Aufruf von 
UnLoadSeg ist wichtig, da erst dann der, vom Programm be¬ 
nutzte Speicherplatz wieder freigegeben wird. 

Das folgende Programm lädt ein Programm, dessen Name in der 
Kommandozeile steht, per LoadSeg ein, führt es aus und ruft 
dann UnLoadSeg auf. 


* Programm 4.9: Laden und Ausfuhren eines Programms als Segment 


ExecBase = 

4 


OpenLib 

-552 


CloseLib = 

-414 


LoadSeg = 

-150 


UnLoadSeg = 

-156 


movem.l 

a0/d0,-(sp) 


move.1 

ExecBase,a6 

; DOS-Lib öffnen 

lea 

dosname.al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,a6 


movem.l 

(sp)+,a0/d0 

; Kommandozeile zurück und Abschluß- 

move.b 

#0,-l(a0,d0) 

; Return durch Nullbyte ersetzen 

* Programm per LoadSeg einladen 


move.1 

a0,dl 

; Name des Programmes 

jsr 

LoadSeg(a6) 

; LoadSeg aufrufen 

tst.l 

dO 

; Fehler beim Laden? 

beq 

ende 

: Wenn ja, zum Ende 

* Einsprungadresse berechnen 


move.1 

d0,dl 

BCPL-Pointer nach dl 

asl.l 

#2,dl 

dl mal 4 

addq 

#4,dl i 

dl plus 4 

move.1 

dl,a0 

dl in ein Adreßregister 


161 






Kapitel 4 


* Programm aufrufen 


movem.l 

dO-d7/aO-a6,-(sp) 

; Alle Register sichern 

jsr 

(aO) 

; Programm aufrufen 

movem.l 

(sp)+,dO-d7/aO-a6 

; Register zurück 

move.1 

dO,dl 

Von LoadSeg gemeldeter Wert 

jsr 

UnLoadSeg(a6) ; 

Segment entfernen 

ende: move.1 

a6,al ; 

Lib schließen und Ende 

move.1 

4,a6 


jsr 

CloseLib(a6) 


rts 



* Datenbereich 



dosname: dc.b "dos.library",0 


even 


Programm 4.9: Laden und Ausführen mit LoadSeg 


Weitere Kommentare zu diesem Programm sind wohl nicht nötig. 


4.8.1 Multitasking-gerechtes Warten 

Nun soll noch eine DOS-Routine vorgestellt werden, die the¬ 
matisch recht gut zum Starten von Programmen paßt. Der Amiga 
ist ja bekanntlich eine Multitasking-Maschine. Neben den 
Programmen, die wir schreiben und ablaufen lassen, spielt 
sich noch eine ganze Menge mehr ab. Steht man nun vor der 
Aufgabe eine Verzögerung in sein Programm einbauen zu 
müssen, sollten man dazu nicht einfach eine "leere" Schleife 
programmieren (wie das früher in BASIC oft üblich war), da 
man damit den übrigen Tasks im System wertvolle Rechenzeit 
wegnehmen würde. Stattdessen benutzt man die DOS-Routine 
Delay. Diese versetzt unser Programm in den "Wartezustand", 
wodurch wir den Multitasking-Ablauf nicht mehr stören. Nach 
Ablauf einer festgelegten Zeitspanne wacht unser Programm 
wieder auf und setzt seine Arbeit fort. Die Delay-Routine 
sieht so aus: 


Delay = -198 (DOS-Library) 


timeout dl < Anzahl der Ticks (=1/50 Sekunde), die 

gewartet werden soll 

Erklärung Versetzt den Task für 'ticks' 50stel Se¬ 

kunden in den Wartezustand 
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Was der Begriff "Wartezustand" systemtechnisch bedeutet, 
wird im Exec-Kapitel geklärt. Im Moment müssen wir nur wis¬ 
sen, wie wir Verzögerungen in unsere Programme einbauen, 
ohne andere Tasks zu stören. 
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Die Intuition-Library 


Windows 

Screens 

Intuition-Grafikstrukturen 

Gadgets 

Menüs 

Requester 

Auswertung von Nachrichten 


Die Basis-Struktur der Intuition-Library 
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Nachdem wir die DOS-Library kennengelernt haben, wollen wir 
uns nun die Intuition-Library genauer ansehen. Sie bildet 
die Schnittstelle zwischen dem Anwender und dem Rechner. Mit 
ihren Funktionen kann man leicht eine benutzerfreundliche 
Oberfläche programmieren, die über Screens, Windows, Reque- 
ster, Menüs und Gadgets verfügt. 


5.1 Windows 


Anfängen wollen wir mit den Windows (Fenstern). Im vorange¬ 
gangenen Kapitel haben wir uns schon mit ihnen beschäftigt 
und sie wie Dateien mittels der Open-Anweisung der DOS-Li¬ 
brary geöffnet. Wenn wir die OpenWindow-Funktion der Intui¬ 
tion-Library benutzen, müssen wir zwar auf die einfache 
Handhabung verzichten, dafür können wir aber auf das Ausse¬ 
hen stärker Einfluß nehmen. 


OpenWindow = -204 (Intuition-Library) 


*NewWindow 


aO < Zeiger auf eine initialisierte NewWin- 
dow-Struktur. 


♦Window 


Erklärung 


do > Zeiger auf die, von Intuition angelegte 
Window-Struktur des geöffneten Fensters 
oder eine Null, wenn das Fenster nicht 
geöffnet werden konnte. 

öffnet ein Fenster, welches durch die 
Einträge der angegebenen Window-Struktur 
beschrieben ist. Außerdem wird eine neue 
Struktur angelegt, mit der das Fenster 
verwaltet wird. 


Wie man sieht, benötigt die OpenWindow-Funktion nur einen 
Parameter. Dies ist ein Zeiger auf eine NewWindow-Struktur, 
die von uns zuvor angelegt werden muß. Anhand der eingetra¬ 
genen Werte wird dann das Fenster geöffnet und eine neue 
Struktur, die Window-Struktur, von Intuition aufgebaut. Auf 
diese Struktur erhalten wir, nach Beendigung der Funktion, 
einen Zeiger zurück, mit dem wir unser Fenster ab jetzt an¬ 
sprechen können. 

Wenn wir schon ein Fenster öffnen können, ist es auch wich¬ 
tig zu wissen, wie man es wieder schließt. Dazu gibt es die 
Funktion CloseWindow. Sie benötigt auch nur einen Parameter, 
und zwar den Zeiger auf die Window-Struktur, den wir von 
OpenWindow erhalten haben. 
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CloseWindow 

= -72 (Intuition-Library) 

*Window aO < 

Zeiger auf die Window-Struktur, die man 


von OpenWindow erhalten hat. 

Erklärung CloseWindow schließt das Fenster mit der 

angegebenen Window-Struktur. 


Damit wären die wichtigsten Funktionen für Windows erklärt. 
Was uns nun noch fehlt ist die NewWindow-Struktur, die In¬ 
tuition als Bauanleitung für unser Fenster dienen soll. Sie 
setzt sich wie folgt zusammen: 

NewWindow-Struktur: 


00 

dc.w 

nw LeftEdge 

; linke Ecke 

02 

dc.w 

nw TopEdge 

; obere Ecke 

04 

dc.w 

nw Width 

; Breite 

06 

dc.w 

nw Height 

; Höhe 

08 

dc.b 

nw DetailPenl 

; Vordergrundfarbe 

09 

dc.b 

nw BlockPen 

; Hintergrundfarbe 

10 

dc.l 

nw iDCMPFlags 

; IDCMP-Flags 

14 

dc.l 

nw Flag 

; Flags 

18 

dc.l 

*nw FirstGadget 

; Zeiger auf erstes Gadget 

22 

dc.l 

*nw_CheckMark 

; Grafik für Menühaken 

26 

dc.l 

*nw Title 

; Name des Festers 

30 

dc.l 

*nw Screen 

; Zeiger auf Screen 

34 

dc.l 

*nw BitMap 

; Zeiger auf eigene BitMap 

38 

dc.w 

nw MinWidth 

; X-Minimum des Fensters 

40 

dc.w 

nw MinHeight 

; Y-Minimum des Fensters 

42 

dc.w 

nw MaxWidth 

; X-Maximum des Fensters 

44 

dc.w 

nw MaxHeight 

; Y-Maximum des Fensters 

46 

dc.w 

nw Type 

; Art des Screens, auf dem das 




; Window erscheint 

48 


nw SIZEOF 



nwLeftEdge, nw_TopEdge,nw_ Width, nw_Height 

Positionierung und Größenangabe des Fensters. 

nwjDetailPen, nw_BlockPen 

Farbtabellennummer des Vorder- (DetailPen) und Hintergrundes 
(BlockPen). 

nwIDCMPFlags 

Durch die Intuition Direct Communications Message Ports- 
Flags wird Intuition mitgeteilt, welche Ereignisse, die un¬ 
ser Fenster betreffen, an unser Programm (bzw. useren Mes¬ 
sage-Port) weiterzuleiten sind. Auf die Möglichkeiten, die 
uns damit zur Verfügung stehen, gehen wir etwas später ein. 
Die Flags haben folgende Bedeutung: 

IDCMP-Flag Wert Bedeutung 


SIZEVERIFY $00000001 Größe des Fensters soll verändert werden 
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NEWSIZE 

REFRESHWINDOW 

ACTIVEWINDOW 

INACTIVEWINDOW 

GADGETDOWN 

GADGETUP 

CLOSEWINDOW 

REQSET 

REQCLEAR 

REQVERIFY 

MENUPICK 

MENUVERIFY 

MOUSEBUTTONS 

MOUSEMOVE 

DELTAMOVE 

INTUITICKS 

NEWPREFS 

DISKINSERTED 

DISKREMOVED 

RAWKEY 

VANILLAKEY 

WBENCHMESSAGE 

LONELYMESSAGE 


$00000002 

$00000004 

$00040000 

$00080000 

$00000020 

$00000040 

$00000200 

$00000080 

$00001000 

$00000800 

$00000100 

$00002000 

$00000008 

$00000010 

$00100000 

$00400000 

$00004000 

$00008000 

$00010000 

$00000400 

$00200000 

$00020000 

$80000000 


Größe des Fensters wurde verändert 
Fenster wurde überlagert 
Fenster wurde aktiviert 
Fenster wurde deaktiviert 
GADGIMMADIATE-Gadget wurde gewählt 
RELVERIFY-Gadget wurde angewählt 
Close-Gadget wurde angewählt 
Erster Requester wurde geöffnet 
Letzter Requester wurde geschlossen 
Requester soll geöffnet werden 
Menüpunkt wurde gewählt 
Menü soll gezeigt werden 
Eine Maustaste wurde gedrückt 
Maus wurde bewegt 
Mausbewegung relativ 
Jede zehntel Sekunde ein Nachricht 
Preferences wurden geändert 
Diskette wurde eingelegt 
Diskette wurde entnommen 
Tastatureingabe mit RAW-Codes 
Eingabe mit bearbeiteten KeyCodes 
Nachricht von der WBench 
Keine IDCMP-Nachricht 


ACTIVEWINDOW 

INACTIVEWINDOW 

GADGETDOWN 

GADGETUP 

CLOSEWINDOW 


SIZEVERIFY 


NEWSIZE 

REFRESHWINDOW 


REQSET 

REQCLEAR 

REQVERIFY 


MENUPICK 


Fenster wurde aktiviert. 
Fenster wurde deaktiviert. 


Gadget des 
betätigt. 

Typs 

GADGIMMEDIATE 

wurde 

Gadget des Typs 

betätigt. 

RELVERIFY 

wurde 

CloseGadget 

des 

Fensters 

wurde 

angewählt. 

Achtung: 

Das Fenster 

wird 


nicht automatisch geschlossen! 

Benutzer versucht, das Fenster in seiner 
Ausdehnung zu verändern. (Um die 
Veränderung des Fensters zu gestatten, 
muß die Nachricht bestätigt werden. Erst 
dann wird die Größe geändert!) 

Die Größe des Fensters wurde geändert. 

Bei Überlagerungen durch andere Fenster 
kann es passieren, daß der Inhalt 
unseres Fensters verlorengeht. Durch 
REFRESHWINDOW erfahren wir, wann ein 
Teil des Fensters verdeckt wurde und 
können dann den Inhalt wiederherstellen. 
Der erste Requester des Fensters wurde 
erstellt. 

Der letzte Requester des Fensters wurde 
geschlossen. 

Intuition meldet, daß ein Requester 
geöffnet werden soll. Nach Bestätigung 
des Empfangs wird er erstellt. 

Ein Menüpunkt ist ausgewählt worden. 
Dabei kann es auch sein, daß die rechte 
Maustaste (RMT) nur kurz gedrückt und 
wieder losgelassen wurde. Bei der 
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MENUVERIFY 


MOUSEBUTTONS 


MOOSEMOVE 

DELTAMOVE 

INTÜITICKS 


NEWPREFS 

DISKINSERTED 

DISKREMOVED 

RAWKEY 


VANILLAKEY 


WBENCHMESSAGE 

LONELYMESSAGE 


Menüabfrage werden wir dieses Problem 
lösen. 

Intuition wartet auf Bestätigung der 
Meldung, um die Menüs wieder neu zu 
zeichnen. 

Linke oder rechte Maustaste ist gedrückt 
worden. Sollte die linke Maustaste über 
der HITBOX eines Gadgets gedrückt worden 
sein, erhalten wir keine Nachricht. 
Außerdem bekommen wir für die rechte 
Maustaste nur eine Meldung, wenn das 
Flag RMBTRAP des Eintrags nw Flag 
gesetzt ist! 

Mausbewegung wird gemeldet (Relativ zur 
linken oberen Fensterecke) 

Mausbewegung wird gemeldet (Relativ zur 
letzten Position der Maus) 

Eine zehntel Sekunde ist abgelaufen. Da 
nach einiger Zeit die Liste der 
eingegangenen Nachrichten mit 

INTUITICKS-Nachrichten überlaufen wäre, 
sendet Intuition nur eine weitere 
Meldung, wenn die vorangegangene mittels 
ReplyMsg quittiert wurde. 

Die Preferences-Werte wurden geändert. 
Diskette wurde eingelegt. 

Diskette wurde entnommen. 

Eine Taste wurde gedrückt. Man erhält in 
der Message-Struktur den RAW-Code, also 
den unbehandelten Tastencode, zurück. 

Eine Taste wurde gedrückt. Man erhält, 
im Unterschied zu RAWKEY, den mit der 
Tastaturtabelle behandelten Wert zurück. 
WorkBench-Message wurde empfangen. 

Keine Intuition-Message angekommen. 


nwFlags 

Der Wert Flags enthält die Einstellung, die das Aussehen des 
Fensters festlegen. Folgende Flags sind definiert: 

Windowflag Wert Bedeutung 


SIZEBRIGHT 

SIZEBOTTOM 

WINDOWSIZING 

WINDOWDRAG 

WINDOWDEPTH 

WINDOWCLOSE 

BACKDROP 

GIMMEZEROZERO 

BORDERLESS 

ACTIVATE 

REPORTMOUSE 

RMBTRAP 

NOCAREREFRESH 


$00000010 

$00000020 

$00000001 

$00000002 

$00000004 

$00000008 

$00000100 

$00000400 

$00000800 

$00001000 

$00000200 

$00010000 

$00020000 


Size-Gadget im rechten Rand 
Size-Gadget im unteren Rand 
Gadget für Größeneinstellung 
Fenster kann verschoben werden 
DEPTH-Gadget wird eingebunden 
Close-Gadget wird eingebunden 
Fenster direkt auf Screen legen 
Getrennte Verwaltung Inhalt & Rand 
Fenster ohne Ränder darstellen 
Fenster wird beim öffnen aktiv 
Mauskoordinaten werden gemeldet 
RightMouseButtonTRAP (kein Menü) 

Keine Meldung wenn Fenster beschädigt 
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SIMPLEREFRESH 
SMART_REFRESH 
SUPER BITMAP 


$00000040 Fensterinhalt wird nicht erneuert 

$00000000 verdeckte Bereiche sichern 

$00000080 Restauration aus eigener BitMap möglich 


SIZEBRIGHT 

SIZEBOTTOM 

WINDOWSIZING 

WINDOWDRAG 

WINDOWDEPTH 

WINDOWCLOSE 

BACKDROP 

GIMMEZEROZERO 

BORDERLESS 

ACTIVATE 

REPORTMOUSE 

RMBTRAP 

NOCAREREFRESH 

SIMPLEREFRESH 

SMART REFRESH 

SUPER BITMAP 


Das Size-Gadget soll im rechten Rand 

eingerichtet werden. 

Das Size-Gadget soll im unteren Rand 

eingerichtet werden. 

Das Size-Gadget wird in die Window- 
Struktur eingebunden, damit das Fenster 
vom Benutzer beliebig in seiner Größe 
verändert werden kann. 

Das Fenster kann mit Hilfe der Maus an 
seiner Titelzeile auf dem Screen 
verschoaben werden. 

Depth-Gadgets einbinden. Sie dienen 
dazu, das Fenster in den Vorder- oder 
Hintergrund zu bringen. 

Das Close-Gadget wird in die Titelzeile 
des Windows eingebunden. 

Das Fenster wird direkt auf dem Screen 
dargestellt. Es ist das unterste Fenster 
und kann nicht nach vorne geholt werden. 
System-Gadgets sind nicht erlaubt. 

Der Rand und der Inhalt des Fensters 
werden getrennt voneinander verwaltet. 

Das Fenster wird ohne Rahmen gezeichnet. 
Das Fenster wird direkt, nachdem es 
geöffnet wurde, aktiviert. 

Die Position der Maus wird durchgehend 
gemeldet. 

Das RightMouseButton-TRAP-Flag 

verhindert, daß die Menüzeile bei Druck 
auf die rechte Maustaste erscheint. 

Es wird keine Meldung bei zerstörtem 
Fensterinhalt gesendet. 

Die Erneuerung des Fensters wird nicht 
von Intuition übernommen. Diese Aufgabe 
muß vom Programm erledigt werden. 
Verdeckte Bereiche des Fensters werden 
zur späteren Wiederherstellung des 
Inhalts gespeichert. 

Der gesamte Inhalt des Fensters wird in 
einer BitMap gespeichert, die bei 
Überlagerungsschäden zur Regenerierung 
des Fensters genutzt werden. 


*nw_FirstGadget 

Zeiger auf die Struktur des ersten Gadget, welches eingebun¬ 
den werden soll (Null, wenn kein Gadget eingebunden werden 
soll). 

*nw CheckMark 
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Adresse der Grafikdaten, welche verwendet werden sollen, um 
ein Menüpunkt als ausgewählt zu markieren (Null, wenn der 
Standardhaken benutzt werden soll). 

*nw_Title 

Zeiger auf eine Zeichenkette, die den Text der Titelzeile 
des Fensters enthält. Der Text muß mit einem Null-Byte abge¬ 
schlossen werden. 

♦nwScreen 

Zeiger auf die Screen-Struktur, auf der das Fenster erstellt 
werden soll. Soll das Fenster auf dem WorkBench-Screen 
gebildet werden, setzt man eine Null ein. 

*nw_BitMap 

Adresse einer eigenen, schon initialisierten BitMap-Struk- 
tur, die an Stelle der von Intuition erstellten, benutzt 
werden soll. Soll keine eigene benutzt werden, setzt man 
eine Null ein. 

nw_MinWidth, nw_MinHeight, nw_MaxWidth, nw MaxHeight 

Minimale und maximale Breite und Höhe, dFe das Fenster an¬ 
nehmen kann. 

nwType 

Zuletzt bleibt nur noch der Eintrag Type, dessen Wert 
angibt, ob das Fenster auf dem Workbench-Screen oder einem 
eigenen (CUSTOMSCREEN) erscheinen soll. 

WBENCHSCREEN = 1 

CUSTOMSCREEN = 15 


Jetzt haben wir alle wichtigen Schritte kennengelernt, die 
zum öffnen eines Fensters nötig sind. Deshalb wollen wir 
nicht länger zögern und unser erstes eigenes Intuition- 
Window basteln. 


* Programm 5.1: Öffnen und Schließen eines Windows 


ExecBase 

4 


CloseLib = 

-414 


OldOpenLib = 

-408 


OpenWindow = 

-204 


CloseWindow = 

-72 


Start: 

move.1 

ExecBase,a6 

ExecBase nach a6 

lea 

IntName,al 

Zeiger auf Intui-Namen 

jsr 

01d0penLib(a6) 

Library öffnen 

move.1 

dO,IntBase 

Basisadresse speichern 

beq 

IntError 

Fehler aufgetreten ? 
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move . 1 

IntBase,a6 ; 

BasisAdresse laden 

lea 

WindowArgs,aO ; 

Windowdef. in aO übergeben 

jsr 

0penWindow(a6) ; 

Fenster öffnen 

move . 1 

dO, 

, WindowHD ; 

Zeiger auf Window speichern 

beq 

WinError ; 

Fehler aufgetreten ? 

WaitLMT: 




btst 

#6 

r $bfe001 

linke Maustaste gedrückt ? 

bne 

WaitLMT ; 

nein, dann warten 

move . 1 

IntBase,a6 ; 


move . 1 

WindowHD,aO ; 

Zeiger auf das Fenster 

jsr 

CloseWindow(a6) 

; übergeben und schließen 

WinError: 




move . 1 

ExecBase,a6 ; 


move . 1 

IntBase,al ; 

Intuition-Library schließen 

jsr 

CloseLib(a6) ; 


IntError: 




rts 


t 

ReTurn from Subroutine 

* Datenbereich 



IntBase: 

dc.l 

0 

; Speicher für Int-Base 

WindowHD: 

dc.l 

0 

; Speicher WindowPointer 

IntName: 

dc.b 

"intuition.library",0 



; Name der Library, die geöffnet werden soll 


even 

; PC auf geraden Wert bringen 

WinName: 

dc.b 

"LMT drücken, um Programm zu beenden!",0 


even 



WindowArgs: 



; Die NewWindow-Struktur 


dc.w 

90,10 

; Position des Fensters 


dc.w 

460,200 

; Breite und Höhe 


dc.b 

1,3 

; Farbe Hintergrund/Vordergrund 


dc.l 

$600 

; IDCMP-Flags 


dc.l 

$1100F 

; Window-Flags 


dc.l 

0 

; Zeiger auf erstes Gadget 


dc.l 

0 

; Zeiger auf CheckMark Grafik 


de. 1 

WinName 

; Zeiger auf Titelzeichenkette 

ScreenHD: 

dc.l 

0 

; Zeiger auf einen Screen 


dc.l 

0 

; Zeiger auf eigenen BitMap 


dc.w 

100,50 

; Minimalwerte der Fenstergröße 


dc.w 

200,100 

; Maximalwerte der Fenstergröße 


dc.w 

1 

; Typ des Fensters 


Programm 5.1: Öffnen und Schließen eines Windows 


Wie man sieht, ist es gar nicht so schwer, ein eigenes Fen¬ 
ster zu öffnen. Man muß zunächst die benötigte Library öff- 
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nen, den Zeiger auf die NewWindow-Struktur übergeben und 
mittels der Basisadresse der Library die OpenWindow-Funktion 
anspringen. Damit es nicht sofort wieder geschlossen wird, 
muß eine Verzögerung eingebaut werden. Hierzu fragen wir 
solange die linke Maustaste (LMT) ab, bis diese gedrückt 
worden ist. Sie wird durch das sechste Bit der Adresse 
$BFE001 repräsentiert. Mit dem Befehl BTST (Bit TeST) können 
wir den Zustand der Taste abfragen. Wurde die LMT betätigt, 
so wird in den nächsten Zeilen erst das Fenster und dann die 
Library geschlossen. 

Die NewWindow-Struktur haben wir bereits kennengelernt um 
ein Fenster zu öffnen. Doch die Window-Struktur, auf die uns 
Intuition einen Zeiger zurückgibt, haben wir bislang nicht 
beachtet. Da diese aber ziemlich wichtige und informative 
Einträge enthält, wollen wir sie schon an dieser Stelle 
erläutern. 
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Window-Struktur: 


000 

dc.l 

*wd NextWindow 

004 

dc.w 

wd LeftEdge 

006 

dc.w 

wd TopEdge 

008 

dc.w 

wd Width 

010 

dc.w 

wd Height 

012 

dc.w 

wd MouseY 

014 

dc.w 

wd MouseX 

016 

dc.w 

wd MinWidth 

018 

dc.w 

wd_MinHeight 

020 

dc.w 

wd MaxWidth 

022 

dc.w 

wd MaxHeight 

024 

dc.l 

wd Flags 

028 

dc.l 

*wd MenuStrip 

032 

dc.b 

*wd Title 

036 

dc.l 

*wd FirstReques 

040 

dc.l 

*wd DMRequest 

044 

dc.w 

wd ReqCount 

046 

dc.l 

*wd WScreen 

050 

dc.l 

*wd RPort 

054 

dc.b 

wd BorderLeft 

055 

dc.b 

wd BorderTop 

056 

dc.b 

wd BorderRight 

057 

dc.b 

wd BorderBotto 

058 

dc.l 

*wd BorderRPort 

062 

dc.l 

*wd FirstGadget 

066 

dc.l 

*wd Parent 

070 

dc.l 

*wd Descendant 

074 

dc.w 

*wd Pointer 

078 

dc.b 

wd PtrHeight 

079 

dc.b 

wd PtrWidth 

080 

dc.b 

wd XOffset 

081 

dc.b 

wd YOffset 

082 

dc.l 

wd_IDCMPFlag 

086 

dc.l 

*wd UserPort 

090 

dc.l 

*wd WindowPort 

094 

dc.l 

*wd MessageKey 

098 

dc.b 

wd DetailPen 

099 

dc.b 

wd BlockPen 

100 

dc.l 

*wd_CheckMark 

104 

dc.b 

*wd ScreenTitle 

108 

dc.w 

wd GZZMouseX 

110 

dc.w 

wd GZZMouseY 

112 

dc.w 

wd GZZWidth 

114 

dc.w 

wd GZZHeight 

116 

dc.b 

*wd ExtData 

120 

dc.b 

*wd UserData 

124 

dc.l 

*wd WLayer 

128 

dc.l 

*wd IFont 

132 


wd SIZEOF 


*wd_NextWindow 

Zeiger auf das nächste Fenster 
wird. 


Zeiger auf nächstes Window 

linke Ecke 

obere Ecke 

Breite 

Höhe 

Y-Mauskoordinate 

X-Mauskoordinate 

minimale Breite 

minimale Höhe 

maximale Breite 

maximale Höhe 

Window-Flags 

Zeiger auf Menü-Struktur 

Zeiger auf Titelzeile 

Zeiger auf ersten Reguester 

Zeiger auf Double-Menu-Req. 

Zähler der Requester 

Zeiger auf Screen 

Zeiger auf RastPort 


Zeiger auf Border RastPort 
Zeiger auf erstes Gadget 
vorhergehendes Fenster 
nachfolgendes Fenster 
Zeiger auf Mausdaten 
Höhe des Mauszeigers 
Breite des Mauszeigers 
X-Koordinate des HOTSPOT 
Y-Koordinate des HOTSPOT 
IDCMP-Flags 
Zeiger auf UserPort 
Zeiger auf WindowPort 
Zeiger auf MessageKey 
Farbe für Vordergrund 
Farbe für Hintergrund 
Zeiger auf Grafikdaten 
Zeiger auf Screentitel 
Mauskoordinaten für GZZ 


Zeiger auf externe Daten 
Zeiger auf eigene Daten 
Zeiger auf Window-Layer 
Zeiger auf TextFontStruktur 


welches im Screen verwaltet 
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wd_LeftEdge, wdTopEdge, wdWidth, wd_Height 

Position und Größe des Fensters. (Identisch mit NewWindow- 
Eintrag) 

wdMouseY, wdMouseX 

Mauskoordinaten bezogen auf die linke obere Ecke des Fen¬ 
sters . 

wdMinWidth, wdMinHeight, wdMaxWidth, wdMaxHeight 

Minimale und maximale BreXte und Höhe des Fensters. 
(Identisch mit NewWindow-Eintrag) 

wd_Flags 

Flags für das Aussehen des Fensters (Identisch mit NewWin¬ 
dow-Eintrag) . 

*wd_MenuStrip 

Zeiger auf Menü-Struktur des Fensters (Siehe Abschnitt 
Menüs). 

*wd_Title 

Zeiger auf Titel des Fensters (Identisch mit NewWindow-Ein¬ 
trag) . 

*wd_FirstReguester 

Zeiger auf ersten Requester dieses Fensters (Siehe Abschnitt 
Requester). 

*wd_DMRequest 

Zeiger auf eine Double-Menu-Request-Struktur (Siehe Ab¬ 
schnitt Requester). 

wdReqCount 

Anzahl der Requester, die schon geöffnet wurden. 

*wd_WScreen 

Zeiger auf Struktur des Screens, zu dem das Fenster gehört. 
♦wdRPort 

Zeiger auf Struktur des zum Fenster gehörigen RastPorts. Er 
ist nötig, um z.B. Grafiken und Text auszugeben. 

wd BorderLeft, wd_BorderTop, wd_BorderRight, wd_BorderBottom 
Breitenangaben des Fensterrandes. 

*wd_BorderRPort 

Zeiger auf RastPort-Struktur für Border (GZZ-Windows). 

*wd_FirstGadget 

Zeiger auf erste Gadget-Struktur, die in das Fenster einge¬ 
bunden werden soll (Identisch mit NewWindow-Eintrag). 

*wd_Parent, *wd_Descendant 

Zeiger auf die Struktur des vorhergehenden bzw. nachfolgen¬ 
den Fensters. 
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*wd_Pointer 

Adresse der Grafikdaten für den Mauszeiger. Jedes Fenster 
kann die Form des Mauszeigers speziell definieren. 

wd_PtrHeight, wd_PtrWidth 

Breite und Höhe des Maus-Sprites. Dabei ist zu beachten, daß 
die Sprites eine limitierte Breite haben (1 Word = 16 Bit 
(Punkte) ). 

wdXOffset, wdYOffset 

Position des HOTSPOT relativ zur oberen linken Ecke der Gra¬ 
fikdaten. Als HOTSPOT bezeichnet man einen Punkt der Maus¬ 
zeigerdaten, der als auslösender Punkt angesehen wird. 

wd_IDCMPFlag 

Intuition Direct Communications Message Ports - Flags. 
(Identisch mit NewWindow-Eintrag). 

*wd_UserPort 

Zeiger auf MessagePort-Struktur für Datenaustausch. 

*wd_WindowPort 

Zeiger auf MessagePort-Struktur für Datenaustausch. 

♦wdMessageKey 

Zeiger auf MessagePort-Struktur für Datenaustausch. 
wdDetailPen, wdBlockPen 

Farbtabellennummer des Vorder- (DetaiiPen) und Hintergrund 
(BlockPen). (Identisch mit NewWindow-Einträgen). 

*wd_CheckMark 

Zeiger auf Grafikdaten für den Menü-Haken. Der Menü-Haken 
wird benötigt, um einen Menüpunkt als ausgewählt zu 
kennzeichnen (Identisch mit NewWindow-Eintrag). 

*wd_ScreenTitle 

Zeiger auf Zeichenkette des Screentitels. 

wd_GZZMouseX, wdGZZMouseY 

Koordinatenangabe des Mauszeigers im Fenster abzüglich des 
bei einem GZZ-Window eingebundenen Randes. 

wd_GZZWidth, wd_GZZHeight 

Breiten- und Höhenangabe bei GIMMEZEROZERO-Windows. 

*wd_ExtData 

Zeiger auf externe Daten. 

*wd_UserData 

Zeiger auf Daten, die vom Benutzer definiert, benutzt und 
eingebunden werden können (Identisch mit NewWindow-Eintrag). 

*wd_WLayer 

Addresse der Layer-Struktur, die für das Fenster verantwort¬ 
lich ist. 


176 




Die Intuition-Library 


*wd_lFont 

Zeiger auf die TextFont-Struktur des Fonts, der für die Aus¬ 
gabe in das Fenster benutzt werden soll. 


Sicherlich sind die vielen Einträge an dieser Stelle sehr 
verwirrend. Doch werden sie nach und nach in diesem Kapitel 
erklärt. 


5.1.1 Nachrichten empfangen 

Das letzte Programm ist im Bezug auf die Mausabfrage sehr 
einfach. Nun wollen wir etwas tiefer einsteigen und die Mel¬ 
dungen, die unser Programm empfängt, auswerten. Hier kommen 
auch wieder die IDCMP-Flags ins Gespräch. Sie geben an, wel¬ 
che Ereignisse, die unser Fenster betreffen, von Intuition 
an uns weitergeleitet werden sollen. 

Man muß sich das wie folgt vorstellen: Nachdem wir unser 
Fenster erfolgreich geöffnet haben, bewegt der Benutzer den 
Mauszeiger auf das Close-Gadget des Windows und drückt die 
linke Maustaste. 

Das hat das System natürlich mitbekommen und schickt eine 
Nachricht an den MessagePort, eine Art Briefkasten (wird 
gleich noch erklärt), des betreffenden Fensters. In dieser 
Nachricht (intuiMessage-Struktur) sind einige wichtige In¬ 
formationen enthalten, so z.B. den Eintrag namens "dass", 
in dem das IDCMP-Flag gesetzt worden ist, welches die 
Meldung ausgelöst hat. 

Von unserem Programm aus gesehen, spielt sich die Sache et¬ 
was anders ab. Wenn wir das Fenster geöffnet haben, brauchen 
wir nur noch auf eine Meldung von Intuition zu warten. Haben 
wir über den MessagePort unseres Fensters eine Meldung er¬ 
halten, können wir nun die IntuiMessage-Struktur auswerten. 
Danach müssen wir die Nachricht noch bestätigen, damit In¬ 
tuition weiß, das alles glatt gelaufen ist. 

Die besagte IntuiMessage-Struktur, dessen Einträge man ken¬ 
nen sollte, hat folgendes Aussehen: 


IntuiMessage-Struktur: 


00 

dc.l 

*ln Succ 



04 

dc.l 

*ln Pred ; 



08 

dc.b 

ln Type ; 

Node 


09 

dc.b 

ln Pri ; 



10 

dc.l 

*ln Name 


Message-Struktur 

14 

dc.l 

*mn ReplyPort ; 



18 

dc.w 

mn_Length ; 



20 

dc.l 

im Class ; 

IDCMP-Flag der Nachricht 
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24 

dc.w 

im Code 

Nachrichten-abhängige Daten 

26 

dc.w 

im Qualifier 


28 

dc.l 

im IAddress 

Zeiger auf den Auslöser 

32 

dc.w 

im MouseX 

Mauskoordinate (X) 

34 

dc.w 

im MouseY 

Mauskoordinate (Y) 

36 

dc.l 

im Seconds 

Sekunden 

40 

dc.l 

im Micros 

Mikros 

44 

dc.l 

*im IDCMPWindow 

Zeiger auf Fenster 

48 

52 

dc.l 

*im SpecialLink 
im SIZEOF 

Systemspezifisch 


ln_Succ bis mn Length 

Diese ersten sieben Einträge sind für das System relevant. 
Auf ihre Bedeutung wird im Kapitel Exec näher eingegangen. 

im_class 

Wie schon erwähnt enthält der Eintrag im_Class das IDCMP- 
Flag, welches das auslösende Ereignis angibt. 

imCode 

Der in Code übergebene Wert ist von der ausgelösten Nach¬ 
richt abhängig. Die Bedeutung wird deshalb erst nachher be¬ 
sprochen . 

im_Qualifier 

Tastencode einer gedrückten Qualifier-Taste. 
im_IAddress 

An dieser Stelle kann z.B. ein Zeiger stehen, der auf das 
ausgewählte Gadget verweist. Dadurch kann man es an Hand 
seiner ID-Nummer identifizieren. 

im_MouseX, im_MouseY 

Koordinaten des Mauszeigers zur Zeit, als die Meldung ausge¬ 
löst wurde. 

im Seconds, im_Micros 

Zeitpunkt, an dem die Nachricht ausgelöst wurde. Die Werte 
beziehen sich auf die System-Uhr. 

*im_IDCMPWindow 

Zeiger auf das Fenster, auf das sich diese Meldung bezieht. 

*im_SpecialLink 

Der Eintrag SpecialLink ist nur für das System relevant. 


Um nun eine Nachricht von unserem MessagePort zu holen, 
müssen wir uns eine Funktion der Exec-Library "ausleihen". 
Sie heißt GetMsg und gibt uns nach ihrem Aufruf die Adresse 
einer Nachrichten-Struktur zurück oder eine Null. 
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GetMsg 

= 

-372 (Exec-Library) 


♦Port 


aO < Zeiger auf einen MessagePort. 


Message do > Zeiger auf eine Message-Struktur oder, 

wenn keine weitere Nachricht anliegt, 
eine Null. 


Erklärung Mit Hilfe der Funktion GetMsg wird die 

nächste Meldung, die der angegebene Mes¬ 
sagePort enthält, aus der Liste der 
Nachrichten des Ports entfernt und der 
Zeiger auf diese Struktur in do zurück¬ 
gegeben . 


Wie man sieht, benötigt die Funktion nur einen Parameter, 
einen Zeiger auf einen MessagePort. Glücklicherweise hat In¬ 
tuition beim öffnen des Fensters eine solche Struktur schon 
für uns angelegt. Also brauchen wir uns darum nicht mehr zu 
kümmern. Den Zeiger können wir, wie der folgende Programm¬ 
ausschnitt zeigt, aus der Window-Struktur unseres Fensters 
leicht auslesen (er ist im Eintrag UserPort enthalten). 


move.l WindowHD,aO ; Zeiger auf Window nach aO 

move.l 86(aO),UPort ; UserPort Adresse auslesen 


UPort: dc.l 0 


Platz für den UserPort-Zeiger 


Bild 5.1: Ermitteln der UserPort-Adresse eines Windows 


Sollten wir mit GetMsg eine Nachricht empfangen haben, spei¬ 
chern wir den Zeiger zunächst in einer Variablen. Wenn kein 
Ereignis stattgefunden hat, erhalten wir keinen Zeiger, son¬ 
dern eine Null zurück. In diesem Fall wird nicht zu der Rou¬ 
tine verzweigt, die für die Untersuchung der IntuiMessage- 
Struktur verantwortlich ist. 

Wir könnten jetzt immer wieder mit der GetMsg-Funktion kon¬ 
trollieren, ob eine Nachricht angekommen ist oder nicht. 
Diese Möglichkeit ist jedoch nicht besonders professionell 
und braucht zudem auch viel Rechenzeit. Eine bessere Lösung 
bietet eine weitere Exec-Funktion mit dem Namen WaitPort. 


179 






Kapitel 5 





WaitPort 

= 

-384 (Exec-Library) 


*Port 

a0 

Message 

dO 

Erklärung 



< Zeiger auf eine Port-Struktur. 

> Zeiger auf die Message-Struktur, die 
empfangen worden ist. 

Durch die Funktion WaitPort wird das 
Programm solange unterbrochen, bis es 
eine Nachricht von Intuition geschickt 
bekommt. Die Adresse der IntuiMessage- 
Struktur erhält man zwar zurück, doch 
muß man sie durch die GetMsg-Funktion 
aus der Liste nehmen. 


WaitPort schickt das Programm solange "schlafen", bis Intui¬ 
tion eine Nachricht an den angegebenen MessagePort sendet. 
Dann erst wird das Programm fortgesetzt. Auf den genauen 
Ablauf der WaitPort-Funktion gehen wir im Exec-Kapitel näher 
ein. 

Falls ein Ereignis stattgefunden hat, erhalten wir einen 
Zeiger auf eine Nachrichten-Struktur in do. Da aber WaitPort 
die Nachricht nicht aus der Liste der Nachrichten auskop¬ 
pelt, müssen wir dazu die GetMsg-Funktion verwenden, damit 
die Nachricht nicht zweimal behandelt wird. 

Der vollständige Teil für die Abfrage des Ports sieht dann 
wie folgt aus. 


GetMsg 

-372 


WaitPort = 

-384 


MessageLoop: 

move.1 

ExecBase,a6 


move.1 

UPort,aO 

; nächste Meldung des UPorts 

jsr 

GetMsg(a6) 

; abholen. 

move.1 

do,Message 

; Zeiger Zwischenspeichern 

bne 

MessageBranch 

; Wurde wirklich ein Wert <>0 
; gespeichert ? 

move.1 

UPort,aO 

; Nein, dann warten bis 

jsr 

WaitPort(a6) 

; unser UserPort eine 

bra 

MessageLoop 

; Nachricht erhält 


Message: dc.l 0 ; Platz für den Zeiger auf eine 

; IntuiMessage-Struktur 


Bild 5.2: Abfrage eines Window-MessagePorts 
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Nachdem wir besprochen haben, wie eine Nachricht empfangen 
wird, untersuchen wir jetzt deren Auswertung. Dazu haben wir 
folgende Unterroutine angelegt. 


ReplyMsg = 

-378 


MessageBranch: 

move.1 
move.1 

Message,aO 
20(a0),Class 

; Zeiger auf IntuiMessage 
; IDCMP-Kennung auslesen 

move.1 
jsr 

Message,al 
ReplyMsg(a6) 

; Meldung bestätigen 

cmp. 1 
beq 

#$200,Class 
Exit 

; Close-Gadget betätigt ? 

; Ja dann Programm beenden 

bra 

MessageLoop 

; Neuer Versuch 


Class: dc.l 0 


; Variable für das IDCMP-Flag der 
; Nachricht 


Bild 5.3: Auswertung einer Message 


Zunächst lesen wir aus der IntuiMessage-Struktur den Eintrag 
im_Class aus, der das IDCMP-Flag enthält, welches die Nach¬ 
richt ausgelöst hat, und speichern es in der Variablen 
Class. Danach müssen wir die Nachricht bestätigen. Dazu 
schicken wir die IntuiMessage-Struktur an den angegebenen 
ReplyPort zurück. Hierzu gibt es natürlich auch eine Funk¬ 
tion in der der Exec-Library. 


ReplyMsg = -378 (Exec-Library) 


♦Message al < Zeiger auf Message-Struktur, die bestä¬ 
tigt werden soll. 

Erklärung ReplyMsg sendet die angegebene Nachrich¬ 

ten-Struktur an den ReplyPort, der in 
der Message-Struktur eingetragen ist, 
zurück. 


Nachdem wir die Formalitäten erledigt haben, können wir nun 
den Classwert untersuchen und entsprechend dem Ereignis rea¬ 
gieren. Im Programm warten wir z.B. darauf, daß das Close- 
Gadget des Fensters aktiviert worden ist. Erst dann wird das 
Fenster und die Library geschlossen. 
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Natürlich können auch andere IDCMP-Flags abgefragt werden. 
Doch sollte man nie vergessen, die "Nachrichten-Sperre" 
durch das Setzen des zugehörigen Flags im IDCMPFlags-Eintrag 
der NewWindow-Struktur aufzuheben. Sonst wartet man vergeb¬ 
lich auf eine Nachricht! 

Jetzt erwarten Sie sicher ein Demonstrationsprogramm. Aus 
Platzgründen haben wir es jedoch auf die Diskette verbannt. 
Außerdem sind die folgenden Programme nach dem gleichen 
Schema aufgebaut. 


Zum Schluß listen wir jetzt noch alle wichtigen Funktionen 
zur Verwaltung der Fenster auf, die wir bis jetzt noch nicht 
besprochen haben. Einige dieser Funktionen sind in dem De¬ 
monstrations-Programm zu diesem Abschnitt aufgeführt. 

ActivateWindow = -450 (Intuition-Library) 

♦Window aO < Zeiger auf das Window, das aktiviert 

werden soll. 

Erklärung Das angegebene Fenster wird aktiviert. 

Dies kann auch schon durch das ACTIVATE- 
Flag beim Öffnen des Fensters erreicht 
werden. 



♦Window aO < Zeiger auf eine Window-Struktur. 


Erklärung Meldet Intuition, daß der Fensterinhalt 

vom Programm erneuert wird. Sinnvoll ist 
diese Funktion in bezug auf das SIM- 
PLE_REFRESH Flag, bei dem die Regenerie¬ 
rung des Fensters selbständig vom Pro¬ 
gramm übernommen werden muß (siehe auch 
EndRefresh). 



♦Window aO < Zeiger auf eine Window-Struktur 


Erklärung Mauszeiger des betreffenden Windows wird 

gelöscht (siehe auch SetPointer). 
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EndRefresh 


-366 (Intuition-Library) 


♦Window aO < Zeiger auf eine Window-Struktur 

Complete dO < Nachdem die Funktion aufgerufen worden 

ist, enthält die Variable, deren Adresse 
in dO übergeben wurde, eine Null, wenn 
das Fenster nicht vollständig erneuert 
wurde. 


Erklärung Teilt Intuition mit, daß der Refreshsta¬ 

tus beendet ist (siehe auch BeginRe- 
fresh). 


ModifylDCMP = -150 (Intuition-Library) 

♦Window aO < Zeiger auf eine Window-Struktur 

Flags dO < Neue IDCMPFlags, die eingesetzt werden 

sollen. 

Erklärung Mit Hilfe dieser Funktion ist es mög¬ 

lich, die IDCMP-Flags des Fensters zu 
verändern (siehe auch ReportMouse). 



♦Window 

aO 

< 

Zeiger auf eine 

Window-Struktur 

dx 

dO 

< 

X-Wert, um den 
werden soll. Es 
erlaubt. 

das 

sind 

Fenster verschoben 
auch negative Werte 

dy 

dl 

< 

Y-Wert, um den 
werden soll. Es 
erlaubt. 

das 

sind 

Fenster verschoben 
auch negative Werte 

Erklärung 



Das ausgewählte 

Fenster wird um die an- 


gegebene Strecke in X- und in Y-Richtung 
veschoben. 


RefreshWindowFrame = -456 (Intuition-Library) 

♦Window aO < Zeiger auf eine Window-Struktur. 

Erklärung Der Rahmen des Fensters wird neu ge¬ 

zeichnet . 
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ReportMouse 

= 

-234 (Intuition-Library) 

♦Window 

Boolean 

aO < 
dO < 

Zeiger auf 
Null, wenn 

eine Window-Struktur 

das REPORTMOUSE-Flag gelöscht 


werden soll; sonst wird es gesetzt. 


Erklärung Schaltet das IDCMP-Flag REPORTMOUSE 

nachträglich ein oder aus. Dieses Flag 
bewirkt, daß die Mausposition dem Pro¬ 
gramm laufend mitgeteilt wird (siehe 
auch ModifylDCMP). 


SetPointer = -270 (Intuition-Library) 


♦Window 

aO 

< 

Zeiger auf eine Window-Struktur. 

♦Pointer 

al 

< 

Zeiger auf die Sprite-Daten für den 
Mauszeiger. 

Height 

dO 

< 

Höhe des Mauszeigers. 

Width 

dl 

< 

Breite des Mauszeigers. 

HotX 

d2 

< 

X-Koordinate des HOTSPOT. 

HotY 

Erklärung 

d3 

< 

Y-Koordinate des HOTSPOT. 

SetPointer setzt einen nur für dieses 


Window zuständigen Mauszeiger (siehe 
auch ClearPointer). 


SetWindowTitles = -276 (Intuition-Library) 


♦Window 

aO 

< 

Zeiger auf eine Window-Struktur 



♦WinTitle 

al 

< 

Zeiger auf 
Fenstertitel 

eine Zeichenkette 

für 

den 

♦ScrTitle 

a2 

< 

Zeiger auf 
Screentitel 

eine Zeichenkette 

für 

den 

Erklärung 



Mit SetWindowTitles kann man 

den Titel 


des Fensters sowie den Titel des 
Screens, der abhängig vom Fenster ange¬ 
zeigt wird, setzen. Wird anstelle des 
Zeigers auf die Zeichenkette eine 0 ein¬ 
getragen, so wird der Titel gelöscht. 
Der Wert -1 bewirkt, daß der alte Titel 
beibehalten wird. 


SizeWindow 


-288 (Intuition-Library) 


*Window aO < Zeiger auf eine Window-Struktur 

dx dO < Relativer Wert, bezogen auf die derzei¬ 

tige Fenstergröße, um die die Breite 
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verändert werden soll. Es sind auch ne¬ 
gative Werte erlaubt. 

dy dl < Relativer Wert, bezogen auf die derzei¬ 

tige Fenstergröße, um die die Höhe ver¬ 
ändert werden soll. Es sind auch nega¬ 
tive Werte erlaubt. 

Erklärung Die Größe des Fensters kann durch diese 

Funktion neu eingestellt werden. Dazu 
müssen zwei Werte angegeben werden, 
welche die Veränderung relativ zur 
derzeitigen Größe darstellen (siehe auch 
WindowLimits). 


ViewPortAddress 

= -300 (Intuition-Library) 

♦Window 

aO < 

Zeiger auf eine Window-Struktur 

ViewPort 

do > 

Adresse der ViewPort-Struktur des Fen¬ 
sters . 

Erklärung 


Durch die Funktion ViewPortAddress wird 
die Adresse der ViewPort-Struktur ermit¬ 
telt, die für das Fenster verantwortlich 
ist. 

WindowLimits 

= -318 (Intuition-Library) 

♦Window 

aO < 

Zeiger auf eine Window-Struktur 

WMin 

dO < 

Wert für die minimale Breite 

HMin 

dl < 

Wert für die minimale Höhe 

WMax 

d2 < 

Wert für die maximale Breite 

HMax 

d3 < 

Wert für die maximale Höhe 

Success 

do > 

Wenn die derzeitige Größe außerhalb der 
Limitierung liegt, erhält man, nachdem 
man die Funktion aufgerufen hat, eine 
Null zurück. 

Erklärung 


Die Limitierung der Ausdehnung des Fen¬ 
sters wird neu gesetzt. Der zurückgege¬ 
bene Wert informiert, ob sich die Größe 
des Fenster in den angegebenen Grenzen 
befindet (siehe auch SizeWindow). 

WindowToBack 

= -306 (Intuition-Library) 


*Window aO < Zeiger auf eine Window-Struktur. 
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Erklärung 

Das angegebene Fenster wird 

in den 

Hin- 


tergrund gesetzt (siehe 

auch 

Win- 


dowToFront). 



WindowToFront 

= -312 (Intuition-Library) 



*Window aO < Zeiger auf eine Window-Struktur 

Erklärung Das angegebene Fenster wird in den Vor¬ 

dergrund geholt (siehe auch WindowTo- 
Back). 


5.2 Screens 

Nun zu den Screens. Sie sind eine Art virtueller Bildschirm, 
auf dem beliebig viele Windows geöffnet werden können. Die 
Screens, die scheinbar aufeinander liegen, können jede Gra¬ 
fikauflösung, die der Amiga zur Verfügung stellt, annehmen. 
Die Anzahl ist dabei lediglich durch die Größe des Chip-Ram- 
Speichers begrenzt. 

Wie schon bei den Windows, gibt es auch bei den Screens eine 
Struktur, worin die Definitionen eingetragen werden müssen. 
Sinngemäß heißt sie hier NewScreen-Struktur. 

NewScreen-Struktur: 


00 

dc.w 

ns LeftEdge 

; X-Koordinate des Screens 

02 

dc.w 

ns TopEdge 

; Y-Koordinate des Screens 

04 

dc.w 

ns Width 

; Breite 

06 

dc.w 

ns Height 

; Höhe 

08 

dc.w 

ns Depth 

; Anzahl BitPlanes 

10 

dc.b 

ns DetailPen 

; Farben für den Vordergrund 

11 

dc.b 

ns BlockPen 

; und den Hintergrund 

12 

dc.w 

ns ViewModes 

; Auflösung 

14 

dc.w 

ns_Type 

; Screen-Typ 

16 

dc.l 

*ns Font 

; TextAttr-Struktur 

20 

dc.l 

*ns DefaultTitle 

; Zeiger auf Titelzeile 

24 

dc.l 

*ns Gadgets 

; Custom-Gadgets 

28 

dc.l 

*ns CustomBitMap 

; eigene BitMap-Struktur 

32 


ns SIZEOF 



nsLeftEdge, ns_TopEdge, ns_Width, ns_Height 
Position und Größe des Screens. 

nsDepth 

Anzahl der BitPlanes, die für den Screen verwendet werden 
sollen. Dadurch ist auch die Anzahl der Farben festgelegt. 

(Anzahl Farben) = 2(^ nza hi BitPlanes) 
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Bei zwei BitPlanes, kann man z.B. 2 2 = 4 Farben verwenden. 

ns_Detai1Pen, ns_BlockPen 

Farbtabellennummer der Vorder- und Hintergrundfarbe. Die 
Farben, die zur Verfügung stehen, werden in einer Farbpa- 
lette abgelegt, aus der man eine Farbe auswählen kann. Die 
Einstellung ist abhängig von der in Depth angegebenen Tiefe. 
So können wir, bei vier Farben, maximal die Farbe 3 (es wird 
von 0 bis 3 gezählt) einstellen. 

ns_ViewModes 

Auflösung des Screens. Es gibt folgende Möglichkeiten: 


View-Mode 

Wert 

Bedeutung 

GENLOCK VIDEO 

$0002 

Bindet eine externe Signalquelle ein 

EXTRA HALFBRITE 

$0080 

64-Farben Modus 

DUALPF 

$0400 

Dual-Playfield 

Hold-And-Modify 

$0800 

HAM-Modus (4096 Farben) 

VP HIDE 

$2000 

Kein Bild 

SPRITES 

$4000 

Screen mit Hardware-Sprites 

HIRES 

$0004 

Verdoppelt Auflösung in X-Richtung 

LACE 

$8000 

Verdoppelt Auflösung in Y-Richtung 

GENLOCKVIDEO 

Es wird das Videosignal eines Genlock 


Video Interfaces in den Hintergrund 


eingebunden. 

EXTRA_HALFBRITE 

Dieser Modus erlaubt die Verarbeitung 


von 

6 BitMaps, also 64 Farben. Dabei 


sind 

nur die ersten 32 Farben frei 


wählbar, die restlichen 32 entsprechen 


den 

ersten mit halber Helligkeit. 

DUALPF 

Dual 

-Playfield 

Hold-And-Modify 

Dieser Modus, auch HAM-Modus genannt, 


erlaubt die Darstellung von 4096 Farben 
gleichzeitig! Hierzu muß ein Trick 
angewendet werden, da die maximale 
Anzahl der Bitplanes nur für 2 6 = 64 
Farben reichen würde. Der Trick besteht 
darin, daß die Kombination aus den Bits 
der 5. und 6. Plane die Verwendung der 
1. bis 4. festlegt. 


Kombination der 
5. und 6. BP 
00 
01 
10 
11 


Verhalten der Planes 
1 bis 4 

(normal) Wahl des Farbregisters 
Rotwert des letzten gewählten Registers 
Grünwert des letzten gewählten Registers 
Blauwert des letzten gewählten Registers 


Für diesen Modus müssen mindestens 5 
BitPlanes benutzt werden. 

VPHIDE Screen wird nicht dargestellt. 

SPRITES Die Benutzung von Sprites wird erlaubt. 
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HIRES 

LACE 


ns Type 

Typ des Screens 
Screentyp 


WBENCHSCREEN 

CUSTOMSCREEN 

CUSTOMBITMAP 

SCREENBEHIND 

SCREENQUIET 

SHOWTITLE 

BEEPING 

WORKBENCHSCREEN 

CUSTOMSCREEN 

CUSTOMBITMAP 


SCREENBEHIND 


SCREENQUIET 


SHOWTITLE 

BEEPING 


Die Auflösung in X-Richtung wird von 320 
auf 640 Punkte verdoppelt. 

Die Auflösung in Y-Richtung wird von 256 
auf 512 Punkte verdoppelt. Hierbei wird 
das Bild nicht in einem Zuge aufgebaut, 
sondern erst die geraden Zeilen und dann 
die ungeraden. Dadurch verdoppelt sich 
die Zeit des Bildaufbaus und es entsteht 
bei Monitoren mit einer zu geringen 
Wiederholfrequenz (z.B. 50Hz) das 
berüchtigte Flackern des Bildes. 


, der erstellt werden soll. 
Wert Bedeutung 


$0001 Screen ist der WBench-Screen 

$000F Screen ist Custom-Screen 

$0040 Keine BitMap erstellen 

$0080 Screen im Hintergurnd öffnen 

$0100 System-Gadgets/Titelzeile abschalten 

$0010 Intuition-intern 

$0020 Intuition-intern 


Screen ist die WorkBench (nur von 
Intuition benutzt) 

Es wird ein eigener Screen 
(CUSTOMSCREEN) erstellt. 

Intuition soll keine BitMap für unseren 
Screen anlegen. Das kann wichtig sein, 
wenn man eine eigene BitMap einbinden 
will. 

Normalerweise wird ein neuer Screen als 
erster, also als sichtbarer Screen 
erstellt. Dies kann man durch die 
Einstellung SCREENBEHIND verhindern. 
Dann wird der Screen nicht im 
Vordergrund, sonder im Hintergrund 
geöffnet. 

SCREENQUIET unterdrückt das Zeichnen der 
System-Gadgets und der Titelzeile des 
Screens. Wenn jedoch die rechte 
Maustaste gedrückt wird, erscheint das 
Menü in der Titelzeile, wird aber nicht 
wieder gelöscht. Um diesen unschönen Ef¬ 
fekt zu verhindern, kann man z.B. durch 
die Einstellung RMBTRAP im Window-Flag- 
Eintrag der NewWindow-Struktur das 
Anwählen der Menüzeile verhindern. 

Die letzten beiden Flags SHOWTITLE und 
BEEPING werden von Intuition gesetzt 
(Screen blinkt) 
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ns TextAttr 

Zeiger auf eine TextAttr-Struktur, durch die der 
Zeichensatz, mit dem auf den Screen geschrieben werden soll, 
bestimmt wird. Soll der Standardzeichensatz verwendet 
werden, muß der Zeiger mit Null initialisiert werden. 

nsDefaultTitle 

Adresse einer Zeichenkette, die den DafaultTitle angibt. 
Setzt man eine Null ein, wird kein Titel benutzt. 

nsGadgets 

ACHTUNG: Dieser Eintrag wird (noch) nicht von Intuition un¬ 
terstützt. Hier sollte immer eine Null eingetragen werden, 
da man nie weiß, ob nicht in der nächsten Kickstart-Version 
diese Funktion berücksichtigt ist. 

ns CustomBitMap 

ZeTger auf eine eigene initialisierte BitMap-Struktur, die 
an Stelle der, von Intuition angelegten, verwendet werden 
soll (siehe auch Eintrag Type (CUSTOMBITMAP)). Wenn man auf 
eine eigene BitMap-Struktur verzichtet, so setzt man den 
Eintrag auf Null und Intuition richtet selbständig eine 
BitMap-Struktur ein. 


Nachdem wir die NewScreen-Struktur besprochen haben, kommen 
wir zu den Funktionen zum Öffnen eines Screens. 


OpenScreen = -198 (Intuition-Library) 


*NewScreen 

aO 

Screen 

dO 

Erklärung 



< Zeiger auf NewScreen-Struktur 

> Zeiger auf Screen-Struktur 

Mit Hilfe der OpenScreen-Funktion kann 
ein vordefinierter Screen geöffnet wer¬ 
den. Außerdem legt Intuition, wie schon 
bei den Windows, eine spezielle Screen- 
Struktur an und gibt den Zeiger auf sie 
zurück. 


Wie man sieht, erhalten wir einen Zeiger auf eine von Intui¬ 
tion angelegte Struktur. Dieser Zeiger ist sehr wichtig, da 
alle Screen-Funktionen auf ihn zurückgreifen. So auch die 
CloseScreen-Funktion, welche das Schließen des Screens für 
uns erledigt. 


CloseScreen = -72 (Intuition-Library) 


*Screen aO < Zeiger auf Screen-Struktur 

Erklärung Die Funktion CloseScreen schließt den 

angegebenen Screen. 
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Jetzt, nachdem wir alle wichtigen Funktionen kennengelernt 
haben, wollen wir diese praktisch anwenden und einen Screen 
und ein Window öffnen. 


* Programm 5.4: Screen und Window öffnen 


ExecBase 

4 


OldOpenLib 

-408 


CloseLib = 

-414 


GetMsg = 

-372 


ReplyMsg = 

-378 


WaitPort = 

-384 


OpenScreen = 

-198 


CloseScreen = 

-66 


OpenWindow 

-204 


CloseWindow 

-72 


Start: 

move.1 

ExecBase,a6 ; 

Intuition-Lib öffnen 

lea 

IntName,al 


jsr 

OldOpenLib(a6) 


move.1 

dO,IntBase 


beq 

IntError 


move.1 

IntBase,a6 ; 

Screen öffnen 

lea 

ScreenArgs,aO ; 

NewScreen-Struktur 

jsr 

0penScreen(a6) 


move.1 

dO,ScreenHD ; 

Zeiger auf Screen in 

beq 

ScrError ; 

die NewWindow-Struktur 

/ 

eintragen 

lea 

WindowArgs,aO 


jsr 

OpenWindow(a6) ; 

Fenster öffnen 

move.1 

dO,WindowHD 


beq 

WinError 


move.1 

WindowHD,aO ; 

UserPort aus der 

move.1 

86(a0),UPort 

Window-Struktur lesen 

MessageLoop: 

move.1 

ExecBase,a6 


move.1 

UPort,aO ; 

Meldung angekommen ? 

jsr 

GetMsg(a6) 


move.1 

do,Message 


bne 

MessageBranch ; 

Ja, dann verarbeiten 

move.1 

UPort,aO ; 

Nein, dann warten 

jsr 

WaitPort(a6) 


bra 

MessageLoop 


Exit: 

move.1 

IntBase,a6 ; 

Fentser schließen 

move.1 

WindowHD,aO 


jsr 

CloseWindow(a6) 
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WinError: 


move.1 

ScreenHD,aO ; 

Screen schließen 

jsr 

CloseScreen(a6) 


ScrError: 

move.1 

ExecBase,a6 ; 

Library schließen 

move.1 

IntBase,al 


jsr 

CloseLib(a6) 


IntError: 

rts 

/ 

Ende ! 

MessageBranch: 

move.1 

Message,aO ; 

Class Eintrag der 

move.1 

20(a0),Class ; 

IntuiMessage-Struktur 


'* 

speichern 

move.1 

Message,al ; 

Nachricht beantworten 

jsr 

ReplyMsg(a6) 


cmp. 1 

#$200,Class ; 

CloseWindow betätigt ? 

beq 

Exit ; 

Ja, dann Ende 

bra 

MessageLoop ; 

nächste Nachricht holen 


* Datenbereich 



Class: 

dc.l 

o 

IDCMP-Flag der Nachricht 

Message: 

dc.l 

0 

Zeiger auf die IntuiMessage 

UPort: 

dc.l 

0 

Zeiger auf den UserPortt 

IntBase: 

dc.l 

0 

Basisadresse der intuitionLib 

WindowHD: 

dc.l 

0 

Zeiger auf das Fenster 

IntName: 

dc.b 

"intuition.library",0 


even 



WinName: 

dc.b 

"Close-Gadget beendet das Programm !",0 


even 



ScrName: 

dc.b 

"CUSTOMSCREEN", 

,0 


even 



WindowArgs: 

dc.w 

90,10 

; Definitionen des Fensters 


dc.w 

460,200 



dc.b 

1,3 



dc.l 

$200 

; IDCMP-Flag 


dc.l 

$1100F 



dc.l 

0 



dc.l 

0 



dc.l 

WinName 

Zeiger auf Fensternamen 

ScreenHD: 

dc.l 

0 

<= Hier wird der Zeiger auf 


dc.l 

0 

den Screen eingetragen. 


dc.w 

100,50 



dc.w 

200,100 



dc.w 

15 

; <= CUSTOMSCREEN !! 
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ScreenArgs: 


Definitionen des Screens 


dc.w 

0,0 

X/Y 

dc.w 

640,256 

Breite Höhe 

dc.w 

2 

Tiefe 

dc.b 

2,1 

Farben 

dc.w 

$8000 

Modus 

dc.w 

15 

Screen-Typ 

dc.l 

0 

Zeichensatz 

de. 1 

ScrName 

Titelzeile 

dc.l 

0 

Gadgets 

dc.l 

0 

eigene BitMap 


Programm 5.4: Screen und Window öffnen 


Das Listing dürfte eigentlich keine Schwierigkeiten machen, 
da wir die Nachrichtenbehandlung schon besprochen haben. Nur 
eine Passage könnte ihnen unbekannt Vorkommen. Da ja das 
Fenster, welches wir öffnen wollen, auf unserem Screen er¬ 
scheinen soll, müssen wir dies Intuition auch mitteilen. 
Dazu sind zwei Einträge in der NewWindow-Struktur zu ändern. 
Zunächst muß der letzte Eintrag (Type) der Window-Struktur 
von 1 (= WBENCHSCREEN) auf 15 (= CUSTOMSCREEN) geändert 
werden. Als zweites müssen wir den Zeiger auf die Screen- 
Struktur in die NewWindow-Struktur an die Stelle 
"*nw_Screen" eintragen. Da Intuition logischerweise diese 
Struktur erst anlegt, wenn wir den Screen öffnen wollen, 
müssen wir diesen Eintrag während des Ablaufes initialisie¬ 
ren . 


Wie gesagt erstellt Intuititon eine eigene Struktur, die zur 
Verwaltung des Screens benutzt wird. Unsere Bauanleitung 
(NewScreen-Struktur) wird dann nicht mehr benötigt. Der 
Vollständigkeit wegen folgt nun die Screen-Struktur. 


Screen-Struktur: 


000 

dc.l 

*sc_NextScreen 

004 

dc.l 

*sc FirstWindow 

008 

dc.w 

sc LeftEdge 

010 

dc.w 

sc TopEdge 

012 

dc.w 

sc Width 

014 

dc.w 

sc Height 

016 

dc.w 

sc MouseY 

018 

dc.w 

sc MouseX 

020 

dc.w 

sc Flags 

022 

dc.l 

*sc Title 

026 

dc.l 

*sc DefaultTitle 

030 

dc.b 

sc BarHeight 

031 

dc.b 

sc BarVBorder 

032 

dc.b 

sc BarHBorder 

033 

dc.b 

sc MenuVBorder 


Zeiger auf nächsten Screen 

Zeiger auf erstes Window 

linke Ecke 

rechte Ecke 

Breite 

Höhe 

Y-Mauskoordinaten 
X-Mauskoordinaten 
Screen-Flags 
Zeiger auf Titelstring 
Default-Titelstring 
Höhe der Titelleiste 
vertikaler Rand 
horizontaler Rand 
vertikaler Rand (Menu) 
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034 

dc.b 

sc MenuHBorder 

035 

dc.b 

sc WBorTop 

036 

dc.b 

sc_WBorLeft 

037 

dc.b 

sc WBorRight 

038 

dc.b 

sc WBorBottom 

039 

dc.b 

sc KludgeFillOO 

040 

dc.l 

*sc Font 

044 

ds.b 

sc ViewPort,40 

084 

ds.b 

sc RastPort,100 

184 

ds.b 

sc_BitMap,40 

224 

ds.b 

sc LayerInfo,92 

316 

dc.l 

*sc FirstGadget 

320 

dc.b 

sc_DetailPen 

321 

dc.b 

sc BlockPen 

322 

dc.w 

sc SaveColorO 

324 

dc.l 

*sc_BarLayer 

328 

dc.l 

*sc ExtData 

332 

dc.l 

*sc_UserData 

336 


sc SIZEOF 


*sc_NextScreen 

Zeiger auf den nächsten Screen 


horizontaler Rand (Menü) 
Breite, Window-Rand oben 
Breite, Window-Rand links 
Breite, Window-Rand rechts 
Breite, Window-Rand unten 
Füllbyte 

TextAttr-Struktur 
ViewPort-Struktur 
RastPort-Struktur 
BitMap-Struktur 
Layerlnfo-Struktur 
Zeiger auf erstes Gadget 
Farbtab.nr. für Vordergrund 
Farbtab.nr. für Hintergrund 
BEEPING SaveMem 
Zeiger auf Layer 
Zeiger auf externe Daten 
Zeiger für UserDaten 


der dargestellt werden soll. 


♦scFirstWindow 

Zeiger auf das erste Fenster, welches im Screen dargestellt 
wird. 

scLeftEdge, scTopEdge, scWidth, scHeight 

Position und Größe des Screens (übernommen aus NewScreen- 

Struktur). 

sc_MouseY, sc_MouseX 

Mauskoordinaten relativ zur oberen linken Ecke des Screens. 
sc_Flags 

Angabe über das Aussehen des Screens (übernommen aus New- 
Screen-Struktur). 

*sc_Title 

Zeiger auf Titelzeile für den Screen, die von einem Fenster 
festgelegt worden ist (übernommen aus NewWindow-Struktur). 

*sc_DefaultTitle 

Zeiger auf Titelzeile, die in der NewScreen-Struktur festge¬ 
legt worden ist. 

sc_BarHeight 

Höhe der Titelleiste. 

sc_BarVBorder, sc_BarHBorder 

Breite des veritkalen und horizontalen Randes. 

sc_MenuVBorder, sc_MenuHBorder 

Horizontale und vertikale Randbreite der Menüs. 
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sc_WBotTop, sc_WBorLeft, sc_WBorRight 

Breite des oberen, des linken und des rechten Fensterrandes. 

sc_KludgeFillOO 

Der Eintrag sc_KludgeFillOO dient lediglich als Füllbyte, um 
den PC wieder auf Wortgrenze zu bringen. 

*sc_Font 

Zeiger auf eine TextAttr-Struktur, die den Zeichensatz für 
den Screen angibt. 

sc ViewPort 

An - dieser Stelle ist eine komplette ViewPort-Struktur einge¬ 
bunden, die Daten wie z.B. die Farbtabelle enthält. 

sc_RastPort 

Komplette RastPort-Struktur des Screens. 
scBitMap 

Komplette BitMap-Struktur des Screens. 
sc_LayerInfo 

Komplette Layer_Info-Struktur des Screens. 

*sc_FirstGadget 

Zeiger auf erstes Screen-Gadget. 
sc_DetailPen, sc_BlockPen 

Farbtabellennummer des Vorder- (DetailPen) und des Hinter¬ 
grundes (BlockPen) (übernommen aus NewScreen-Struktur). 

sc_SaveColorO 

Speicher für die Hintergrundfarbe des Screens 
(Farbtabellennummer 0). Er wird beim SCREENBEEPING benutzt, 
um die Farbe zu restaurieren. 

*sc_BarLayer 

Zeiger auf die Layer-Struktur, in dem die Titelzeile abge¬ 
legt ist. 

* sc_ExtData 

Zeiger auf externe Daten für Screen. 

*sc_üserData 

Zeiger auf Daten, die vom Benutzer definiert, benutzt und 
eingebunden werden können (übernommen aus NewScreen-Struk¬ 
tur) . 


Sicherlich scheinen die vielen Einträge undurchschaubar, 
doch werden sie im Laufe der folgenden Kapitel immer klarer. 
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Interessant zu wissen ist, daß die Screens untereinander 
verkettet sind und jeder Screen auch eine Liste aller 
Windows, die ihm "gehören", besitzt (*sc_NextScreen, 
*sc_FirstWindow). So ist die Verwaltung für Intuition 
einfacher und flexibler. 



Bild 5.4: Die Verkettung von Screens und Windows 


Auch für die Screens gibt es spezielle Funktionen. Einige 
ausgewählte sind wieder in dem Demonstrations-Programm zu 
diesem Abschnitt aufgeführt. Die wichtigsten Funktionen sol¬ 
len hier in alphabetischer Reihenfolge kurz erläutert wer¬ 
den . 

CloseWorkBench = -78 (Intuition-Library) 

Success do > Mißerfolg = 0 

Erklärung Durch CloseWorkbench wird versucht, den 

Workbench-Screen zu schließen. Dies kann 
nur funktionieren, wenn sich keine Fen¬ 
ster (oder nur Workbench-Diskverzeich- 
nis-Fenster) darauf befinden. Der zu¬ 
rückgelieferte Wert gibt Aufschluß über 
den Erfolg (0=Mißerfolg) (siehe auch 
OpenWorkBench). 

DisplayBeep _ = -96 (Intuition-Library) 

♦Screen aO < Zeiger auf eine Screen-Struktur. 
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Erklärung Die Hintergrundfarbe des angegebenen 

Screens wird kurzzeitig geändert 
(Aufblinken). 


GetScreenData = -426 (Intuition-Library) 


Buffer 

aO 

»Screen 

al 

Size 

dO 

Type 

dl 

Success 

dO 

Erklärung 



< Zeiger auf einen Puffer. 

< Zeiger auf eine Screen-Struktur. 

< Größe des angegebenen Puffers in Byte. 

< Typ des Screens (CUSTOM- oder WBENCH- 
SCREEN) 

> Ist ein Fehler aufgetreten, ist Success 
mit Null initialisiert. 

Mit der Funktion GetScreenData werden 
die Screen-Daten in den angegebenen Puf¬ 
fer geschrieben. 


MakeScreen = -376 (Intuition-Library) 


»Screen aO < Zeiger auf eine Screen-Struktur. 

Erklärung Die Systemstrukturen zur Verwaltung der 

Grafikhardware für einen Screen werden 
(neu) eingerichtet. 


MoveScreen = -162 (Intuition-Library) 


»Screen 

dx 


dy 


aO < Zeiger auf eine Screen-Struktur. 
dO < Wert für horizontale Verschiebung des 
Screens. Es sind auch negative Werte er¬ 
laubt. ACHTUNG: Das horizontale Ver¬ 
schieben eines Screens wird erst ab 
Kickstart 2.0 unterstützt! 
dl < Wert für vertikale Verschiebung des 
Screens. Es sind auch negative Werte er¬ 
laubt. 


Erklärung Die Funktion MoveScreen verschiebt den 

Screen in die angegebene Richtung um 
einen angegebenen Wert. 


OpenWorkBench = -210 (Intuition-Library) 


Screen 


dO > Zeiger auf die Screen-Struktur der Work- 
Bench. 


Erklärung 


Es wird versucht, den Workbench-Screen 
zu öffnen (siehe auch CloseWorkBench). 
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RemakeDisplay 

= -384 (Intuition-Library) 


Erklärung 


MakeScreen-Aufruf für alle Screens. 


RethinkDisplay 

= -390 (Intuition-Library) 


Erklärung 


Durch RethinkDisplay werden alle Werte, 
die für die Screen-Darstellung durch die 
Grafikhardware verantwortlich sind, 
überprüft. 

ScreenToBack 

= -246 (Intuition-Library) 


»Screen 

aO < 

Zeiger auf eine Screen-Struktur. 


Erklärung 


Der angegebene Screen wird in den Hin¬ 
tergrund gestellt (siehe auch Screen¬ 
ToFront ) . 

ScreenToFront 

= -252 (Intuition-Library) 


»Screen 

aO < 

Zeiger auf eine Screen-Struktur. 


Erklärung 


Der angegebene Screen wird in den Vor¬ 
dergrund geholt (siehe auch ScreenTo¬ 
Back) . 

ShowTitle 

= -282 (Intuition-Library) 


»Screen 

Show 

aO < 
dO < 

Zeiger auf eine Screen-Struktur. 
Durch Show wird angegeben, ob der 
gezeigt (<> 0) oder nicht gezeigt 
werden soll. 

Titel 
(= 0) 

Erklärung 


Die Titelzeile eines Screens wird 
oder eingeschaltet. 

aus- 

WBenchToBack 

= -336 (Intuition-Library) 



Erklärung Der Workbench-Screen wird hinter alle 

anderen Screens plaziert (siehe auch 
WBenchToFront). 
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WBenchToFront = -342 (Intuition-Library) 


Erklärung Der Workbench-Screen wird im Vordergrund 

dargestellt (siehe auch WBenchToBack). 


5.3 Die Grafikstrukturen 

Bevor wir uns an die Gadgets wagen, sollten wir uns drei in¬ 
teressante Strukturen ansehen: die intuiText-, die Border¬ 
und die Image-Struktur. Alle drei können oder müssen in die 
Gadget- bzw. Menü-Struktur eingebunden werden; man kann die 
Strukturen jedoch auch getrennt benutzen. Sie dienen alle 
dazu, etwas auszugeben, nämlich einen Text, einen Rahmen 
oder ein Bild. 


5.3.1 intuiText-Struktur 

Den Anfang soll die IntuiText-Struktur machen. Sie enthält 
neben dem Text selber noch weitere Informationen, wie z.B. 
die Position und die Farbe des Textes. Natürlich brauchen 
wir, um einen IntuiText auszugeben, wieder eine Intuition- 
Funktion. Ihr Name ist PrintIText und sie erwartet vier Pa¬ 
rameter : 


PrintIText = -216 (Intuition-Library) 


*RPort 

aO 

< 

*IText 

al 

< 

LeftOffset 

dO 

< 

TopOffset 

dl 

< 

Erklärung 




Zeiger auf einen RastPort 
Zeiger auf eine IntuiText-Struktur 
X-Koordinate relativ zur angegebenen X- 
Koordinate. 

Y-Koordinate relativ zur angegebenen Y- 
Koordinate. 

Die Funktion PrintIText gibt den durch 
eine IntuiText-Struktur angegebenen Text 
auf dem angegebenen RastPort an der an¬ 
gegebenen Position aus. 


In al wird ein Zeiger auf eine IntuiText-Struktur, dessen 
Text ausgegeben werden soll, geladen. Die Datenregister dO 
und dl enthalten die Position des Textes und in aO wird ein 
Zeiger auf den RastPort, in dem der Text ausgegeben werden 
soll, gelegt. 

Nun, was ist ein solcher RastPort? Der RastPort ist eine 
Struktur, die wichtige Daten über einen Bereich enthält, auf 
den man grafisch zugreifen kann. Dazu gehören Informationen 
über den zu benutzenden Zeichensatz, den zuletzt gewählten 
Zeichenmodus, die Farbe und vieles mehr. Dieser RastPort 
wurde von Intuition erstellt, als es unser Fenster geöffnet 
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hat. Der Zeiger auf diese wichtige Stuktur wurde in die Win¬ 
dow-Struktur eingetragen, auf die wir mittels des zurückge¬ 
lieferten Pointers zugreifen können. Man liest den Wert über 
einen Offset, den man der Window-Struktur entnehmen kann, 
aus. Den Zeiger finden wir ab dem 50. Byte vom Strukturan¬ 
fang : 


move.l WindowHD,aO ; RastPort-Adresse auslesen 
move.l 50(a0),RPort 


Haben wir den Zeiger auf den RastPort unseres Fensters, kön¬ 
nen wir uns den Funktionsaufruf der PrintlFunktion ansehen: 


PrintIText = 

-216 


move.1 

RPort,aO 

; Zeiger auf RastPort 

lea 

ITextO,al 

; Zeiger auf IntuiText 

move.1 

#30,dO 

; Position 

move.1 

#42,dl 


jsr 

PrintIText(a6) 

; IntuiText ausgeben 


Das einzige Element das uns noch fehlt, ist die IntuiText- 
Struktur, ohne die wir keinen Text ausgeben können. 

IntuiText-Struktur: 


00 

dc.b 

it FrontPen 

; Farben 

01 

dc.b 

it BackPen 

; 

02 

dc.b 

it DrawMode 

; Zeichenmodus 

03 

dc.b 

it KludgeFillOO 

; Füllbyte 

04 

dc.w 

it LeftEdge 

; relative X-Koordinate 

06 

dc.w 

it_TopEdge 

; relative Y-Koordinate 

08 

dc.l 

*it ITextFont 

; TextAttr-Struktur 

12 

dc.l 

*it IText 

; Zeiger auf Zeichenkette 

16 

20 

dc.l 

*it NextIText 
it_SIZE0F 

; nächste IntuiText-Struktur 

it 

FrontPen 

, it BackPen 



Farbtabellennummer der Vordergrund- und Hintergrundfarbe. 


it DrawMode 

ZeTchenmodus, der zur Ausgabe des Textes benutzt werden 
soll. Hier kann man zwischen einigen Einstellungen wählen: 


Modus 

Wert 

Bedeutung 

dJAMl 

0 

Die Farbe wird für den Vordergrund 
benutzt. 

JAM2 

1 

Ein nicht gesetztes Bit in der 
auszugebenen Grafik wird mit der 
eingestellten Hintergrundfarbe gezeichnet 

COMPLEMENT 

2 

Die Grafik wir durch die XOR-Funktion 
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eingetragen. 

INVERSVID 4 Die Ausgabe wird invertiert 

Natürlich sind auch Kombinationen der Flags möglich. 


it_LeftEdge, itTopEdge 

Positionierung des Textes relativ zu den in den Datenregi¬ 
stern angegebenen Koordinaten. 

*it_ITextFont 

Zeiger auf den zu benutzenden Zeichensatz oder eine Null, 
wenn der Standardzeichensatz benutzt werden soll. 

*it_IText 

Zeiger auf die Zeichenkette, in welcher der Text steht, der 
ausgegeben werden soll. Die Zeichenkette muß mit Null abge¬ 
schlossen sein! 

*it_NextText 

Adresse einer weiteren IntuiText-Struktur, die ausgegeben 
werden soll. Durch diese Verkettung kann man mehrer Texte 
mit einem Funktionsaufruf ausgeben lassen. Soll kein 
weiterer Text ausgegeben werden, setzt man den Wert auf 
Null. 


Das war die IntuiText-Struktur. Das Demo-Programm für diese 
Funktion sparen wir uns bis zur Image-Struktur auf. Dann 
werden alle drei Grafikfunktionen in einem Programm demon¬ 
striert. 


IntuiTextLength = -330 (Intuition-Library) 


*IText 

aO 

< Zeiger auf die IntuiText-Struktur dessen 
Länge errechnet werden soll. 

Len 

dO 

> Länge der Zeichenkette in Pixeln, die in 
der angegebenen IntuiText-Struktur ent¬ 
halten ist. 

Erklärung 


Mit Hilfe dieser Funktion ist es mög¬ 
lich, die Länge eines IntuiTextes be¬ 
rechnen zu lassen. Die Länge ist abhän¬ 
gig von dem ITextFont, der verwendet 
wird. 


5.3.2 Border-Struktur 

Nun zur Border-Struktur! Ein Border ist eine Umrandung, die 
aus einzelnen Linien besteht, die zwischen angegebenen Punk¬ 
ten gezogen werden. Man benutzt sie z.B., um Gadgets und 
Text zu umranden oder einfache Zeichnungen auf einem Rast- 
Port auszugegeben. Auch hierzu stellt Intuition eine Funk- 
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tion bereit, mit der man einen Rahmen, unabhängig von Gad- 
gets, zeichnen kann. Sie heißt DrawBorder und benötigt wie 
die PrintIText-Funktion einen Zeiger auf den RastPort, auf 
den gezeichnet werden soll, und natürlich einen Zeiger auf 
die Border-Struktur sowie die Koordinaten, an denen der Rah¬ 
men gezeichnet werden soll. 


DrawBorder 


-108 (Intuition-Library) 


*RPort 

ao 

< 

*Border 

al 

< 

LeftOffset 

do 

< 

TopOffset 

dl 

< 

Erklärung 




Zeiger auf einen RastPort. 

Zeiger auf eine Border-Struktur. 
X-Position relativ zur angegebenen X-Ko- 
ordinate. 

Y-Position relativ zur angegebenen Y-Ko- 
ordinate. 

DrawBorder zeichnet den angegebenen Rah¬ 
men auf dem übergebenen RastPort. 


Der Aufruf im Programm sieht folgendermaßen aus: 


DrawBorder = -108 


move.1 

RPort,aO 

lea 

Border,al 

move.1 

#20,dO 

move.1 

#30,dl 

jsr 

DrawBorder(a6) 


; Zeiger auf Border-Struktur 
; Position 

; Border ausgeben 


Bild 5.5: Zeichnen eines Borders 


Jetzt, wo wir wissen, wie wir die DrawBorder-Funktion aufru¬ 
fen können, müssen wir uns den Aufbau der Border-Struktur 
ansehen. 


Border-Struktur: 


00 

dc.w 

bd LeftEdge 

; X-Koordinate 

02 

dc.w 

bd TopEdge 

; Y-Koordinate 

04 

dc.b 

bd_FrontPen 

; Vordergrund 

05 

dc.b 

bd BackPen 

; Hintergrund 

06 

dc.b 

bd DrawMode 

; Zeichenmodus 

07 

dc.b 

bd Count 

; Anzahl der XY-Paare 

08 

dc.l 

*bd_XY 

; Zeiger auf XY-Paare 

12 

dc.l 

*bd NextBorder 

; Zeiger auf nächsten Border 

16 


bd SIZEOF 



bd LeftEdge, bdTopEdge 

Position des Borders relativ zu den in den Datenregistern 
übergebenen Koordinaten. 
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bd FrontPen, bdBackPen 

Farbtabe11ennummer der Vorder- und Hintergrundfarbe. 


bd DrawMode 

ZeTchenmodus, in dem der Border gezeichnet werden soll, 
bd Count 

Anzahl der XY-Paare, die mit Linien verbunden werden sollen. 
*bd XY 

Zeiger auf ein Wort-Array mit den XY-Koordinaten der Border- 
Punkte. 

*bd NextBorder 

Adresse der nächsten Border-Struktur, die gezeichnet werden 
soll. 

Das Demonstrationsprogramm hierzu finden sie am Ende des 
nächsten Kapitels. 


5.3.3 Image-Struktur 


Nachdem wir die IntuiText- und die Border-Strukturen bespro¬ 
chen haben, fehlt nur noch die Image-Struktur, die eine Gra¬ 
fikstruktur ist. Um ein solches Image (Bildnis) auszudruk- 
ken, benötigen wir die Funktion Drawlmage. 


Drawlmage = -114 (Intuition-Library) 


*RPort 
*Image 
LeftOffset 
TopOffset 


aO 

< 

Zeiger auf den 

RastPort. 

al 

< 

Zeiger auf die 

Image-Struktur 

dO 

< 

X-Koordinate. 


dl 

< 

Y-Koordinate. 



Erklärung 


Drawlmage gibt die angegebenen Image-Da¬ 
ten auf den angegebenen RastPort aus. 


Die Parameter sind eigentlich die gleichen wie bei den vor¬ 
angegangenen Funktionen. Der einzige Unterschied ist, daß in 
al ein Zeiger auf eine Image-Struktur stehen muß. Auch der 


Drawlmage 

-114 


move.1 

RPort,aO 


lea 

Image,al 

; Zeiger auf Image-Struktur 

move.1 

#230,dO 

; Position 

move.1 

#36,dl 


jsr 

Drawlmage(a6) 

; Image zeichnen 


Bild 5.6: Zeichnen eines Image 
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Wichtig ist noch zu wissen, aus welchen Einträgen sich die 
Image-Struktur zusammensetzt. Das wollen wir uns sofort 
ansehen: 


Image-Struktur: 


00 

dc.w 

ig LeftEdge 

02 

dc.w 

ig_TopEdge 

04 

dc.w 

ig_Width 

06 

dc.w 

ig_Height 

08 

dc.w 

ig_Depth 

10 

dc.l 

*ig ImageData 

14 

dc.b 

ig_PlanePick 

15 

dc.b 

ig_Plane0nOff 

16 

dc.l 

*ig NextImage 

20 


ig_SIZE0F 


X-Koordinate 

Y-Koordinate 

Breite des Images 

Höhe des Images 

Tiefe (Anzahl der BitMaps) 

Zeiger auf ImageData 

PlanePick-Daten 

PlaneOnOff-Daten 

Zeiger auf nächstes Image 


ig_LeftEdge, ig_TopEdge 

Position des Images relativ zu den angegebenen Koordinaten. 


ig_Width, ig_Height 

Breite und Höhe der Grafikdaten. 


ig_Depth 

Anzahl der BitPlanes, aus dem sich das Bild zusammensetzt. 
Dadurch ist auch gleich die Anzahl der verwendeten Farben 
festgelegt.(2 De P fc h (Tiefe) = Anzahl der Farben). 

*ig_ImageData 

Zeiger auf die Grafikdaten. (Näheres dazu gleich). 
ig_PlanePick 

Mit diesem 1 Byte großen Wert kann man einstellen, welche 
BitPlanes gezeichnet werden sollen. Dazu kann man mittels 
der einzelnen Bits jede Plane an- und ausschalten. 


00000000 

I 1 — 1. Plane 

*- 2. Plane 

- 3. Plane 

Durch die jeweilige Selektion der BitPlanes kann man das 
Bild in verschiedenen Formen darstellen. 

ig_PlaneOnOff 

Auch in diesem Eintrag kann man alle Planes einzeln an- und 
ausschalten. Jede Plane, die auf diese Weise angeschaltet 
ist, wird in der zugehörigen Window-Plane auf eins gesetzt. 
Die ursprünglichen Grafikdaten dieser Plane werden nicht be¬ 
nutzt. Dadurch ist es möglich, die Grafik in einer anderen 
Farbe darzustellen. 


*ig_NextImage 

Zeiger auf die nächste Image-Struktur, die gezeichnet werden 
soll, oder eine Null. 
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Das war die gesamte Image-Struktur. Nur einen Eintrag soll¬ 
ten wir an dieser Stelle noch etwas genauer unter die Lupe 
nehmen. Das ist der Zeiger auf die Daten der Grafik 
(*ig ImageData). Um die Zusammensetzung der Daten zu verste¬ 
hen, — müssen wir etwas weiter ausholen und uns den Aufbau ei¬ 
ner Computergrafik vor Augen führen. 


Eine Computergrafik ist eigentlich nichts anderes als eine 
Anzahl von Punkten, die verschiedene Farben (oder Hellig¬ 
keitswerte) haben und zusammengesetzt ein Bild ergeben. Si¬ 
cherlich haben sie dies schon festgestellt, als sie den 
Mauszeiger mit Preferences bearbeitet haben. 


Da die Werte der Farben in einer Tabelle definiert worden 
sind, braucht man nur die Farbtabellennummer für einen Punkt 
zu bestimmen. Diese Nummern werden in sogenannten BitPlanes 
kodiert abgelegt. Wollen wir nun eine zweifarbige Grafik er¬ 
zeugen, dann symbolisiert jedes Bit einer Bitplane einen 
Punkt. Man hat 2 1 = 2 Farben zur Verfügung. Die gewählte 
Farbe wird durch den Zustand des Bits festgelegt (0 = Farbe 
0 oder 1 = Farbe 1). So entstehen zweifarbige Bilder. 


Beispiel 


für eine Grafik mit zwei Farben: 


de.1 %10010001000100001000001110001000 
de.1 %10010010100100001000010001001000 
de.1 %11110100010100001000010001001000 
de.1 %10010111110100001000010001000000 
de.1 %10010100010111101111001110001000 


(Die Einsen sind fettgedruckt, damit die Grafik besser zu 
erkennen ist.) 

Mit zwei Farben ist alles noch ganz einfach. Will man jetzt 
aber mehr Farben verwenden, muß man auch mehr BitPlanes 
benutzen. Daraus ergibt sich, daß für einen Punkt jetzt 
nicht mehr ein Bit sondern zwei oder mehr verantwortlich 
sind. 

Die Nummer der Farbe des ersten Punktes wird dann durch die 
Kombination des ersten Bits der ersten BitPlane und des er¬ 
sten Bits der zweiten Plane festgelegt. Sie werden quasi 
übereinander gelegt. 


BP 

11000001000100001000001110001000 

01010001000000001000001110001000 

00 

00000010100000001000010001001000 

00 

00000100010000001000010001001000 

00 

00000111110000001000010001000000 


00000100010000001111001110001000 



1. Langwort 

2. Langwort 

3. Langwort 

4. Langwort 

5. Langwort 
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Die Bits der ersten vier Punkte zeigen jede mögliche Kombi¬ 
nation. Also werden mit den ersten vier Punkten alle vier 
Farben gezeigt. 


Punkt 

l.BitPlane 2. BitPlane 

\ __ i 

1 

ir 

= 10 

(Farbe) 

2 

= 11 

(Farbe) 

3 

= 00 

(Farbe) 

4 

= 01 

(Farbe) 


Jetzt wird auch klar, wie die Anzahl der Farben festgelegt 
ist. Weil jedes Bit nur zwei Werte annehmen kann, ist die 
Rechnung 2 ("anzahl der BitPlanes) - (Anzahl der Farben) ver¬ 
ständlich. Jede Grafik, die auf dem Amiga zu sehen ist, ist 
im Speicher in diese binäre Notierung zerlegt. 

Nach diesem kleinen Exkurs in die Grafikwelt des Amiga kom¬ 
men wir zurück zu unserer Image-Struktur und den imageDaten, 
die wir noch benötigen. 


Section "",Data_C 

ImageData: 

dc.l %lllllllllllimilllllllinilllll ; Plane 1 

dc.l 410000000000000000000000000000000 

dc.l 410000000000000000000000000001000 

dc.l 410000000000000000000000000001000 

dc.l 410000000000000000000000000001000 

dc.l 410000000001111111111110000001000 

dc.l 410000000001111111111100000001000 

dc.l 410000000001111111111100000001000 

dc.l 410000000001111111111100000001000 

dc.l 410000000001111111111100000001000 

dc.l 410000000001111111111100000001000 

dc.l 410000000001000000000000000001000 

dc.l 410000000000000000000000000001000 

dc.l 410000000000000000000000000001000 

dc.l 410000000000000000000000000001000 

dc.l 410001111111111111111111111111000 

dc.l 410000000000000000000000000000000 

dc.l 410000000000000000000000000000000 

dc.l 400000000000000000000000000000000 ; Plane 2 

dc.l 400000000000000000000000000000001 

dc.l 400011111111111111111111111111001 

dc.l 400010000000000000000000000000001 

dc.l 400010000000000000000000000000001 

dc.l 400010000000000000000000000000001 

dc.l 400010000000111111111110000000001 

dc.l 400010000000111111111110000000001 

dc.l 400010000000111111111110000000001 

dc.l 400010000000111111111110000000001 
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dc.l »oooiooooooonmi muoooooooooi 
dc.l %00010000000111111111110000000001 
dc.l %0001000000U11111111110000000001 
dc.l %00010000000000000000000000000001 
dc.l % 000 10000000000000000000000000001 
dc.l %00010000000000000000000000000001 
dc.l %00000000000000000000000000000001 
dc.l %01111111111111111111111111111111 


Bild 5.7: Definition einer Image-Grafik 


Abgesehen von dem recht einfallslosen Bild, ist Ihnen sicher 
die Zeile "Section '',Data_C" aufgefallen. Dies ist eine vom 
DevPac-Assembler benutzte Direktive. Sie bewirkt, daß die 
Daten ab diesem Eintrag in das Chip-RAM geladen werden. 
Diese Einstellung ist unbedingt notwendig, da es zwei unter¬ 
schiedliche Bereiche des Speichers gibt: den Chip- und den 
Fast-RAM-Bereich. Letzterer kann nur vom Prozessor benutzt 
werden und ist daher schneller. Das Chip-RAM ist dagegen 
sowohl vom Prozessor als auch von den Customchips nutzbar. 
Diese Customchips sind Zusatzprozessoren, die unter anderem 
auch für die Ausgabe der Grafik zuständig sind. Darum müssen 
die Grafikdaten, die wir ausgeben wollen, unbedingt im Chip- 
RAM stehen, da sonst die Customchips keinen Zugriff hätten. 
Die Folge wäre Grafikmüll. Auch wenn man nur 512 KB (also 
nur Chip-RAM) hat, sollte man diese Einstellung vornehmen, 
um die Kompatibilität zu anderen Rechnern aufrechtzuhalten. 

Sollte der Assembler diese oder eine ähnliche Einstellung 
nicht unterstützen, dann benutzen sie einfach das Tool NO- 
FASTMEM. Es schaltet den Fast-RAM-Bereich ab und zwingt den 
Rechner, alle Daten ins Chip-RAM zu laden. 

Man kann aber davon ausgehen, daß jeder gebräuchliche As¬ 
sembler eine solche Funktion anbietet. Der Seka-Assembler 
z.B. stellt zu Beginn den Speicherbereich, den man benutzen 
will, zur Auswahl. 

Abschließend folgt nun das versprochene Demo-Programm. 
Zunächst wird ein Fenster auf der Workbench geöffnet und die 
Grafiken und Texte ausgegeben. Durch das Close-Gadget kann 
man das Programm wie immer beenden. 


* Programm 5.9: Anwendung der Grafik-Strukturen 


ExecBase 

= 

4 

OldOpenLib 

= 

-408 

CloseLib 

= 

-414 

GetMsg 

= 

-372 

ReplyMsg 

= 

-378 

WaitPort 

- 

-384 

OpenWindow 


-204 
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CloseWindow 

-72 

PrintIText = 

-216 

DrawBorder = 

-108 

Drawlmage = 

-114 

Start: 

move.1 

ExecBase,a6 

lea 

IntName,al 

jsr 

01d0penLib(a6) 

move.1 

dO,IntBase 

beg 

IntError 

move.1 

IntBase,a6 

lea 

Windowftrgs,aO 

jsr 

OpenWindow(a6) 

move.1 

dO,WindowHD 

beq 

WinError 

move.1 

WindowHD,aO 

move.1 

86(aO),UPort 

move.1 

50(a0),RPort 

move.1 

RPort,aO 

lea 

ITextO,al 

move.1 

#30,dO 

move.1 

#42,dl 

jsr 

PrintIText(a6) 

move.1 

RPort,aO 

lea 

Border,al 

move.1 

#20,dO 

move.1 

#30,dl 

jsr 

DrawBorder(a6) 

move.1 

RPort,a0 

lea 

Image,al 

move.1 

#230,dO 

move.1 

#36,dl 

jsr 

Drawlmage(a6) 

MessageLoop: 

move.1 

ExecBase,a6 

move.1 

UPort,aO 

jsr 

GetMsg(a6) 

move.1 

dO,Message 

bne 

MessageBranch 

move.1 

UPort,aO 

jsr 

WaitPort(a6) 

bra 

MessageLoop 

Exit: 

move.1 

IntBase,a6 

move.1 

WindowHD,a0 


; Intuition-Library öffnen 

; Fenster öffnen 

; Zeiger auf User- und 
; RastPort speichern 

; Zeiger auf RastPort 
; Zeiger auf IntuiText 
; Position 

; IntuiText ausgeben 

; Zeiger auf Border-Struktur 
; Position 

; Border ausgeben 

; Zeiger auf Image-Struktur 
; Position 

; Image zeichnen 

; Nachricht vom UPort holen 
; War was ? 

; Nein, dann warten 

; Window schließen 
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jsr 

doseWindow(a6) 


WinError: 

move.1 

ExecBase,a6 ; 

Intuition-Library schließen 

move.1 

IntBase,al 


jsr 

CloseLib(a6) 


IntError: 

rts 

; 

Ende ! 

MessageBranch: 

move.1 

Message,aO ; 

IDCMP-Flag aus dass 

move.1 

20(a0),Class ; 

Eintrag lesen 

move.1 

Message,al ; 

Nachricht bestätigen 

jsr 

ReplyMsg(a6) 


cmp.l 

#$200,dass ; 

Close-Gadgets betätigt ? 

beq 

Exit ; 

Ja, dann zum Ende springen 

bra 

MessageLoop 



* Datenbereich 



dass: 

dc.l 

o ; 

dass Eintrag 

Message: 

dc.l 

0 

Zeiger auf IntuiMessage 

UPort: 

dc.l 

0 ; 

Zeiger auf UserPort 

RPort: 

dc.l 

o ; 

Zeiger auf RastPort 

IntBase: 

dc.l 

o ; 

Adresse der Intuition-Lib 

WindowHD: 

dc.l 

o 

Zeiger auf Window-Struktur 

IntName: 

dc.b 

even 

"intuition.library",0 

WinName: 

dc.b 

even 

"Close-Gadget beendet das Programm !",0 

WindowArgs: 

dc.w 

dc.b 

150,50,340,90 

1,3 

Definitionene des Fensters 


dc.l 

$200,$1100F,0,0 

,WinName 

ScreenHD: 

dc.l 

0,0 


* IntuiText- 

dc.w 

-Struktur 

100,50,200,100, 

1 

ITextO: 

dc.b 

1,3 

Farben 


dc.b 

0 

Zeichenmodus 


even 


(Füllbyte) 


dc.w 

0,0 

relative Position 


dc.l 

0 

Zeiger auf Fontsatz 


dc.l 

ITextDataO ; 

Zeiger auf Zeichenkette 


dc.l 

ITextl ; 

Zeiger auf nächsten IntuiText 

ITextDataO: 

dc.b 

"Tolles Bild oder? =>",0 
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even 



ITextl: 

dc.b 

2,3 

; Definitionen der zweiten 


dc.b 

0 

; IntuiText-Struktur 


even 




dc.w 

-1,-1 



dc.l 

0 



dc.l 

ITextDatal 



dc.l 

0 


ITextDatal: 

dc.b 

''Tolles Bild 

oder? =>",0 


even 



* Border-Data 




Border: 

dc.w 

0,0 

; Positionierung 


dc.b 

2,0 

; Farben 


dc.b 

0,5 

; Zeichenm./Anzahl der XY-Paare 


dc.l 

BorderData 

; Zeiger auf XY-Paare 


dc.l 

BorderO 

; Zeiger auf nächsten Rahmen 

BorderData: 



; Borderdaten 


dc.w 

0,0 

; XY-Koordinaten der 5 Punkte 


dc.w 

270,0 



dc.w 

270,30 



dc.w 

0,30 



dc.w 

0,0 


Border0: 

dc.w 

1,1 

; Definition der zweiten 


dc.b 

CO 

o 

o 

; Border-Struktur 


dc.l 

BorderDataO, 

0 

BorderDataO: 

dc.w 

270,0 



dc.w 

270,30 



dc.w 

2,30 


* Image-Data 




Image: 

dc.w 

0,0 

; Position 


dc.w 

32,20 

; Breite und Höhe der Daten 


dc.w 

2 

; Tiefe 


dc.l 

ImageData 

; Zeiger auf Daten 


dc.b 

%11,0 

; PlanePick/PlaneOnOff 


dc.l 

0 

; Zeiger auf nächstes Image 


Section "",Data_C ; Direktive um die Grafikdaten ins 
; CHIP-RAM zu legen 

ImageData: 

dc.l $FFFFFFFF,$80000000,$80000008,$80000008 ; Pli 

dc.l $80000008,$80000008,$803FFC08,$803FF808 

dc.l $803FF808,$803FF808,$803FF808,$803FF808 

dc.l $80200008,$80000008,$80000008,$80000008 

dc.l $80000008,$8FFFFFF8,$80000000,$80000000 
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dc.l $00000000,$00000001,$1FFFFFF9,$10000001 ;P12 

dc.l $10000001,$10000001,$10000001,$101FFC01 

dc.l $101FFC01,$101FFC01,$101FFC01,$101FFC01 

dc.l $101FFC01,$103FFC01,$10000001,$10000001 

dc.l $10000001,$10000001,$00000001,$FFFFFFFF 


Programm 5.9: Anwendung der Grafik-Strukturen 


5.4 Gadgets 

Mit diesem reichhaltigen Wissen über die Grafik-Strukturen 
können wir uns an die Gadgets wagen. Sie bieten eine sehr 
einfache aber komfortable Möglichkeit der Kommunikation zwi¬ 
schen dem Benutzer und dem Rechner. Ein Gadget 
(Apparat/Vorrichtung) hat zahlreiche Erscheinungsformen und 
Merkmale, die wie schon bei den Windows und Screens in einer 
Struktur zusammengefaßt werden. Intuition stellt uns drei 
unterschiedliche Typen zur Verfügung: 


Boolean-Gadgets Die Boolean-Gadgets kann man als 

eine Art Schalter oder Taster be¬ 
nutzen . Dabei muß der Benutzer mit 
der Maus das Gadget anklicken. 

String-/Integer-Gadgets Ein String-Gadget bietet die Mög¬ 
lichkeit, an einer bestimmten 
Stelle des Fensters einen Text ein¬ 
zugeben. Integer-Gadgets gehören 
auch zur Art der String-Gadgets. 
Sie dienen jedoch dazu, Zahlen ein¬ 
zugeben . 

Proportional-Gadgets Der dritte und letzte Typ der Gad¬ 

gets heißt Proportional-Gadget. Er 
besteht aus einen Schieber, den man 
in einem Rahmen beliebig positio¬ 
nieren kann. Dadurch wird es 
möglich, einen Wert einzustellen, 
der proportional zur 

Schieberposition im Rahmen ist. 


Anfängen wollen wir mit dem Boolean-Gadget. Es ist das ein¬ 
fachste Gadget und soll uns dabei helfen, die Grundstruktur 
der Gadgets kennenzulernen. 

An dieser Stelle möchten wir darauf hinweisen, daß wir dar¬ 
auf verzichten wollen, die umfangreichen Demonstrationspro¬ 
gramme abzudrucken, da sie alle auf der beiliegenden Dis¬ 
kette zu finden sind. 
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5.4.1 Boolean-Gadget 

Ein Boolean-Gadget kann ein Schalter oder auch ein Taster 
sein. Es ist wohl das am häufigsten benutzte Gadget. Wie bei 
fast allen Einrichtungen des Betriebssystems müssen wir na¬ 
türlich auch für die Gadgets eine Struktur anlegen. Dabei 
gibt es eine Grundstruktur, die von allen drei Gadgettypen 
benutzt wird. Ihren Aufbau wollen wir jetzt untersuchen. Bei 


den 

beiden 

übrigen Gadgettypen 

werden wir auf diese Struktur 

nicht mehr 

gesondert eingehen. 


Gadget-Struktur: 


00 

dc.l 

*gg NextGadget 

Zeiger auf nächstes Gadget 

04 

dc.w 

gg LeftEdge 

X-Position 

06 

dc.w 

gg TopEdge 

Y-Position 

08 

dc.w 

gg Width 

Breite des Gadgets 

10 

dc.w 

gg Height 

Höhe des Gadgets 

12 

dc.w 

gg Flags 

Gadget-Flags 

14 

dc.w 

gg Activation 

Activation-Flags 

16 

dc.w 

gg_GadgetType 

Gadgettyp 

18 

dc.l 

*gg GadgetRender 

"normale" Datenstruktur 

22 

dc.l 

*gg SelectRender 

"aktivierte" Datenstruktur 

26 

dc.l 

*gg GadgetText 

Zeiger auf IntuiText 

30 

dc.l 

gg MutualExclude 

MutualExclude-Daten 

34 

dc.l 

gg Speciallnfo 

Speciallnfo 

38 

dc.w 

gg GadgetID 

Gadgetidentifikationsnummer 

40 

dc.l 

gg User 

User-Daten 

44 


gg SIZEOF 



*gg_NextGadget 

Zeiger auf das nächste Gadget. Da die Gadgets in einer ein¬ 
fachen Liste verwaltet werden, sind sie durch Zeiger ver¬ 
knüpft. Hierzu dient das erste Langwort. Will man weitere 
Gadgets einbinden, so setzt man hier die Adresse der näch¬ 
sten Struktur ein. Das Listenende ist erreicht, wenn der 
Zeiger mit Null initialisiert worden ist. Im Gegnsatz zu den 
Screens und Windows, bei denen eine neue Struktur angelegt 
wird, wird hier die vom Programmierer definierte Struktur 
auch von Intuition benutzt. Deshalb sollte man die Einträge 
nicht willkürlich überschreiben. 

gg_LeftEdge, ggTopEdge, gg_width, gg Hight 

Position und Größe der Hit-Box. Das Tst der Bereich, in dem 
der Mauszeiger (bei gedrückter bzw. losgelassener linker 
Maustaste) eine Meldung an unser Programm verursacht. 

gg_Flags 

Durch die Flags ergeben sich zahlreiche Einstellungsmöglich¬ 
keiten. Die einzelnen Flags haben dabei folgende Bedeutun¬ 
gen : 
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Gadget-Flag Wert Bedeutung 


GADGHCOMP 

$0003 

Hit-Box bei Aktivierung invertieren 

GADGHBOX 

$0001 

Hit-Box wird umrandet 

GADGHIMAGE 

$0002 

SelectRender-Grafik wird angezeigt 

GADGHNONE 

$0003 

keine Reaktion 

GRELBOTTOM 

$0008 

Y-Position relativ zum Boden 

GRELRIGHT 

$0010 

X-Position relativ zur rechten Seite 

GRELWIDTH 

$0020 

Breite proportional zum Fenster 

GRELHEIGHT 

$0040 

Höhe proportional zum Fenster 

SELECTED 

$0080 

Gadget aktiviert 

GADGDISABLED 

$0100 

Gadget nicht auswählbar 

GADGIMAGE 

$0004 

GadgetRender und SelectRender sind 
Zeiger auf Image-Strukturen 


Die ersten vier Flags geben an, wie das Gadget reagieren 
soll, wenn es aktiviert worden ist. 


GADGHCOMP 

GADGHBOX 

GADGHIMAGE 

GADGHNONE 


Inhalt der Hit-Box invertiert 
darstellen. 

Das Gadget mit einem Rahmen umgeben. 
Anstelle der Grafik GadgetRender wird 
die Grafik SelectRender gezeichnet. 

Keine Reaktion. 


Die nächsten Flags bestimmen, wie die Einträge LeftEdge, To- 
pEdge, Width und Height interpretiert werden sollen. Dabei 
kann man z.B. die Größe eines Gadget abhängig von der Fen¬ 
stergröße machen. 


GRELBOTTOM 

GRELRIGHT 

GRELWIDTH 


GRELHEIGHT 


Der gg_TopEdge-Eintrag wird als relative 
Position zum unteren Rand des Fensters 
gewertet. 

Der gg_LeftEdge-Eintrag bestimmt wird 
als realtive Position zum rechten Rand 
des Fensters gewertet. 

Der Wert gg_Width bestimmt den Abstand 
des linken Gadgetrandes vom rechten 
Windowrand. Dadurch paßt sich das Gadget 
automatisch an jede Größenveränderung 
des Fensters an. 

Der Wert gg_Height bestimmt den Abstand 
des unteren Gadgetrandes vom unteren 
Windowrand. Dadurch paßt sich das Gadget 
automatisch an jede Größenveränderung 
des Fensters an. 


Als letztes kommen nun die restlichen Flags: 

SELECTED Das Gadget ist direkt aktiviert, wenn es 

gezeichnet wird. Dieses Flag kann zu 
Beginn gesetzt werden und später nur 
noch gelesen werden (siehe auch 
ActivateGadget). 

GADGDISABLED Das Gadget ist nicht wählbar, die Hit- 

Box wird mit einem Punktmuster 
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überzogen. Dieses Flag kann auch nur am 
Anfang gesetzt werden (siehe auch 
GadgetOn und GadgetOff). 

GADGIMAGE Die Einträge GadgetRender und 

SelectRender werden als Zeiger auf 
Image-Strukturen (sonst Border- 

Strukturen) interpretiert. 

ggActivation 

Die Activation-Flags bestimmen, wann das Gadget aktiviert 
ist und was passieren soll. Auch zu diesen Einstellungen 
eine Tabelle, um die Möglichkeiten, die Intuition zur Verfü¬ 
gung stellt, kennenzulernen. 


Activation-Flag Wert Bedeutung 


TOGGLESELECT 

$0100 

RELVERIFY 

$0001 

GADGIMMEDIATE 

$0002 

RIGHTBORDER 

$0010 

LEFTBORDER 

$0020 

TOPBORDER 

$0040 

BOTTOMBORDER 

$0080 

STRINGCENTER 

$0200 

STRINGRIGHT 

$0400 

LONGINT 

$0800 

ALTKEYMAP 

$1000 

BOOLEXTEND 

$2000 

ENDGADGET 

$0004 

FOLLOWMOUSE 

$0008 


Schalter-Gadget statt Taster-Gadget 
Taste wurde über Gadget losgelassen 
Gadget wird direkt aktiviert 
Gadget in rechten Rand des Fensters 
Gadget in linken Rand des Fensters 
Gadget in oberen Rand des Fensters 
Gadget in unteren Rand des Fensters 
Zeichenkette zentrieren 
Zeichenkette rechtsbündig 
String-Gadget zu Integer-Gadget 
Tastaturtabelle auf Eingabe anwenden 
Zusatzstruktur für Boolean-Gadgets 
ENDGADGET des Requesters 
Mausposition wird gemeldet 


TOGGLESELECT 

RELVERIFY 

GADGIMMEDIATE 

RIGHTBORDER 

LEFTBORDER 

TOPBORDER 

BOTTOMBORDER 

STRINGCENTER 

STRINGRIGHT 


Das Gadget wird zu einem Schalter 
umgewandelt und dreht bei Selektion 
seinen Zustand um. 

Gadget wird erst aktiviert, wenn der 
linke Mausknopf auch über dem Bereich 
der Hit-Box wieder losgelassen wird. 

Das Gadget ist sofort aktiviert, wenn es 
angeklickt wurde. 

Gadget in den rechten Rand des Fensters 
einbinden. 

Gadget in den linken Rand des Fensters 
einbinden. 

Gadget in den oberen Rand des Fensters 
einbinden. 

Gadget in den unteren Rand des Fensters 
einbinden 

Bei einem String-Gadget wird der Text 
zentriert dargestellt 

Text rechtsbündig im Kontainer des 
String-Gadgets ausgeben (wird weder 
STRINGCENTER noch STRINGRIGHT angegeben, 
so wird der Text linksbündig 
ausgegeben). 
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LONGINT 

Wandelt ein String-Gadget in ein 
Integer-Gadget, welches nur die Eingabe 
von Zahlen erlaubt. 

ALTKEYMAP 

Die Eingabe eines String- oder Integer- 
Gadgets wird erst mit einer speziellen 
Tastaturtabelle behandelt 

BOOLEXTEND 

Im Eintrag Speciallnfo wird ein Zeiger 
auf eine BoolInfo-Struktur benötigt. 
Diese Struktur ist nicht unbedingt 
notwendig !!! 

ENDGADGET 

Das Gadget ist als Requester-CLOSE- 
Gadget ausgelegt, welches den Requester 
bei Betätigung schließt. 

FOLLOWMOUSE 

Solange dieses Gadget aktiviert ist, 
wird dem Programm die Mausposition 
ständig gemeldet. 


gg_GadgetType 

Der Gadgettyp wird mittels der folgenden Flags bestimmt: 


Gadgettyp-Flag Wert Bedeutung 


BOOLGADGET 

$0001 

Boolean-Gadget 

GADGET0002 

$0002 

(noch nicht benutzt) 

PROPGADGET 

$0003 

Proportional-Gadget 

STRGADGET 

$0004 

String-Gadget 

SYSGADGET 

$8000 

System-Gadgets 

SCRGADGET 

$4000 

Screen-Gadget 

GZZGADGET 

$2000 

Gadget für GZZ-Window 

REQGADGET 

$1000 

Requester-Gadget 

SIZING 

$0010 

Size-Gadget 

WDRAGGING 

$0020 

Gadget für Window Verschiebung 

SDRAGGING 

$0030 

Gadget für Screen Verschiebung 

WDOWNBACK 

$0060 

Gadget WindowToBack 

SDOWNBACK 

$0070 

Gadget ScreenToBack 

WUPFRONT 

$0040 

Gadget WindowToFront 

SUPFRONT 

$0050 

Gadget ScreenToFront 

CLOSE 

$0080 

Close-Gadget 


BOOLGADGET 

GADGET0002 

PROPGADGET 

STRGADGET 


Gadget soll vom Typ Boolean sein. 

(Noch unbenutzt) 

Gadget soll ein Proportional Gadget sein 
(wird gleich noch erklärt). 

Gadget soll ein String- oder Integer- 
Gadget sein (wird gleich noch erklärt). 


Nun folgen drei Flags, die bestimmen, wo das Gadget einge¬ 
setzt werden soll. 


SYSGADGET 

SCRGADGET 

GZZGADGET 

REQGADGET 


Das Gadget ist ein System-Gadgets 
Das Gadget ist ein SCRreenGADGET. 

Das Gadget soll im Rand eines GIMMEZEROZERO-Win- 
dows erscheinen. 

Das Gadget erscheint in einem Requester 
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Nun folgen Flags, welche hauptsächlich für das System von 
Bedeutung sind. 


SIZING 

WDRAGGING 

SDRAGGING 

WUPFRONT 

WDOWNBACK 

SUPFRONT 

SDOWNBACK 

CLOSE 


Size-Gadget für Windows 

Gadget für Verschiebung von Windows 

Gadget für Verschiebung von Screens 

Gadget WindowToFront 

Gadget WindowToBack 

Gadget ScreenToFront 

Gadget ScreenToBack 

Close-Gadget (Windows) 


*gg GadgetRender 

Zeiger auf eine Grafikstruktur. Der Typ der Grafikstruktur 
kann im Eintrag Flags bestimmt werden. Zur Verfügung stehen 
die Image- und Border-Struktur. 


*gg_S electRender 

Wie bei GadgetRender wird ein Zeiger auf eine Grafikstruktur 
benötigt, die bei Aktivierung des Gadgets im Austausch mit 
der alten Grafik gezeichnet werden soll. 


*gg_GadgetText 

Zeiger auf eine IntuiText-Struktur, die den Text des Gadgets 
enthält oder Null, wenn auf einen Text verzichtet wird. 


ggMutualExclude 

Die nächste Funktion wäre recht interessant, würde sie von 
Intuition unterstützt werden. Es handlet sich hierbei um die 
Exclude-Funktion, auf die wir an dieser Stelle nicht näher 
eingehen wollen, da sie für die Gadgets nicht implementiert 
ist. Man sollte hier immer eine Null einsetzen! 


gg Speciallnfo 

Zeiger auf eine Specialinfo-Struktur, die je nach Typ das 
Gadgets besondere Informationen enthalten kann. Bei Boolean- 
Gadgets kann man hier einen Zeiger auf eine Boollnfo-Struk- 
tur einsetzen, dann muß jedoch das BOOLEXTEND-Flag des Acti- 
vation Eintrags gesetzt sein. In unserem Beispiel lassen wir 
die Boollnfo-Struktur weg. 

ggGadgetID 

Identifikationsnummer des Gadgets, die wir bei der Nachrich¬ 
tenauswertung abfragen können um die Meldung einem Gadget 
zuzuordnen. Es ist natürlich auch möglich, mehreren Gadgets 
dieselbe Nummer zuzuweisen. Dies kann bei einigen 
Situationen recht praktisch sein. 

gg UserData 

Zeiger auf eigene Daten, die vom Benutzer angelegt und ver¬ 
waltet werden können. 
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5.4.2 Integer- und String-Gadgets 

Die Integer- bzw. String-Gadgets dienen dazu, Zahlen bzw. 
Zeichenketten einzugeben. Da die Grundstruktur der Gadgets 
identisch ist, können wir durch einige wenige Veränderungen 
der beschriebenen Struktur, aus dem Boolean-Gadget ein 
String-Gadget machen. Zunächst ändern wir den Typ des Gad¬ 
gets. Wir setzen in diesen Eintrag eine 4 ein um den STRGAD- 
GET-Typ einzustellen. Dann benötigen wir einen Zeiger auf 
eine String-Info-Struktur. Das wäre eigentlich schon alles. 
Man könnte allerdings noch die Größe und einige Flags nach 
Belieben umstellen. Nun aber zur String-Info-Struktur. Sie 
hat folgenden Aufbau: 

Stringinfo-Struktur: 


00 

dc.l 

*si Buffer 

Zeiger auf Text-Puffer 

04 

dc.l 

*si UndoBuffer 

Zeiger auf Undo-Puffer 

08 

dc.w 

si BufferPos 

Position im Puffer 

10 

dc.w 

si MaxChars 

maximale Anzahl Zeichen 

12 

dc.w 

si DispPos 

Pos. des ersten Zeichens 

14 

dc.w 

si UndoPos 

Position im Undo-Puffer 

16 

dc.w 

si NumChars 

Anzahl Zeichen im Puffer 

18 

dc.w 

si DispCount 

Ausgabeposition 

20 

dc.w 

si CLeft 

relative X-Position zum Win 

22 

dc.w 

si CTop 

relative Y-Position zum Win 

24 

dc.l 

*si LayerPtr 

Zeiger auf Layer 

28 

dc.l 

si Longlnt 

Zahlernwert der Eingabe 

32 

dc.l 

*si AltKeyMap 

eigene Tastaturtabelle 

36 


si' SIZEOF 


*si 

Buffer 



Zeiger auf einen Speicherbereich, in welchem 


eingegebenen Zeichen stehen. Der Speicher kann schon eine 
Zeichenkette enthalten, die direkt angezeigt werden soll. 

*si_UndoBuffer 

Jede Eingabe kann durch die Tastenkombination Amiga-Q rück¬ 
gängig gemacht werden. Hierzu muß die letzte Zeichenkette 
zwischengespeichert werden. Die Adresse des Zwischenspei¬ 
chers muß in dem Eintrag UndoBuffer eingesetzt werden. 

si_BufferPos 

Cursorposition in der Zeichenkette. 

si_MaxChars 

Maximale Anzahl der Zeichen, die eingegeben werden können. 
Dieser Eintrag sollte mit der Größe des Speichers für die 
Zeichenkette abgestimmt sein. Wurde die maximale Anzahl er¬ 
reicht, so wird dies durch einen DisplayBeep angezeigt. 

si_DispPos 

Displayposition gibt die Position in der Zeichenkette, ab 
welcher die Zeichen im Container (Eingabefeld) sichtbar sein 
sollen, an. 

si UndoPos 
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Position des Cursors im Undo-Puffer. 
si_NumChars 

Anzahl der Zeichen, die sich im Puffer befinden. 
si_DispCount 

Maximale Anzahl der Zeichen die angezeigt werden können. 

Dem Eintrag DispCount folgen vier Parameter, deren Verwal¬ 
tung von Intuition übernommen wird. Natürlich kann man die 
teilweise recht interessanten Werte auslesen. Deshalb sollen 
sie erklärt werden. 

si_CLeft, si_CTop 

Durch diese Werte ist die relative Position des Gadgets in 
bezug auf die linke obere Fensterecke angegeben. 

*si_LayerPtr 

Zeiger auf die Layer-Struktur. 
si Longlnt 

BeT einem Integer-Gadget kann man an dieser Stelle den Wert 
des eingegebenen ASCII-Strings auslesen. 

*si_AltKeyMap 

Zeiger auf die Tastatur-Tabelle, die für die Eingabe benutzt 
werden soll. Den Standardwert bekommen wir auch hier durch 
eine Null. 


Auf folgende Eingaben reagieren String-/Integer-Gadgets: 


Return/Enter: 
rechts/links: 

Shift rechts/links: 
Delete/Backspace: 
rechte Amiga + X: 
rechte Amiga + Q: 


Eingabe beenden 

Cursor durch den Text bewegen 

Cursor an den Anfang/Ende setzen 

Zeichen löschen (aktuell/links) 

löscht bestehende Eingabe 

setzt den Inhalt des Undo-Buffers 


5.4.3 Proportional-Gadget 

Kommen wir nun zum letzten Gadget-Typ, dem Proportional-Gad¬ 
get. Sicher kennen sie diesen Typ schon, ein Beispiel für 
die Anwendung eines solchen Typs ist die Einstellung der 
Farben im Preferences-Programm. Dort kann man die Farbwerte 
mittels eines solchen Schiebeschalters festlegen. Oder auch 
in Dateiauswahl-Reguestern ist diese Art oft anzutreffen. 
Der besondere Witz dieses Gadgets liegt in der proportiona¬ 
len Größenveränderung des Schiebers. So kann man z.B. ver¬ 
folgen, daß bei einigen Filerequestern während des Ladevor¬ 
gangs des Inhaltsverzeichnises die Schiebergröße mit der An¬ 
zahl der gelesenen Dateien abnimmt. 
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Das Proportional-Gadget braucht eine gewöhnliche Gadget- 
Struktur. Wie bei den String-Gadgets tragen wir den Typ des 
Gadgets und einen Zeiger auf eine Special-Info-Struktur ein. 
Betrachten wir uns nun die Proplnfo-Struktur. 


Proplnfo-Struktur: 


00 

dc.w 

pi Flags 

02 

dc.w 

pi HorizPot 

04 

dc.w 

pi VertPot 

06 

dc.w 

pi HorizBody 

08 

dc.w 

pi VertBody 

10 

dc.w 

pi CWidth 

12 

dc.w 

pi_CHeight 

14 

dc.w 

pi HPotRes 

16 

dc.w 

pi VPotRes 

18 

dc.w 

pi LeftBorder 

20 

dc.w 

pi TopBorder 

22 


pi_SIZE0F 


Flags 

X-Position des Schalters 
Y-Position des Schalters 
X-Größe des Schalters 
Y-Größe des Schalters 
Breite des Gadgets 
Höhe des Gadgets 
Schrittweite in X~Richtung 
Schrittweite in Y-Richtung 
Position des Rahmens (X) 
Position des Rahmens (Y) 


piFlags 

Einstellungen, die das Gadget betreffen: 


Prop-Flags Wert Bedeutung 


FREEHORIZ 

$0002 

FREEVERT 

$0004 

AUTOKNOB 

$0001 

PROPBORDERLESS 

$0008 

KNOBHIT 

$0100 


horizontale Bewegungen erlauben 
vertikale Bewegungen erlauben 
Schieber wird von Intuition erstellt 
keinen Rahmen um das Gadget zeichnen 
Schieber ist betätigt worden 


FREEHORIZ 

FREEVERT 

AUTOKNOB 


PROPBORDERLESS 

KNOBHIT 


Dieses Flag erlaubt die horizontale Bewegung. 
Dieses Flag erlaubt die vertikale Bewegung. 

Wenn kein eigener Schieber angegeben wird, kann 
man mit dem Flag AUTOKNOB Intuition veranlassen, 
einen Schieber zu erstellen. 

Soll das Proportional-Gadget ohne Rand darge¬ 
stellt werden muß dieses Flag gesetzt werden. 
KNOBHIT ist ein Informations-Flag. Wurde der 
Schieber mit dem Mauszeiger aktiviert, so ist es 
gesetzt. 


pi_HorizPot, pi VertPot 

Die folgenden Einträge sind für die vertikale und horizon¬ 
tale Position des Schiebers verantwortlich. Dabei gilt der 
Wert 0 für links bzw. oben und der Wert $FFFF (-1) für 
rechts bzw. unten. 

pi_HorizBody, pi_VertBody 

Die Einträge HorizBody und VertBody geben die Schrittgröße 
an, mit der sich der Schieber bewegen soll. Auch diese Ein¬ 
stellung kann zwischen 0 und $FFFF liegen. Wenn man z.B. 20 
Schritte einstellen will, muß man den Wert SFFFF/20 einset- 
zen. 
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Die folgenden sechs Werte werden von Intuition selbst ge¬ 
setzt und können wärend des Programms abgefragt werden. 

pi_CWidth, pi_CHeight 
Breite und Höhe der Hit-Box. 

pi_HPotR.es , pi_VPotRes 

Erhöhung der vertikalen und horizontalen Werte. 
pi_LeftBorder, pi_TopBorder 

Position der Umrandung des Proportional-Gadgets. 

Für diesen Gadget-Typ stellt uns Intuition zwei wichtige 
Funktionen zur Verfügung. 


ModifyProp = -156 (Intuition-Library) 


*Gadget 

aO 

< 

Zeiger auf die PropGadget-Struktur, 
verändert werden soll 

die 

♦Window 

al 

< 

Zeiger auf das Fenster, in dem das 
get liegt oder Null 

Gad- 

♦Requester 

a2 

< 

Zeiger auf den Requester, in dem 
Gadget liegt oder Null 

das 

Flags 

dO 

< 

Neue Flags, die eingestellt werden 
len 

sol- 

HPot 

dl 

< 

horizontale Position des Schiebers 


VPot 

d2 

< 

vertikale Position des Schiebers 


HBody 

d3 

< 

Breite des Schiebers 


VBody 

d4 

< 

Höhe des Schiebers 


Erklärung 



Durch ModifyProp kann man die Einstei- 


lungen eines Prop-Gadgets nachträglich 
ändern. Wurden die neuen Werte initiali¬ 
siert, werden alle Gadgets ab dem ange¬ 
gebenen PropGadget neu gezeichnet. 


NewModifyProp = -468 (Intuition-Library) 


♦Gadget 

aO 

< 

Zeiger auf die PropGadget-Struktur, die 
verändert werden soll. 

♦Window 

al 

< 

Zeiger auf das Fenster, in dem das Gad¬ 
get liegt oder Null. 

♦Requester 

a2 

< 

Zeiger auf den Requester, in dem das 
Gadget liegt oder Null. 

Flags 

dO 

< 

Neue Flags, die eingestellt werden sol¬ 
len . 

HPot 

dl 

< 

Horizontale Position des Schiebers. 

VPot 

d2 

< 

Vertikale Position des Schiebers. 

HBody 

d3 

< 

Breite des Schiebers. 

VBody 

d4 

< 

Höhe des Schiebers. 

Num 

d5 

< 

Anzahl der weiteren Gadgets, die nach 
dem angegebenen Prop-Gadget aufgefrischt 
werden sollen. 
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Erklärung Durch NewModifyProp kann man, wie schon 

mit der Funktion ModifyProp, die Ein¬ 
stellungen eines ProportionalGadget ver¬ 
ändern. Der Unterschied beider Funktio¬ 
nen liegt darin, daß man bei der NewMo¬ 
difyProp-Funktion die Anzahl der Gad- 
gets, die aufgefrischt werden sollen, 
angeben kann. 


5.4.4 Gadget-Abfrage 

Nachdem wir die Unterschiede der Gadgets kennengelernt ha¬ 
ben, sollten wir uns jetzt noch um ihre Abfrage kümmern. 
Dazu können wir dieselbe Nachrichtenbehandlung, die bei den 
Fenstern benutzt wird, verwenden. Bisher haben wir immer 
darauf gewartet, daß das CloseGadget des Fensters betätigt 
worden ist. Nun müssen wir auch prüfen, ob ein Gadget 
aktiviert worden ist. Dazu dienen die beiden IDCMP-Flags 
GADGETDOWN und GADGETUP. Ist nun ein Gadget aktiviert 
worden, müssen wir auch die Identifikationsnummer des 
Gadgets erhalten. Sie wird jedoch nicht in der IntuiMessage- 
Struktur eingetragen. Anstelle dessen finden wir im Eintrag 
IAddress einen Zeiger auf die Gadget-Struktur des Gadgets, 
welches ausgelöst wurde. Nun können wir ganz einfach aus der 


angegebenen 

Gadget-Struktur 

den ID-Eintrag auslesen. 

MessageBranch: 

move.1 
move.1 
move.1 
move.w 

Message,aO ; 

20(a0),Class 
28(a0),a0 ; 

38{a0),GadID 

Class-Eintrag auslesen 

IAddress nach aO 
Gadget-Identifikationsnr. 

move.1 
jsr 

Message,al ; 

ReplyMsg(a6) 

Nachricht quittieren 

cmp.l 

beq 

#$40,dass ; 

GadgetBranch ; 

Gadget betätigt ? 

Ja, dann untersuchen 

bra 

MessageLoop ; 

Wiederholen 

GadgetBranch: 



cmp.w 

beq 

#1,GadID ; 

Exit ; 

Gadget mit der ID-Nummer 1, 
dann Programm beenden 

bra 

MessageLoop ; 

Neue Nachricht holen 
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dass: dc.l 0 ; IDCMP-Flag der Nachricht 

GadID: dc.l 0 ; Gadget-Identifikationsnuinmer 


Bild 5.8: Abfrage von Gadgets 


Haben wir nun die Gadgetnummer isoliert, können wir zwischen 
den einzelnen Gadgets unterscheiden und richtig reagieren. 
Wenn man viele Gadgets verwalten will, ist es ratsam, die 
Adressen der Routinen in einer Tabelle abzulegen. Wählt man 
die Gadget-ID Nummern sinnvoll, kann man die Position in der 
Tabelle, an der die Adresse der Routine steht, leicht 
ausrechnen und zu ihr verzweigen. Diese Methode wird auch 
beim Demoprogramm für die Intuition-Library gewählt. 


GadgetBranch: 

cmp.w 

#6,GadID 

; kontrollieren ob Ga .:atID- 

bgt 

MessageLoop 

; Nummer im erlaubten,'Bereich liegt 

lea 

Tabelle,aO 

; Anfang der Tabelle nach aO laden 

moveq 

#0,d0 

; dO löschen), 0 

move.w 

GadID,dO 

; Gadgeti .\V ar nach dO 

sub. 1 

*l,dO 

; GadlD^ummer erniedrigen! 

lsl.l 

12,dO 

; Ktt^vier multiplizieren (lsl.l #2,d0 
;Ygeht schneller als mulu) 

; Adresse der betreffenden Routine aus 

move.1 

( aO , dO ) ,a0 

(aO) 

jmp 

; der Tabelle lesen 
; und zu ihr verzweigen. 


Tabelle: 

dc.l 

Exit 

; Adr. der 

Routine 

für Gad #1 

dc.l 

LoadlFF 

; Adr. der 

Routine 

für Gad #2 

dc.l 

SavelFF 

; Adr. der 

Routine 

für Gad #3 

dc.l 

LoadRAW 

; Adr. der 

Routine 

für Gad #4 

dc.l 

SaveRAW 

; Adr. der 

Routine 

für Gad |5 

dc.l 

Info 

; Adr. der 

Routine 

für Gad #6 


Bild 5.9: Reaktion auf Gadget-Klicks 


Abgesehen von denen, die wir bereits besprochen haben, gibt 
es nur noch wenige Funktionen, die für Gadgets verantwort¬ 
lich sind. Dazu gehören die folgenden, die in alphabetischer 
Reihenfolge geordnet sind. Bei manchen Funktionen ist ein 
Pointer auf eine Window- und eine Requester-Struktur ver¬ 
langt. Es muß jedoch nur eine Adresse übergeben werden. Die 
andere muß auf Null gesetzt werden. 
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ActivateGadget 

= -462 (Intuition-Library) 

»Gadget 

aO 

< 

Zeiger auf die Struktur des Gadgets, 
welches aktiviert werden soll. 

»Window 

al 

< 

Zeiger auf die Struktur des Fensters, in 
dem das Gadget eingebunden ist oder 




Null. 

»Requester 

a2 

< 

Zeiger auf die Struktur des Requesters, 
in dem das Gadget eingebunden ist, oder 
Null. 

Erklärung 



Durch ActivateGadget kann das angegebene 
Gadget aktiviert werden. 

AddGadget 


= -42 (Intuition-Library) 


»Window 

aO 

< 

Zeiger auf die Window-Struktur, in der 
das neue Gadget eingebunden werden soll. 

»Gadget 

al 

< 

Zeiger auf die Struktur des Gadgets, 
welches in ein bestimmtes Fenster aufge¬ 
nommen werden soll. 

Position 

dO 

< 

Position, an der das Gadget in die Liste 
eingebunden werden soll (-1 = Ende). 

RealPos 

do 

> 

Listenposition, an der das Gadget einge¬ 
fügt worden ist. 

Erklärung 



Durch die AddGadget-Funktion kann man 
ein Gadget nachträglich in ein Fenster 


einbinden. Nachdem die Funktion ausge¬ 
führt wurde, ist das Gadget zwar in die 
Liste aufgenommen worden, jedoch ist es 
noch nicht sichtbar. Hierzu bietet sich 
die Funktion RefreshGadgets oder Refres- 
hGList an. 


AddGList 


-438 (Intuition-Library) 


»Window 

aO 

< 

Zeiger auf die Window-Struktur, in die 
die Gadgets eingebunden werden sollen 
oder Null. 

»Gadget 

al 

< 

Zeiger auf das erste Gadget der Liste, 
die eingebunden werden soll. 

»Requester 

a2 

< 

Zeiger auf den Requester, in den die 
Gadgets eingebunden werden sollen oder 
Null. 

Position 

do 

< 

Position, an der die Gadgets in die Li¬ 
ste eingebunden werden sollen (-1 = 

Ende) . 
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NumGad 

dl 

< 

Anzahl der Gadgets die eingefügt werden 
sollen. 

RealPos 

dO 

> 

Listenposition, an der das Gadget einge¬ 
fügt worden ist. 

Erklärung 



Diese Funktion fügt die angegebene An¬ 
zahl Gadgets aus der übergebenen Gadget- 
liste an der angegebenen Position des 
Requesters oder Fensters ein. 

OffGadget 


= -174 (Intuition-Library) 

*Gadget 

aO 

< 

Zeiger auf die Struktur des Gadget, wel¬ 
ches ausgeschaltet werden soll. 

*Window 

al 

< 

Zeiger auf das Fenster, in dem das Gad¬ 
get eingebunden ist oder Null. 

*Reguester 

a2 

< 

Zeiger auf den Requester, in dem das 
Gadget eingebunden ist oder Null. 

Erklärung 



Die Funktion OffGadget schaltet ein Gad¬ 
get aus. Das heißt, die HITBOX wird 
schattiert dargestellt und das Gadget 
kann nichtmehr betätigt werden. (Siehe 




auch OnGadget.) 

OnGadget 



= -186 (Intuition-Library) 

♦Gadget 

aO 

< 

Zeiger auf die Struktur des Gadgets, 
welches eingeschaltet werden soll. 

♦Window 

al 

< 

Zeiger auf das Fenster, in dem das Gad¬ 
get eingebunden ist oder Null. 

♦Requester 

a2 

< 

Zeiger auf den Requester, in dem das 
Gadget eingebunden ist oder Null. 

Erklärung 



Die Funktion OnGadget schaltet ein Gad¬ 
get ein. Danach kann es wieder normal 
benutzt werden (siehe auch OffGadget). 

RefreshGadgets 

= -222 (Intuition-Library) 


♦Gadget 

aO 

< Zeiger auf die Struktur des Gadgets, 
welches neu gezeichnet werden soll. 

♦Window 

al 

< Zeiger auf das Fenster, in dem das Gad¬ 
get eingebunden ist oder Null. 

♦Requester 

a2 

< Zeiger auf den Requester, in dem das 
Gadget eingebunden ist oder Null. 

Erklärung 


Diese Funktion frischt das angegebene 
Gadget und alle folgenden auf (siehe 
auch RefreshGList). 
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RefreshGList = -432 (Intuition-Library) 


»Gadget 

aO 

< 

Zeiger auf die Struktur des ersten Gad¬ 
gets der Gadgetliste, die aufgefrischt 
werden soll. 

»Window 

al 

< 

Zeiger auf das Fenster, in dem das Gad¬ 
get eingebunden ist, oder Null. 

»Requester 

a2 

< 

Zeiger auf den Requester, in dem das 
Gadget eingebunden ist oder Null. 

NumGad 

do 

< 

Anzahl der Gadgets, die nach dem angege¬ 
benen neu gezeichnet werden sollen. 

Erklärung 



Das angegebene Gadget und eine bestimmte 


Anzahl folgender werden neu gezeichnet 
(siehe auch RefreshGadget). 



*Window aO < Zeiger auf das Fenster, in dem das Gad- 

get eingebunden ist. 

*Gadget al < Zeiger auf die Struktur des Gadgets, 

welches entfernt werden soll. 

Erklärung Das angegebene Gadget wird aus der Liste 

der Gadgets des angegebenen Fensters 
entfernt. Dabei werden die dazugehörigen 
Grafikstrukturen, die auf dem Fenster 
gezeichnet worden sind, nicht gelöscht. 



»Window aO < Zeiger auf das Fenster in dem das Gadget 

eingebunden ist. 

»Gadget al < Zeiger auf die Struktur des ersten Gad¬ 

gets der Liste, welche entfernt werden 
soll. 

»NumGad do < Anzahl der Gadgets, die entfernt werden 

sollen. 

Erklärung Das angegebene Gadget und die angegebene 

Anzahl der folgenden Gadgets werden ent¬ 
fernt. Dabei werden die dazugehörigen 
Grafikstrukturen, die auf dem Fenster 
gezeichnet worden sind, nicht gelöscht. 
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5.5 Menüs 

Die Menüs sind neben den Gadgets die beliebteste Möglich¬ 
keit, eine strukturierte Programmoberfläche zu realisieren. 
Doch schon beim Einbinden der Menüs zeigt sich ein grundle¬ 
gender Unterschied gegenüber den Gadgets. Während es für 
User-Gadgets die Möglichkeit des Einbindens in die NewWin- 
dow-struktur gibt, muß man die Menüs von "Hand" implementie¬ 
ren. Aber so schlimm ist das nun auch wieder nicht, da uns 
Intuition kraftvoll mit einer Funktion unter die Arme 
greift. Gemeint ist die SetMenuStrip-Funktion, die als Para¬ 
meter einen Zeiger auf die Menü-Struktur bzw. Kette ver¬ 
langt. Da die Menüs abhängig von einem Fenster sind, ist es 
nicht verwunderlich, daß wir als zweiten Parameter einen 
Zeiger auf unser Window übergeben müssen. 


SetMenuStrip = -264 (Intuition-Library) 


♦Window 

aO 

< 

Zeiger auf eine Window-Struktur 

♦Menu 

al 

< 

Zeiger auf die erste Menü-Struktur 

Erklärung 



Die angegebene Menüliste wird in die 
Fenster-Struktur implementiert. 

Natürlich 

kann 

man 

die Menü-Strukturen auch wieder entfer- 

nen. Dazu 

dient 

die 

Funktion ClearMenuStrip. 


ClearMenuStrip = -54 (Intuition-Library) 


♦Window aO < Zeiger auf eine Window-Struktur 

Erklärung Die Funktion ClearMenuStrip entfernt die 

Menüs, die mit SetMenuStrip für dieses 
Fenster angegeben wurden. 


Im Programm sieht das Ganze dann so aus: 


SetMenuStrip = -264 

ClearMenuStrip = -54 


move.l Intßase,a6 
move.l WindowHD,aO 
lea Menul,al 

jsr SetMenuStrip(a6) 
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move.l IntBase,a6 

move.l WindowHD,aO 

jsr ClearMenuStrip(a6) 


Bild 5.10: Aufruf von SetMenuStrip und ClearMenuStrip 


Um ein Menü zu erstellen, brauchen wir zwei Strukturen. Die 
Menu-Struktur, in der die Einträge der Menüleiste abgelegt 
werden, sowie die Menuitem-Struktur, welche die eigentlichen 
Auswahlmöglichkeiten darstellt. Als Basis dient die Menu- 
Struktur. Deshalb beginnen wir mit ihr. 


Die Menu-Struktur: 


00 

dc.l 

*mu NextMenu 

; Zeiger auf nächstes Menü 

04 

dc.w 

mu LeftEdge 

; X-Position 

06 

dc.w 

mu TopEdge 

; Y-Position 

08 

dc.w 

mu Width 

; Breite des Menüs 

10 

dc.w 

mu Height 

; Höhe des Menüs 

12 

dc.w 

mu Flags 

; Flags 

14 

dc.l 

*mu MenuName 

; Zeiger auf Menüname 

18 

dc.l 

*mu Firstitem 

; Zeiger auf ersten Menupunkt 

22 

dc.w 

mu JazzX 

; private Variablen Intuition 

24 

dc.w 

mu JazzY 

; private Variablen Intuition 

26 

dc.w 

mu BeatX 

; private Variablen Intuition 

28 

dc.w 

mu BeatY 

; private Variablen Intuition 

30 


mu SIZEOF 



*mu_NextMenu 

Zeiger auf nächste Menü-Struktur. Der erste Wert zeigt 
schon, daß es sich um verkettete Strukturen handelt. Man 
kann hier einen Zeiger auf eine weitere Menu-Struktur 
"einhängen". 

mu_LeftEdge, muTopEdge 

Position des Menüpunktes in der Titelzeile. Dabei wird al- 
lerdinas nur der Wert von LeftEdge berücksichtigt. 

mu Width, muHeight 

Breit und Höhe des Menüpunktes. Auch hier wird der zweite 
Wert (Height/Höhe) nicht berücksichtigt, da er immer auf die 
Höhe der Titelzeile festgelegt ist. 

mu_Flags 

In Flags kann man folgende Werte setzen: 

Menü-Flags Wert Bedeutung 


MENUENABLED $0001 Menüpunkt ist nicht anwählbar 

MIDDRAWN $0100 Menüpunkt wird gerade angezeigt 


226 


Die Intuition-Library 


MENUENABLED Die Menüpunkte des Menüs können nicht ausgewählt 

werden. 

MIDDRAWN Die Tabelle der Menüpunkte ist im Augenblick 

"ausgeklappt" (wird von Intuition benutzt). 


*MenuName 

Zeiger auf eine Zeichenkette, die in der Menüzeile ausgege¬ 
ben werden soll (der Menüname). 

*mu_FirstItem 

Zeiger auf die verwendeten Menüitems, deren Struktur gleich 
erklärt wird. 

mu_JazzX, mu_JazzY, mu_BeatX, mu_BeatY 

Abgeschlossen wird die Struktur durch vier Words, die von 
Intuition intern benutzt werden. 

Da wir nicht nur die Menüzeilen, sondern auch Menüpunkte, 
einbinden wollen, müssen wir jetzt noch die 12 Parameter der 
Menüitem-Struktur untersuchen. 

Die Menültem-Struktur: 


00 

dc.l 

*mi Nextltem 

nächste Menuitem-Struktur 

04 

dc.w 

mi LeftEdge 

X-Koordinate des Punktes 

06 

dc.w 

mi TopEdge 

Y-Koordinate des Punktes 

08 

dc.w 

mi Width 

Breite des Menüpunktes 

10 

dc.w 

mi Height 

Höhe des Menüpunktes 

12 

dc.w 

mi Flags 

Flags des Menüpunktes 

14 

dc.l 

mi_MutualExclude 

MutualExclude-Daten 

18 

dc.l 

mi ItemFill 

Grafikdaten "normal" 

22 

dc.l 

mi SelectFill 

Grafikdaten "aktiviert" 

26 

dc.b 

mi Command 

Tastaturcode 

27 

dc.b 

mi_KludgeFill00 

Füllbyte 

28 

dc.l 

*mi Subitem 

Zeiger auf Untermenü 

32 

dc.l 

mi NextSelect 

Nächster ausgewählter Menüpunkt 

36 


mi SIZEOF 


*mi 

Nextltem 


Zeiger auf 

die nächste Menultem-Strukur, die eingebunden 


werden soll oder eine Null, wenn keine weitere Struktur be¬ 
nutzt werden soll. 

mi_LeftEdge, mi TopEdge, miwidth, mi_Height 
Position und Große des Menüpunktes. 

mi_Flags 

Der Eintrag Flags legt die Eigenschaften des Menüpunktes 
fest. Die Bedeutung der Flags soll die anschließende Tabelle 
klären. 
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Menuitem-Flag 

Wert 

Bedeutung 

CHECKIT 

$0001 

Menüpunkt abhaken 

ITEMTEXT 

$0002 

IntuiText-Strukturen werden verwendet 

COMMSEQ 

$0004 

Menü kann durch Tasten angewählt werden 

MENUTOGGLE 

$0008 

der Zustand wird umgedreht 

ITEMENABLED 

$0010 

Menü ist wählbar 

HIGHIMGE 

$0000 

bei Aktivierung neues Image anzeigen 

HIGHCOMP 

$0040 

bei Aktivierung Bereich invertieren 

HIGHBOX 

$0080 

bei Aktivierung Bereich umranden 

HIGHNONE 

$00C0 

bei Aktivierung passiert nichts 

HIGHITEM 

$2000 

Menüpunkt ist gerade aktiviert 

CHECKED 

$0100 

Menüpunkt ist gewählt 

ISDRAWN 

$1000 

Menüpunkt wird dargestellt 

MENUTOGGLED 

$4000 

Menüpunkt wurde schon umgedreht 

CHECKIT 

Der 

Menüpunkt wird bei Selektion abgehakt t 


ITEMTEXT 

COMMSEQ 

MENUTOGGLE 

ITEMENABLED 

HIGHIMGE 

HIGHCOMP 


uci nahen «nu nj-tuöi w \ j ^ - 1 - 

das MENUTOGGLE-Flag gesetzt ist). Die Grafikda¬ 
ten des Hakens konnten wir in der NewWindow- 
Struktur bestimmen. 

Die Einträge ItemFill und SelectFill sind nun 
Zeiger auf IntuiText-Strukturen. Sonst wurden 
Image-Strukturen erwartet. 

Der Menüpunkt kann durch eine Tastenkombination 
angewählt werden. Die Tastenkombination besteht 
aus der rechten Amiga-Taste und einer zweiten, 
in Command angegebenen Taste. 

Der Zustand des Menüpunktes (abgehakt oder 
nicht) wird bei jeder Selektion umgedreht. Dabei 
wird auch das Flag CHECKED verändert. 

Der Menüpunkt und seine Unterpunkte können aus¬ 
gewählt werden. 

Ist das Menü aktiviert worden, wird das Image, 
auf den der Zeiger SelectFill zeigt, ausgegeben. 
Wenn der Menüpunkt angewählt wurde, wird der an¬ 
gegebene Bereich des Menüpunktes invertiert dar- 


HIGHBOX 

HIGHNONE 

HIGHITEM 

CHECKED 

ISDRAWN 

MENUTOGGLED 


gestellt. 

Der Menüpunkt wird mit einem Rahmen umgeben, 
wenn er aktiviert worden ist. 

Es passiert nichts, wenn das Menü aktiviert 
wird. 

Das Falg HIGHITEM ist immer dann gesetzt, wenn 
der Menüpunkt mit dem Mauszeiger ausgewählt 
wurde. 

Ist der Haken an einem Menüpunkt gesetzt worden, 
ist das CHECKED-Flag aktiviert. Hierzu muß das 
Flag CHECKIT gesetzt sein ! 

Durch ISDRAWN wird angezeigt, daß das Menü ge¬ 
rade dargestellt wird. 

Der Menüpunkt ist schon umgedreht worden. 


mi MutualExclude 

Im Eintrag MutualExclude werden die Daten für diese Funktion 
gespeichert. Diese Funktion ist bei den Gadgets zwar vorge- 
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sehen, aber nicht realisiert worden. Bei den Menüs jedoch 
kann man von dieser praktischen Unterstützung Gebrauch ma¬ 
chen. Die Funktionsweise ist wie folgt: Wird dieser Menü¬ 
punkt ausgewählt, kann dies Einfluß auf den Status 
(gewählt/nicht gewählt) der anderen Menüpunkte dieses 
Menütitels haben. Welcher Punkt ausgeschaltet werden soll, 
wird in diesem Langwort abgelegt. Dabei entspricht das erste 
Bit (Bit 0) dem ersten Menüpunkt und jedes folgende Bit 
jedem weiteren Menüpunkt. Soll der Zustand des Menüpunktes 
beeinflußt werden, muß das jeweilige Bit gesetzt werden. 

mi ItemFill 

Zeiger auf eine Grafikstruktur, die im Menü gezeichnet wer¬ 
den soll. Normalerweise wird ein Zeiger auf eine Image- 
Struktur vermutet. Dies kann jedoch durch den Eintrag ITEM¬ 
TEXT geändert werden. 

mi SelectFill 

Zeiger auf Grafikdaten, die ausgegeben werden sollen, wenn 
der Menüpunkt aktiviert worden ist. Wie bei ItemFill ist 
auch hier der Typ der Struktur abhängig von dem Flag ITEM¬ 
TEXT. Jedoch muß das Flag HIGHIMAGE gesetzt sein, damit bei 
aktivierten Menüitems die Grafiken bzw. Texte ausgetauscht 
werden. 

mi Command 

Wie sie vielleicht schon wissen, kann man die Menüpunkte 
nicht nur mit dem Mauszeiger sondern auch mit der Tastatur 
anwählen. Hierzu muß angegeben werden, auf welche Taste, in 
Kombination mit der rechten Amiga-Taste, reagiert werden 
soll. Auch hier müssen wir die Tastenwahl der Menüpunkte im 
Flag-Eintrag der Struktur extra "erlauben". Hierzu dient das 
COMMSEQ-Flag. 

miKludgeFillOO 

Da der Eintrag Command nur ein Byte lang ist und der PC an 
dieser Stelle einen ungeraden Wert enthalten würde, benötigt 
man diesen Füllbyte-Eintrag, um ihn auf Wort-Grenze 
"umzubiegen". 

mi Subitem 

Zeiger auf weitere Menüitem-Strukturen, die als Unterpunkte 
verwendet werden sollen. Diese Verschachtelung ist jedoch 
nur einmal möglich, bei der nächsten Struktur wird dieser 
Eintrag nicht berücksichtigt. 

mi_NextSelected 

Das letzte Langwort enthält, falls mehrere Menüpunkte ausge¬ 
wählt worden sind, die Nummer des nächsten gewählten Menü¬ 
punktes. 

Nachdem wir uns durch soviele trockene Daten-Strukturen ge¬ 
arbeitet haben, kommen wir jetzt wieder zur Programmierung. 
Wie bei den Gadgets müssen wir auch bei der Menübearbeitung 
darauf achten, daß wir die Meldung im IDCMP-Parameter des 
Windows erlaubt haben. Sonst warten wir vergebens auf eine 
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Nachricht von Intuition. Wie wir nun die Nummer des Menüs, 
des Menüpunktes und eventuell auch des Menüunterpunktes aus 
der IntuiMessage-Struktur lesen, sehen wir uns in dem fol¬ 
genden Programmabschnitt an. 


MessageBranch: 

move.1 
move.1 
move.w 

Message,aO ; 
20(a0),Class ; 
24(aO),Code 

Auslesen der Class- und 

Code-Einträge 

move.1 
jsr 

Message,al ; 

ReplyMsg(a6) 

Nachricht bestätigen 

cmp.l 

beq 

#$100, dass 
MenuLoop 

Class-Eintrag kontrollieren 

Menü ausgewält! 

bra 

MessageLoop 

hier können andere Abfragen 
eingesetzt werden 
zurück und auf nächste 

Nachricht warten! 

MenuDecoder: 


Menüabfrage 

move.w 

cmp.w 

beq 

Code,d0 

#-l,d0 

MessageLoop 

Code-Eintrag nach dO 

Testen ob überhaupt ein 

Menüpunkt gewählt wurde 

and.l 

#*11111,dO 

Alle Bits bis auf die unteren 5 
ausblenden, um Menünummer zu erhalten 

moveq 

move.w 

lsr.l 

move.w 

and.l 

#o,di 

Code,dl 
#5,dl 
dl,d2 

#%llllll,dl 

dl löschen 

Code-Eintrag nach dl 
dl um 5 Bits nach rechts 
neuen Wert nach d2 kopieren 

Alle Bits bis auf die unteren 6 
ausblenden, um Menüpunktnummer zu 
erhalten 

lsr.l 

#6,d2 

Wert abermals nach rechts schieben, um 


; Menüunterpunktnummer zu bekommen 


; Menünummer = dO 
; Menüpunktnummer = dl 
; Menüunterpunktnummer = d2 

; Jetzt müssen lediglich die Datenregister 1-3 üperprüft werden. 


Bild 5.11: Abfrage und Auswertung einer Menü-Auswahl 
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Zunächst wird in der Message-Branch-Routine kontrolliert, ob 
die angekommene Nachricht für die Menüauswahl gilt. Dann 
wird zur Unterroutine MenüDecoder verzweigt, die die Auswer¬ 
tung des Eintrags "Code" vornimmt, in welchem der ausge¬ 
wählte Menüpunkt eingetragen ist. Der Eintrag unterteilt 
sich in drei Gruppen: 

Code-Eintrao: 


-!-!- 

FEDCBA9876543210 
__ I __ I __ 

I—> Menünummer (0-4) 

-> Menüpunktnummer (5-10) 

-> Menüunterpunktnummer (11-15) 

Bevor wir uns an die Entschlüsselung machen können, müssen 
wir kontrollieren, ob überhaupt ein Menüpunkt angewählt wor¬ 
den ist. Es kann ja durchaus sein, daß die rechte Maustaste 
nicht über einem Menüpunkt, sondern irgendwo anders losge¬ 
lassen wurde. Sollte das der Fall gewesen sein, sind alle 
Bits gesetzt. Das heißt, der Eintrag Code hat den Wert $FFFF 
(oder -1). Nachdem wir das kontrolliert haben, können wir 
uns an die Isolierung der Menünummer machen. Das erreichen 
wir, wenn wir alle Bits bis auf die ersten fünf ausblenden. 

and.l #%lllll,d0 ; Bits ausblenden 

Man sollte eine Langwort-Operation durchführen, damit das 
obere Wort von do gelöscht wird. 

Um die Nummer des ausgewählten Menüpunktes zu bekommen, müs¬ 
sen wir die 16 Bits des Code-Wertes fünf Stellen nach rechts 
schieben. Bevor wir die überflüssigen Bits wieder ausblen¬ 
den, retten wir den manipulierten Wert nach d2, um ihn spä¬ 
ter zur Auswertung des Menü-Unterpunktes zu benutzen. 


moveq 

#0,dl 

; Datenregister löschen 

move.w 

Code,dl 

; Code übertragen 

lsr.l 

#5,dl 

; fünf Bits nach rechts 

move.w 

dl,d2 

; und Wert für später retten. 

and.l 

#%llllll,dl 

; Nun die störenden Bits ausblenden 


Die Nummer des Menü-Unterpunktes können wir jetzt mit einem 
Befehl festlegen. Wir schieben lediglich die 6 Bits für den 
Menüpunkt aus dem Datenregister "hinaus". 

Jetzt, wo die einzelnen Werte isoliert in den Datenregistern 
d0-d2 enthalten sind, können wir nach Belieben die Register 
testen. Um die Auswahl der richtigen Routine etwas einfacher 
zu gestalten, kann man, wie schon bei den Gadgets, ihre 
Adressen in Tabellen ablegen. 
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5.6 Requester 

Requester bieten dem Programmierer die Möglichkeit, Nach¬ 
richten an den Benutzer weiterzugeben und zusätzlich noch 
Eingaben auszuwerten. 


5.6.1 Alerts 

Die erste Möglichkeit, die wir uns ansehen wollen, sind die 
Alerts, die jeder Benutzer sofort mit den GURUS in 
Verbindung bringt. Die Funktion, mit der wir den Alert auf 
dem Bildschirm darstellen können heißt DisplayAlert. 


DisplayAlert = -90 (Intuition-Library) 


*String 

aO 

< 

Zeiger auf eine Struktur mit dem Text, 
der ausgegeben werden soll, und seiner 
Position. 

AlertNumber 

dO 

< 

Alertnummer. 

Height 

dl 

< 

Höhe des Alerts. 

Response 

Erklärung 

dO 

> 

Gedrückte Maustaste. 

Durch die Funktion DisplayAlert wird der 


angegebenen Text als Alert ausgegeben. 


Der Wert, der im Datenregister 0 übergeben werden muß, gibt 
den Typ des Alerts an. Man unterscheidet dabei zwei ver¬ 
schiedene Formen: 

DEADEND_ALERT = $80000000 
RECOVERY_ALERT = $00000000 

Unter einem DEADEND-Alert versteht man einen Alert, der in 
einen Reset endet, während der RECOVERY-Alert, wie der Name 
schon sagt, ins Programm zurückkehrt. Das heißt aber nicht, 
daß die DisplayAlert-Routine automatisch einen Reset nach 
einem DEADEND-Alert durchführt. Vielmehr wirkt sich die 
Alertnummer auf die Rückmeldung der gedrückten Maustaste 
aus: RECOVERY-Alerts geben eine -1 zurück, falls die linke 
Taste gedrückt wurde und eine 0 bei der rechten Taste. 
DEADEND-Alerts aber geben immer eine 0 zurück. 

Die Daten, auf die wir in aO einen Zeiger übergeben müssen, 
haben ein vordefiniertes Aussehen: 
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String: 


00 

dc.w 

LeftEdge 

; X-Position des Textes 

02 

dc.b 

TopEdge 

; Y-Position des Textes 

03 

ds.b 

AlertText,nn 

; Zeichenkette 

nn 

dc.b 

Flag 

; Flags 


LeftEdge, TopEdge 

Positionierung des Textes, dabei wird die Y-Koordinate durch 
einen Byte-Wert angegeben, da der Wertebereich (0 bis 255) 
ausreicht. 

AlertText 

Zeichenkette, die an der angegebenen Position ausgegeben 
werden soll. Wie alle benutzten Zeichenketten muß auch diese 
mit einem Null-Byte abgeschlossen sein. 

Flag 

Durch den Wert im Eintrag Flag kann man bestimmen, ob eine 
weitere Textzeile angebunden werden soll oder nicht. 

0 = keine weitere Textzeile (ENDE) 

ungleich 0 = weiterer Text folgt (NEXT) 

Wurde das Flag mit einem Wert ungleich 0 initialisiert, wer¬ 
den direkt nach dem letzten Eintrag die nächsten Daten mit 
dem gleichen Aufbau erwartet. 

Der Aufruf eines DisplayAlerts von Intuition sieht dann wie 
folgt aus: 


* Programm 5.13: Ausgabe eines Alerts mit DisplayAlert 


ExecBase = 

4 


OldOpenLib 

-408 


CloseLib = 

-414 


DisplayAlert = 

-90 


Start: 

move.1 

ExecBase,a6 ; 

Intuition-Library öffnen 


lea 

IntName,al 


jsr 

OldOpenLib(a6) 



move.1 

d0,IntBase 


Loop: 

move.1 

IntBase,a6 



lea 

AlertData,a0 ; 

Alertdaten nach aO 


move.1 

#0,d0 

RECOVERY-ALERT 


move.1 

#55,dl 

Höhe der Box 


jsr 

DisplayAlert(a6) 

; Alert ausgeben 


tst.l 

do ; 

rechte Maustaste (RMT) ? 


beq 

Loop ; 

t 

ja, dann Alert erneut 
ausgeben 


move.1 

ExecBase,a6 
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move.l IntBase,al 

jsr CloseLib(a6) ; Intuition-Library schließen 

rts 


* Datenbereich 


IntName: 

IntBase: 


dc.b "intuition.iibrary",0 

even 

dc.l 0 


AlertData: 


dc.w 

dc.b 

dc.b 

dc.b 


240 

15 

"!!!! ACHTUNG 
-1 


; Alertdaten 
; X-Position 
; Y-Position 
!!!!", 0 

; Zeichenkette 
; (NEXT) 


dc.w 

dc.b 

dc.b 

dc.b 

dc.w 

dc.b 

dc.b 

dc.b 

even 


170 

25 

"Dies ist ein RECOVERY-Display-Alert",0 
-1 
180 
45 

"LMT - Ende RMT - Schleife",0 

0 ; (END) 


Programm 5.13: Ausgabe eines Alerts mit DisplayAlert 


Abgesehen von der DisplayAlert-Funktion, gibt es noch eine 
weitere Möglichkeit, einen Alert auszugeben. Diese soll je¬ 
doch erst im Kapitel zur Exec-Library besprochen werden. 


5.6.2 AutoRequest 

Wenn man nicht direkt die "Holzhammer-Methode" (Alert) be¬ 
nutzen will, kann man auch auf eine einfühlsamere Weise 
seine Informationen ausgeben. Sicherlich ist Ihnen dieser 
Typ der Kommunikation bekannt. Man denke nur an "Please in- 
sert Volume ... in Drive..." oder "Volume . . . has a 
Read/Write Error" oder die etwas härtere Form "You MUST re- 
place ... ! ! !". Diese Art der Meldung heißt SystemRequester 
und kann auch vom Programmierer benutzt werden. Hierzu bie¬ 
tet ihm Intuition die Funktion AutoRequest an. Zwar ist ein 
AutoRequester nicht sehr flexibel, dafür aber einfach zu be¬ 
nutzen . 


AutoRequest = -348 (Intuition-Library) 


«Window ao < Zeiger auf eine Window-Struktur oder 

eine Null 
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< Zeiger auf eine IntuiText-Struktur, die 
die Meldung enthält 

< Zeiger auf eine IntuiText-Struktur für 
das positive Gadget 

< Zeiger auf eine IntuiText-Struktur für 
das negative Gadget 

< Weitere IDCMP-Flags für die positive Ab¬ 
bruchbedingung 

< Weitere IDCMP-Flags für die negative Ab¬ 
bruchbedingung 

< Breite des Requesters 

< Höhe des Requesters 

> Wurde das negative Gadget oder eins der 
angegebenen negativen Flags ausgelöst, 
erhalten wir eine Null zurück. 

Durch die Funktion AutoRequest wird ein 
Requester mit der angegebenen Meldung 
erstellt. Der Requester kann durch eins 
der beiden Gadgets geschlossen werden 
oder durch eine Meldung, die mit dem 
übergebenen IDCMP-Flag übereinstimmt. Je 
nachdem, welche Möglichkeit 

(positiv/negativ) ausgewählt worden ist, 
erhält man einen Rückgabewert zurück. 


Soll Intuition für den Requester ein eigenes Window öffnen, 
so trägt man in aO an Stelle eines Zeiger auf ein Fenster 
eine Null ein. 

Das Register al enthält einen Zeiger auf eine IntuiText- 
Struktur des Body-Textes, welcher z.B. eine Aufforderung 
oder Mitteilung sein könnte. In a2 und a3 stehen zwei wei¬ 
tere Zeiger auf IntuiText-Strukturen, welche die beiden Aus¬ 
wahlmöglichkeiten beschreiben sollen. Meist werden hier 
"Retry" und "Cancel" eingesetzt. 

In dO und dl kann man die IDCMP-Flags (siehe Window-Struk¬ 
tur) übergeben, die für die Auslösung der positiven bzw. ne¬ 
gativen Meldung verantwortlich sein sollen. Auch wenn die 
Werte mit Null initialisiert wurden, wird immer noch auf die 
Gadgets reagiert. 

Die Einstellungen für Breite und Höhe des Requesters können 
in den Datenregistern d2 und d3 abgelegt werden. 

Nachdem die AutoRequest-Funktion aufgerufen worden ist, kann 
man aus dem Wert in dO erkennen, ob die negative oder posi¬ 
tive Auswahlmöglichkeit benutzt wurde, um den Requester zu 
schließen. Ist dO mit Null initialisiert, wurde das Neg-Gad- 
get aktiviert (bzw. eines der angegebenen IDCMP-Flags für 
"Neg" betätigt). Sollte es Probleme beim öffnen des Reque¬ 
sters geben, so wird anstelle dessen ein Alert mit den sel¬ 
ben Parametern dargestellt. 


*BodyText al 

♦PositivText a2 

*NegativText a3 

PositiveFlag dO 

NegativeFlag dl 

Width d2 

Height d3 

Response do 

Erklärung 
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Auch hier wollen wir uns anschließend den Aufruf durch ein 
Programm ansehen: 


* Programm 5.14: Benutzung von AutoRequest 


ExecBase 

= 

OldOpenLib 

= 

CloseLib 

= 

AutoRequest 

= 

Start: move.l 

ExecBase,a6 

lea 

IntName,al 

jsr 

OldOpenLib(a6) 

move.1 

dO,IntBase 

Loop: move.l 

IntBase,a6 

move.1 

#0,a0 

lea 

BodyText,al 

lea 

PosText,a2 

lea 

NegText,a3 

move.1 

#$10000,dO 

move.1 

#$8000,dl 

move.1 

#10,d2 

move.1 

#100,d3 

jsr 

AutoRequest(a6) 

tst.l 

dO 

beq 

Loop 

move.1 

ExecBase,a6 

move.1 

IntBase,al 

jsr 

rts 

CloseLib(a6) 


4 

-408 

-414 

-348 

Intuition-Library öffnen 


kein eigenes Fenster 
Zeiger auf Body-Text 
Zeiger auf Positiv-Text 
Zeiger auf Negativ-Text 
positive IDCMP-Flags 
negative IDCMP-Flags 
Breite des Requesters 
Höhe des Requesters 


positiv oder Negativ ? 

nein, dann Requester neu aufbauen 

Intuition-Libaray schließen 

Programm beenden 


* Datenbereich 


IntName: 

dc.b 

even 

"intuition.l: 

IntBase: 

dc.l 

0 

BodyText: 


dc.b 

even 

0,0,0 


dc.w 

30,60 


dc.l 

0,BodyData,0 

BodyData: 


dc.b 

even 

"Wollen Sie i 

PosText: 


dc.b 

even 

0,0,0 


dc.w 

0,0 


; IntuiText-Struktur für den 
; Body-Text 


"Wollen Sie diesen AutoRequester beenden ???",0 


; IntuiText-Struktur für den 
; Positiv-Text 
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dc.l 

0, PosData,0 


PosData: 

NegText: 

dc.b 

even 

"JA, weg mit 

dem Sch..",0 

; IntuiText-Struktur für den 


dc.b 

even 

dc.w 

dc.l 

0,0,0 

0,0 

0,NegData,0 

; Negativ-Text 

NegData: 


dc.b 

even 

"Auf keinen 

Fall !",0 


Programm 5.14: Benutzung von AutoRequest 


5.6.3 BuildSysRequest/FreeSysRequest 

Wenn man sich nicht mit der Unterscheidung positiv/negativ 
zufrieden gegeben will, gibt es noch die Möglichkeit, die 
Abfrage der Ereignisse selbst in die Hand zu nehmen. Dazu 
brauchen wir die Funktion BuildSysRequest, welche eine Un¬ 
terfunktion von AutoRequest ist. Ihre Parameter sind ähnlich 
den Parametern der AutoRequest-Funktion. Man erhält jedoch 
nach dem Aufruf einen Zeiger auf eine Fenster-Struktur. Mit 
Hilfe dieses Zeigers kann man die Abfrage des Requesters 
selbst bewerkstelligen. 


BuildSysRequest = -360 (Intuition-Library) 


*Window aO < 

♦BodyText al < 

*PositivText a2 < 
♦NegativText a3 < 
IDCMPFlags dO < 
Width d2 < 

Height d3 < 


Zeiger auf eine Window-Struktur oder 
Null 

Zeiger auf eine IntuiText-Struktur 
(Body) 

Zeiger auf eine IntuiText-Struktur (Pos) 
Zeiger auf eine IntuiText-Struktur (Neg) 
IDCMP-Flags des Fensters 
Breite des Requesters 
Höhe des Requesters 


Window 


dO > Adresse der Window-Struktur des geöffne¬ 
ten Fensters. 


Erklärung Durch die Funktion BuildSysRequest wird 

zwar ein Requester erstellt, muß die Ab¬ 
frage der Ereignisse jedoch selbständig 
vom Programm übernommen werden. Dazu er¬ 
halten wir einen Zeiger auf eine Window- 
Struktur, in dem sich der Requester be¬ 
findet. 
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Auch bei BuildSysRequest stellt Intuition eigene Gadgets mit 
einer positiven bzw. negativen Auswahlmöglichkeit zur Verfü¬ 
gung. Diese Gadgets muß man natürlich mit der eigenen 
Routine abfragen. Bei beiden Gadgets wurden die Flags BOOL- 
GADGET, RELVERIFY, REQGADGET und TOGGLESELECT gesetzt. 

Nachdem wir den Requester mittles der BuildSysRequest-Funk- 
tion aufgebaut haben, können wir über den zurückgelieferten 
Zeiger auf die Ereignisse eingehen. Dies geschieht, wie 
bereits im Abschnitt über die Windows besprochen wurde. 

Zur Freigabe des Speichers steht Ihnen die FreeSysRequest- 
Funktion zur Verfügung. Sie erledigt alle nötigen 
Verwaltungsarbeiten, braucht dazu allerdings den Zeiger auf 
das Fenster, in dem der Requester gezeichnet worden ist. 
Diesen Zeiger haben wir beim Aufruf der BuildSysRequest- 
Funktion erhalten. 


FreeSysRequest = -372 (Intuition-Library) 


»Window aO < Zeiger auf Fenster in dem der Requester 

enthalten ist. 

Erklärung Gibt den durch den Requester belegten 

Speicher wieder frei. 


Sollte ein Fehler beim öffnen des Requesters eingetreten 
sein, so wird anstelle des Requesters ein Alert mit densel¬ 
ben Texten ausgegeben. Dann darf natürlich auch die Funktion 
FreeSysRequest nicht benutzt werden! (Das Demonstrationspro¬ 
gramm befindet sich auf der Diskette.) 


5.6.4 "Richtige" Requester 

Als vierte und letzte Möglichkeit, eigene Requester zu er¬ 
stellen, wollen wir uns die Request-Funktion ansehen. Mit 
Hilfe ihrer flexiblen Möglichkeiten kann man eine optimale 
Kommunikation zwischen Benutzer und Programm hersteilen. Na¬ 
türlich benötigt soviel Flexibilität auch einigen Aufwand, 
doch lohnt es sich mit Sicherheit, wenn man sein Programm 
verschönern will. 

Auch für einen Requester gibt es eine Struktur, in die wir 
alle Werte eintragen müsssen. 


Requester-Struktur: 


000 

dc.l 

*rq OlderRequest 

Zeiger auf Requester 

004 

dc.w 

rq LeftEdge 

X-Position 

006 

dc.w 

rq TopEdge 

Y-Position 

008 

dc.w 

rq Width 

Breite 

010 

dc.w 

rq Height 

Höhe 

012 

dc.w 

rq RelLeft 

Maus, relative X-Position 
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014 

dc.w 

rq RelTop 

; Maus, relative Y-Position 

016 

dc.l 

*rq ReqGadget 

; Zeiger auf das erste Gadget 

020 

dc.l 

*rq ReqBorder 

; Zeiger auf einen Border 

024 

dc.l 

*rq ReqText 

; Zeiger auf einen Text 

028 

dc.w 

rq Flags 

; Flags 

030 

dc.b 

rq BackFill 

; Färb.Nr. des Hintergrundes 

031 

dc.b 

rq KludgeFillOO 

; Füllbyte 

032 

dc.l 

*rq ReqLayer 

; Zeiger auf Layer-Struktur 

036 

ds.b 

rq ReqPadl,32 

; Reservierter Bereich 

068 

dc.l 

*rq ImageBMap 

; Zeiger auf eigenen BitMap 

072 

dc.l 

*rq RWindow 

; Zeiger auf das Req.-Fenster 

076 

ds.b 

rq ReqPad2,36 

; Reservierter Bereich 

112 


rqSIZEOF 



*rq_01derRequest 

Zeiger auf eine andere Requester-Struktur (wird von Intui¬ 
tion benutzt) . 

rq_LeftEdge, rq_TopEdge, rqWidth, rq_Height 
Position und Größenangabe des Requesters. 

rqRelLeft, rq RelTop 

Relative Positionierung des Requesters zur aktuellen Maus¬ 
zeigerposition. Das heißt, der Requester wird nicht an den 
Koordinaten rq_LeftEdge, rq_TopEdge ausgegeben, sondern die 
Position errechnet sich aus der Mauszeigerposition und den 
hier angegebenen Offsetwerten. Um diesen Effekt einzuschal¬ 
ten, muß das Flag POINTREL gesetzt sein. 

* rq_ReqGadget 

Zeiger auf das erste Gadget einer Gadgetliste, die in den 
Requester eingebunden werden soll. ACHTUNG : Mindestens eines 
der Gadgets sollte mit dem Activation-Flag ENDGADGET ausge¬ 
rüstet sein. Sonst kann der Requester nur durch die Funktion 
EndRequest geschlossen werden. 

* rq_ReqBorder 

Zeiger auf eine initialisierte Border-Struktur, die im Re¬ 
quester gezeichnet werden soll. 

*rq ReqText 

Zeiger auf eine initialisierte IntuiText-Struktur, die im 
Requester ausgegeben werden soll. 

rq_Flags 

Wie bei der relativen Positionierung gibt es auch hier wie¬ 
der die Möglichkeit, mit Flags das Aussehen oder auch die 
Verwendung von Einträgen festzulegen. 


Requester-Flag Wert Bedeutung 


POINTREL 

$0001 

Position ist relativ zur Maus 

PREDRAWN 

$0002 

Eigene BitMap einbinden 

NOISYREQ 

$0004 


REQOFFWINDOW 

$1000 

Requester außerhalb des Fensters 

REQACTIVE 

$2000 

Requester aktiviert 


239 




Kapitel 5 


SYSREQUEST $4000 Requester ist ein System-Requester 

DEFERREFRESH $8000 Refreshmodus wird gestoppt 


POINTREL 

PREDRAWN 

REQOFFWINDOW 

REQACTIVE 

SYSREQUEST 

DEFERREFRESH 


Requester relativ zur aktuellen 
Mauszeigerposition anzeigen. Dabei wird 
auf die Offsetwerte rq_RelLeft und 
rq_RelTop zurückgegriffen. 

Anstelle der angegebenen IntuiText-, 
Border- und der in den Gadget-Strukturen 
angegebene Grafik-Strukturen wird die 
angegebene BitMap verwendet. 

Der Requester befindet sich außerhalb des ange¬ 
gebenen Fensters. 

Der Requester ist im Augenblick aktiviert. 

Bei dem Requester handelt es sich um einen Sy¬ 
stem-Requester (AutoRequest z.B.). 

Keine Erneuerung. 


rqBackFill 

Farbtabellennummer der Farbe, in der der Hintergrund des Re- 
questers eingefärbt werden soll. 


* rq_ReqLayer 

Zeiger auf die Layer-Struktur, die für den Requester zustän¬ 
dig ist. 

rq_ReqPadl 

Das 32 Byte große Array ReqPadl wird von Intuition benutzt 
und hat interne Bedeutung. 


*rq_ImageBMap 

Zeiger auf eine initialisierte BitMap-Struktur, die gezeich¬ 
net werden soll. 


*rq_RWindow 

Zeiger auf das Fenster, in dem der Requester erstellt wurde. 
rq_ReqPad2 

Wie schon der Eintrag ReqPadl, sind auch diese Daten nur für 
Intuition angelegt. 

Bevor wir den Requester auf rufen, erläutern wir noch die 
Funktion namens InitRequest. Durch sie wird die gesamte 
Requester-Struktur, auf die man einen Zeiger übergeben hat, 
automatisch mit Nullen gefüllt. Nun müßte man nachträglich 
vom Programm aus die Parameter in die Struktur schreiben. 
Diese Arbeit können wir uns sparen. Wir müssen nur darauf 
achten, daß alle Einträge, die keinen von uns bestimmten 
Wert enthalten, mit Null initialisiert sind. Dann können wir 
auf die InitRequest-Funktion verzichten und die Struktur 
direkt als Daten anlegen. 

Trotzdem wollen wir Sie kurz aufführen. 
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InitRequest 

= 

-138 (Intuition-Library) 


*Requester aO < Zeiger auf die Requester-Struktur, die 
gelöscht werden soll. 

Erklärung Durch die Funktion InitRequest werden 

alle Einträge der angegebenen Request- 
Struktur auf Null gesetzt. Nach dem Auf¬ 
ruf müssen dann alle Werte in die Struk¬ 
tur eingesetzt werden. 


Um den Requester zu erstellen, benötigen wir die Request- 
Funktion . 


Request 


-240 (Intuition-Library) 


♦Requester 

♦Window 


aO < Zeiger auf eine Requester-Struktur 
al < Zeiger auf eine Window-Struktur, in der 
der Requester erstellt und über dessen 
Message-Port die Kommunikation laufen 
soll. 


Success 


dO > Ist ein Fehler aufgetreten, erhält man 
eine Null zurück. 


Erkärung Durch die Request-Funktion wird ein Re¬ 

quester mit der angegebenen Struktur im 
angegebenen Fenster erstellt. 


Wie man sieht, wird ein Zeiger auf das Fenster, in dem der 
Requester erstellt werden soll, benötigt. Über dessen Messa- 
gePort läuft dann auch die Kommunikation mit unserem Reque¬ 
ster ab. Dazu sollte man sich jedoch eine spezielle Nach¬ 
richtenroutine für Requester schreiben. 

Um den Requester wieder zu schließen, kennen wir bisher nur 
eine Möglichkeit: Ein Gadget mit dem ENDGADGET-Flag muß 
durch den Benutzer betätigt werden. Für den Programmierer 
bietet sich die Funktion EndRequest an. 


EndRequest = -120 (Intuition-Library) 


♦Requester aO < Zeiger auf eine Requester-Struktur 

♦Window al < Zeiger auf die Window-Struktur, in dem 

der Requester erstellt wurde. 

Erklärung Durch die Funktion EndRequest wird der 

Requester im angegebenen Fenster ge¬ 
löscht. Die Nachrichten, die über den 

"Fensterkanal" ankommen, beziehen sich 
dann wieder auf das Fenster. 
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Mit dieser Funktion kann auch der Programmierer den Reque- 
ster nach Belieben schließen. 


5.6.5 DM-Requester 

Durch die Request-Funktion kann man zwar einen Requester 
aufrufen, wobei jedoch der Zeitpunkt, an dem er gezeichnet 
wird, festgelegt ist. Eine flexiblere Art und Weise, einen 
Requester zu benutzen, bietet die SetDMRequest-Funktion. 
Durch sie wird der Requester an ein bestimmtes Fenster 
gebunden und immer dann aufgerufen, wenn ein Doubleclick mit 
der rechten Maustaste (Menütaste) ausgeführt worden ist. 

Als Doubleclick bezeichnet man das zweimalige Betätigen 
einer Maustaste in dem von Preferences angegebenen Zeitraum. 
Deshalb heißt diese Funktion auch SetDoubleMenuRequest. 

Ruft nun der Benutzer den installierten Requester auf, so 
sendet Intuition an unseren MessagePort eine Nachricht. Dies 
geschieht natürlich nur dann, wenn wir die Nachrichten im 
Eintrag IDCMP-Flags des Fensters "eingeschaltet" haben. 

Gehen wir davon aus, daß dies erfolgt ist, so erhalten wir 
zunächst die Meldung REQVERIFY. Sie soll uns mitteilen, daß 
ein Requester von Intuition erstellt werden soll. Der 
Requester wird jedoch erst gebildet, wenn wir die Nachricht 
mittels ReplyMsg bestätigt haben. Danach bekommen wir die 
Meldung REQSE, was soviel heißt wie: Requester erstellt. 
Spätestens bei diesem Flag sollten wir in die gesonderte 
Nachrichtenroutine für Requester verzweigen! 

Nun beziehen sich alle Nachrichten, die wir durch den Messa¬ 
gePort unseres Fensters erhalten, auf den Requester. Wurde 
das ENDGADGET betätigt, beendet Intuition den Requester und 
sendet uns die Nachricht REQCLEAR. Jetzt können wir mit der 
"normalen" Nachrichtenüberwachung weitermachen. 

Jetzt aber endlich zu der SetDMRequest-Funktion! 


SetDMRequest = -258 (Intuition-Library) 


♦Window 

aO 

< 

Zeiger auf das Fenster, in dem der Re¬ 
quester erscheinen und über dessen Mes¬ 
sagePort nachher die Kommunikation ab¬ 
laufen soll. 

♦Requester 

al 

< 

Zeiger auf eine initialisierte Reque- 
ster-Struktur. 

Success 

dO 

> 

Falls schon ein anderer Requester als 
DMRequester definiert ist, kommt in dO 
eine 0 zurück, ansonsten eine -1. 

Erklärung 



Die Funktion SetDMRequest setzt einen 
Double-Menu-Requester, der durch einen 
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Doubleclick der rechten Maustaste ausge¬ 
löst werden kann. 

Um den "schlafenden" Requester zu löschen, gibt es auch eine 
Funktion, die das für uns übernimmt. Sie heißt ClearDMRe- 
quest und benötigt lediglich einen Zeiger auf das Fenster, 
dessen Requester-Liste gelöscht werden soll. 


ClearDMRequest = -48 (Intuition-Library) 


*Window aO < Zeiger auf eine Window-Struktur. 

Erklärung Durch ClearDMRequest wird der gesetzte 

DMRequester wieder gelöscht. 

Nun zum Demoprogramm: 


»Programm 5.17: Anwendung von DM-Requestern 


ExecBase = 

4 

OldOpenLib 

-408 

CloseLib = 

-414 

ReplyMsg = 

-378 

WaitPort = 

-384 

GetMsg = 

-372 

OpenWindow 

-204 

CloseWindow = 

-72 

SetDMRequest = 

-258 

ClearDMRequest 

= 

Start: move.l 

ExecBase,a6 

lea 

IntName,al 

jsr 

OldOpenLib(a6) 

move.1 

do,IntBase 

beq 

IntError 

move.1 

IntBase,a6 

lea 

WindowArgs,aO 

jsr 

OpenWindow(a6) 

move.1 

dO,WindowHD 

beq 

WinError 

move.1 

WindowHD,aO 

move.1 

86(aO),UPort 

move.1 

IntBase,a6 

lea 

Requester,al 

move.1 

WindowHD,aO 

jsr 

SetDMRequest(a6) 
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MessageLoop: 



move.1 

ExecBase,a6 


move.1 

UPort,aO 


jsr 

GetMsg(a6) 


move.1 

dO,Message 


bne 

MessageBranch 


move.1 

UPort,aO 


jsr 

WaitPort(a6) 


bra 

MessageLoop 

Exit: 

move.1 

IntBase,a6 


move.1 

WindowHD,aO 


jsr 

ClearDMRequest(a6) 


move.1 

IntBase,a6 


move.1 

WindowHD,aO 


jsr 

CloseWindow(a6) 

WinError: 

move.1 

ExecBase,a6 


move.1 

IntBase,al 


jsr 

CloseLib(a6) 

IntError: 

rts 


MessageBranch 

move.1 

Message,aO 


move.1 

20(aO),Class 


move.1 

28(a0),a0 


move.w 

38(a0),GadID 


cmp. 1 

#$800,Class 


bne 

NoReq 


bset 

#1,Flag 

NoReq: 

move.1 

Message,al 


jsr 

ReplyMsg(a6) 


btst 

#1,Flag 


bne 

ReqMessage 


cmp.l 

#$200,dass 


beq 

Exit 


bra 

MessageLoop 

ReqMessage: 

cmp.l 

#$1000,Class 


bne 

OhNo 


bclr 

#1,Flag 

OhNo: 

bra 

MessageLoop 
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* Datenbereich 


GadID: 

dc.w 

Class: 

de. 1 

Flag: 

dc.w 

IntBase: 

de. 1 

WindowHD: 

dc.l 

Message: 

dc.l 

UPort: 

dc.l 

IntName: 

dc.b 

even 

WinName: 

dc.b 

even 


"intuition.library",0 
"Window",0 


WindowArgs: 

dc.w 0,0,640,256 

dc.b 1,3 

de.1 $lAOO,$0100F,0,0,WinName,0,0 

dc.w 100,50,200,100,1 


Requester: 

dc.l 

dc.w 

dc.w 

rq Width: 

dc.w 

rq Height: 

dc.w 

rq RelLeft 

dc.w 

rq Re 1 Top 

dc.w 

rq ReqGadget: 

dc.l 

rq ReqBorder: 

dc.l 

rq ReqText: 

dc.l 

rq Flags: 

dc.w 

dc.b 

even 

dc.l 

deb.b 

dc.l 

dc.l 

deb.b 


* Gadget 

EndGadget: dc.l 

dc.w 
dc.l 
dc.w 
dc.l 

* intuiText-Struktur 

ITextO: dc.b 

even 
dc.w 
dc.l 


o 

o 

0 

38*8 

54 

-275 

-38 

EndGadget 

BorderO 

ITextO 

1 

0 

0 

32,0 

0 

0 

36,0 


0 

260,28,32,20,4,5,1 

Image0,0,0,0,0 

1 

0 


1,3,0 

21,11 

0,ITextDataO,ITextl 


ITextDataO: 
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dc.b 

even 

"Dies ist ein DM-Requester !",0 

ITextl: 

dc.b 

even 

2,3,0 


dc.w 

20,10 


dc.l 

0,lTextData0,0 

* Border-Data 

BorderO: 

dc.w 

0,0 


dc.b 

2,0,0,3 


dc.l 

BorderDataO,Border1 

BorderDataO: 


dc.w 

0,52,0,0,299,0 

Borderl: 

dc.w 

0,0 


dc.b 

1,0,0,3 


dc.l 

BorderDatal,0 

BorderDatal: 


dc.w 

299,1,299,52,2,52 

* Image-Data 

ImageO: 

dc.w 

0,0,32,20,2 


dc.l 

ImageDataO 


dc.b 

%11,0 


dc.l 

0 


Section 

"",Data C 

ImageDataO: 


dc.l 

$00000000,$00000001,S1FFFFFF9,$10000001 


dc.l 

$10000001,$10000001,$10000001,S101FFC01 


dc.l 

$101FFC01,$101FFC01,$101FFC01,$101FFC01 


dc.l 

$101FFC01,$103FFC01,$10000001,$10000001 


dc.l 

$10000001,$10000001,$00000001,$FFFFFFFF 


dc.l 

SFFFFFFFF,$80000000,$80000008,$80000008 


dc.l 

$80000008,$80000008,$803FFC08,$803FF808 


dc.l 

S803FF808,$803FF808,$803FF808,$803FF808 


dc.l 

$80200008,$80000008,$80000008,$80000008 


dc.l 

$80000008,$8FFFFFF8,$80000000,$80000000 


Programm 5.17: Anwendung von DM-Reguestern 


5.7 Auswertung sonstiger Nachrichten 

Nachdem wir fast am Ende dieses Kapitels angekommen sind, 
wollen wir uns nochmals der intuiMessage-Struktur zuwenden 
und auf spezielle Arten von Nachrichten, die wir durch sie 
empfangen können, eingehen. 
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5.7.1 RAWKEY/VANILLAKEY 

Wie wir schon wissen, müssen wir, wenn wir über Tastaturein¬ 
gabe in unser Fenster benachrichtigt werden wollen, eins der 
beiden IDCMP-Flags VANILLAKEY oder RAWKEY setzen. Bei VANIL- 
LAKEY können wir aus der IntuiMessage-Struktur den schon be¬ 
handelten Tastencode auslesen. Das heißt, wir erhalten das 
Zeichen, welches der gedrückten Taste durch eine Tastaturta¬ 
belle zugeordnet worden ist. 

Bei RAWKEY erhalten wir zwar auch einen Wert, es handelt 
sich hierbei jedoch um den unbehandelten, also rohen Tasta¬ 
turcode (RAW-Keycode). 


ESC 

$45 


Fl 

F2 

F3 

F4 

F5 

$50 

$52 

$52 

$53 

$54 


F6 

F7 

F8 

F9 

F10 

$55 

$56 

$57 

$58 

$59 


1 

1 ! 

2 8 

3 # 

4 $ 

5 % 

6 “ 

7 & 

8 * 

9 ( 

0 ) 

_ 

= + 

\ 

BACKS 

$00 

$01 

$02 

$03 

$04 

$05 

$06 

$07 

$08 

$09 

$0A 

$0B 

$0C 

$0D 

$41 


TAB 


$42 


CTRL 

$63 


Q q 

$10 


CAPSL 

$62 


W W 
$11 


A a 
$20 


E e 
$12 


S s 
$21 


R r 
$13 


D d 
$22 


T t 
$14 


F f 
$23 


Y y 
$15 


G g 
$24 


ü U 
$16 


H h 
$25 


I i 
$17 


J j 
$26 


0 O 
$18 


K k 
$27 


P p 
$19 


L 1 
$28 


[ { 

$1A 


$29 


] } 

$1B 


$2A 


RETORN 


$2B 


$44 


-1_ 

SHIFT 

_1_ 

I 

1 

Z Z 

_1- 

X X 

_1_ 

C c 

_1_ 

V V 

_1_ 

B b 

_1_ 

N n 

. i 

M m 

Hi 
, < 

_1_ 

. > 

1 

/ ? 


_1_ 

SHIFT 

$60 

1 1 

$30 

$31 

“1- 

$32 

$33 

$34 

$35 

$36 

$37 

$38 

$39 

$3A 

— 


$61 

--- 


ALT 

$64 


A 

$66 


SPACE 

$40 


A 

$67 


ALT 

$65 


DEL 

HELP 

$46 

$5F 


{ [ 

} ] 

/ 

* 

$ 1A 

$1B 

$3A 

$88 

7 

8 

9 

_ 

$3D 

$3E 

$3F 

$4A 

4 

5 

6 

+ 

$2D 

$2E 

$2F 

$0C 

1 

2 

3 

EN 

$ ID 

$1E 

$1F 

TER 

0 


DEL 

$43 

$0F 

$3C 




UP 

$4C 


LEFT 

$4F 

DOWN 

$4D 

RIGTH 

$4E 


Bild 5.12: Tastaturbelegung mit RAW-Codes 
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Jede Taste hat einen sogenannten RAW-Code und kann so ein¬ 
zeln abgefragt werden. Neben dem Wert der gedrückten Taste, 
der übrigens im Eintrag Code der IntuiMessage-Struktur 
steht, bekommen wir auch noch mitgeteilt, ob eine Qualifier- 
Taste gedrückt worden ist. Unter Qualifier-Tasten versteht 
man z.B. die Shift- oder Control-Taste. Wir können die Flags 
der Tasten im Eintrag Qualifier der IntuiMessage-Struktur 
überprüfen. 

Folgende Qualifier-Flags stehen zur Verfügung: 


IEQUALIFIER 

LSHIFT 

= 

$0001 

IEQUALIFIER" 

"rshift 

= 

$0002 

IEQUALIFIER' 

"capslock 

- 

$0004 

IEQUALIFIER" 

CONTROL 

- 

$0008 

IEQUALIFIER" 

"LALT 

= 

$0010 

IEQUALIFIER" 

RALT 

= 

$0020 

IEQUALIFIER" 

LCOMMAND 

= 

$0040 

IEQUALIFIER" 

RCOMMAND 

- 

$0080 

IEQUALIFIER" 

"NUMERICPAD 

= 

$0100 

IEQUALIFIER" 

REPEAT 

= 

$0200 

IEQUALIFIER" 

INTERRUPT 

= 

$0400 

IEQUALIFIER" 

MULTIBROADCAST 

- 

$0800 

IEQUALIFIER" 

MIDBUTTON 

- 

$1000 

IEQUALIFIER" 

RBUTTON 

= 

$2000 

IEQUALIFIER" 

LEFTBUTTON 

= 

$4000 

IEQUALIFIER" 

RELATIVEMOUSE 

= 

$8000 


5.7.2 MOUSEBUTTONS/MOUSEMOVE 

Sicher erinnern Sie sich auch noch an das IDCMP-Flag MOUSE- 
BUTTONS. Es gab Intuition die Erlaubnis, eine Nachricht zu 
senden, sobald eine Maustaste gedrückt worden ist. Dabei ist 
jedoch noch nicht zu erkennen, welche Maustaste betätigt 
worden ist. Diese Information können wir auch aus der Intui¬ 
Message-Struktur auslesen, dazu müssen wir nur den Code-Ein¬ 
trag auf folgende Werte überprüfen: 


Achtung!: 


SELECTDOWN = 

$0068 

; LMT 

gedrückt 

SELECTUP 

$00E8 

; LMT 

losgelassen 

MENUDOWN 

$0069 

; RMT 

gedrückt 

MENUUP 

$00E9 

; RMT 

losgelassen 

! : Man erhält 

für die 

rechte 

Maustaste i 


Meldung, wenn das Flag RMBTRAP gesetzt worden 
ist. 


Die Mausbewegung ist noch einfacher. Man wertet einfach die 
Einträge MouseX und MouseY der IntuiMessage-Struktur aus, 
wenn man eine Meldung des Typs MOUSEMOVE erhalten hat. 
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5.8 Sonstige Funktionen 

Bevor wir die Struktur der IntuitionBase besprechen, folgen 
nun alle Library-Funktionen, die noch nicht besprochen 
wurden. 


AlohaWorkbench = -402 (Intuition-Library) 


WBPort aO < Zeiger auf den WB-MessagePort. 

Erklärung Nach Ausführen dieser Funktion meldet 

Intuition an den angegebenen MessagePort 
eine Meldung vom Typ WBMESSAGE, wenn die 
Workbench vom eigenen oder anderen Pro¬ 
grammen geschlossen werden soll, damit 
man Gelegenheit erhält, Fenster-Aufräum¬ 
arbeiten zu erledigen. 


CurrentTime = -84 (Intuition-Library) 


‘Seconds aO < Speicher für Sekundenwert 

*Micros al < Speicher für Mikrosekundenwert 


Erklärung Durch die Funktion CurrentTime wird die 

aktuelle Systemzeit in die angegebenen 
Variablen kopiert. 


Doubleclick = -102 (Intuition-Library) 


SSeconds 

do 

< 

Sekundenwert der Startzeit 

SMicros 

dl 

< 

Mikrosekundenwert der Startzeit 

CSeconds 

d2 

< 

Sekundenwert der aktuellen Zeit 

CMicros 

d3 

< 

Mikrosekundenwert der aktuellen Zeit 

isdouble 

do 

> 

-1, falls das Zeitintervall ein Dou¬ 
bleclick war 

Erklärung 



Prüft, ob das angegebene Zeitintervall 
Startzeit - aktuelle Zeit kurz genug 


war, um laut den Preferences-Einstellun¬ 
gen als Doubleclick zu gelten. 


GetDefPrefs = -126 (Intuition-Library) 


♦Preferences aO < Zeiger auf Speicherbereich, in dem die 
Preferencesdaten abgelegt werden sollen 
(nähere Beschreibung finden sie im An¬ 
hang ). 
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Size 

dO 

< Größe des Puffers 

Prefs 

dO 

> Zeiger auf den Puffer, in dem die Daten 
abgelegt worden sind. Hier sollte der in 
aO gespeicherte Zeiger übergeben werden. 

Erklärung 


Durch die Funktion GetDefPrefs 
(GetDefaultPreferences) werden die Stan¬ 
dardvoreinstellungen ausgelesen und in 
den angegebenen Puffer abgelegt. 


GetPrefs 


-132 (Intuition-Library) 


♦Preferences 

aO 

< Zeiger auf Speicherbereich in dem die 
Preferencesdaten abgelegt werden sollen 
(nähere Beschreibung finden sie im An¬ 
hang) . 

Size 

dO 

< Größe des Puffers 

Prefs 

dO 

> Zeiger auf den Puffer, in dem die Daten 
abgelegt worden sind. Hier sollte der in 
aO übergebene Zeiger übergeben werden. 

Erklärung 


Durch die Funktion GetPrefs werden die 
aktuellen Voreinstellungen ausgelesen 
und in den angegebenen Puffer abgelegt. 


ViewAddress = -294 (Intuition-Library) 


View dO > Nachdem die Funktion aufgerufen wurde, 

erhält man in dO einen Zeiger auf die 
View-Struktur von Intuition wieder. 

Erklärung Durch die Funktion ViewAddress erhält 

man die Adresse der Intuition-View- 
Struktur (näheres siehe Graphics-Kapi- 
tel). 


ViewPortAddress = -300 (Intuition-Library) 


♦Window aO < Zeiger auf ein Fenster 

View dO < Zeiger auf den ViewPort, der für das 

Fenster verantwortlich ist. 

Erklärung Mit der Funktion ViewPortAddress kann 

man die Adresse der ViewPort-Struktur 
des angegebenen Fensters . ermitteln 
(näheres siehe Graphics-Kapitel). 
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SetPrefs 

= 

-324 (Intuition-Library) 


»Prefbuffer 

Size 

Flags 


aO < Zeiger auf Puffer, aus dem die Preferen¬ 
ces-Daten geholt werden sollen 
do < Anzahl zu kopierender Prefs-Bytes 
dl < -1, falls Window-Flag NEWPREFS gesetzt 

werden soll 


Erklärung Setzt die System-Preferences neu, indem 

ihre Daten aus einem Puffer (Prefbuffer) 
in den System-Prefs-Bereich kopiert wer¬ 
den. Wahlweise kann danach an das Fen¬ 
ster die Message NEWPREFS geschickt wer¬ 
den . 


LocklBase 


-414 (Intuition-Library) 


lock dO > Locknummer für UnlocklBase 

Erklärung Verhindert Scheibzugriffe auf die Intui- 

tion-Base-Struktur durch die Int-Library 
(Struktur siehe weiter unten). Dadurch 
wird ein Umschalten von Screens, Windows 
usw. und auch die Bewegung der Maus ver¬ 
hindert . 


UnLocklBase = -420 (Intuition-Library) 


iblock aO > Von LocklBase erhaltene Lock-Adresse 

Erklärung Hebt die Intuition-Base-Sperre wieder 

auf. Achtung: Eine falsche Lock-Adresse 
führt zum Absturz! 


5.9 Die Basis-Struktur der Intuition-Library 

Bisher haben wir die Basisadresse der Intuition-Library im¬ 
mer dazu benutzt, um mit negativen Offsets auf ihre Funktio¬ 
nen zuzugreifen. Doch die intuitionBase-Struktur besteht 
nicht nur aus der Sprungtabelle, sondern hat auch noch einen 
Datenteil, der mit positiven Offsets angesprochen werden 
kann. Man findet hier ganz interessante Einträge. Deshalb 
sehen wir uns zum Abschluß auch diese Struktur an. 
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IntuitionBase-Struktur: 

000 dc.l *ln_Succ 

004 dc.l *ln_Pred 

008 dc.b lnJType 

009 dc.b ln_Pri 

010 dc.l *ln_Name 

014 dc.w lib_Flags 

016 dc.w lib_NegSize 

018 dc.w lib_PosSize 

020 dc.w lib_Version 

022 dc.w libRevison 

024 dc.l *lib_idstring 

028 dc.l lib_Sum 

032 dc.w lib_OpenCnt 

034 dc.l *ib_ViewPort 

038 dc.l *ib_LOFCprList 

042 dc.l *ib_SHFCprList 

046 dc.w ib_DyOffset 

048 dc.w ib_DxOffset 

050 dc.w ib_Modes 

052 dc.l *ib_ActiveWindow 

056 dc.l *ib_ActiveScreen 

060 dc.l *ib_FirstScreen 

064 dc.l ib_Flags 

068 dc.w ib_MouseY 

070 dc.w ib_MouseX 

072 dc.l ib_Seconds 

076 dc.l ib_Micros 

; Der Datenteil der Intuition-Library ist zwar an dieser 
; Stelle noch nicht beendet, doch sind die Werte, die jetzt 
; folgen, nicht festgelegt. 

*ln_Succ - libOpenCnt 

Die ersten dreizehn Einträge sind für die Verwaltung der 
Library reserviert. Ihre Bedeutungen werden erst im Exec- 
Kapitel beschrieben. 

*ibViewPort 

Zeiger auf die erste ViewPort-Struktur des Intuition-View. 
*ib_LOFCprList 

Zeiger auf Copperliste für die Auflösungen interlaced und 
nicht-interlaced. 

*ib_SHFCprList 

Zeiger auf Copperliste für interlaced-Darstellung. 
ibDyOffset, ibDxOffset 

Positionierung des Intuition-View. Es sind auch negative 
Werte erlaubt (siehe auch Graphics-Kapitel, Programm 
"BenchQuake"). 


Node 


Library-Struktur 


Erster Viewport 
Haupt-Copperliste 
Interlace-Zweitcopperliste 
y-Offset des Intui-View 
x-Offset des Intui-View 
Erlaubte Viewmodes 
aktives Fenster 
aktiver Screen 
erster Screen 

Y-Mausposition 

X-Mausposition 

Systemzeit 


252 





Die Intuition-Library 


ib_Modes 

Erlaubte ViewModes. 

*ib_ActiveWindow 

Zeiger auf Fenster-Struktur des aktiven Fensters. 

*ib_ActiveScreen 

Zeiger auf Screen-Struktur des aktiven Screens. 
*ib_FirstScreen 

Zeiger auf erste Screen-Struktur. 
ib_Flags 

Intuition-interne Flags. 

ib_MouseY, ib_MouseX 

Position des Mauszeigers. 

ibSeconds, ib_Micros 

Systemzeit im Intuition-Format (Sekunden/Mikrosekunden). 
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Die Diskfont-Library ist für die Verwaltung der Zeichensätze 
zuständig, die nicht im ROM, sondern auf der Diskette 
untergebracht sind. Da beim Amiga nur der System-Font 
("Topaz") im ROM steht, wird man um die Benutzung der Disk- 
font-Library wohl kaum herumkommen. 

Da es langweilig wäre, bei dem großen Angebot an Zei¬ 
chensätze für den Amiga nur den Topaz-Font zu benutzen {die 
Designer der übrigen Fonts haben sich schließlich auch Ar¬ 
beit gemacht), wollen wir in diesem Kapitel lernen, wie man 
Zeichensätze von der Diskette einlädt, in eigenen Programmen 
benutzt und wieder aus dem Speicher entfernt. Außerdem 
werden wir erfahren, wie man sich Informationen über die 
verfügbaren Fonts verschafft. Anschließend werden wir uns 
etwas Hintergrundwissen über den Aufbau einer Font-Datei 
aneignen. 

Die Diskfont-Library ist nicht im Kickstart-ROM, sondern auf 
der Diskette untergebracht, weshalb beim ersten Öffnen die 
Startdiskette verlangt wird. Die Lib muß aber nur einmal 
eingeladen werden und bleibt dann bis zum nächsten Reset im 
RAM. 


6.1 Grundwissen über Fonts 

Alle Disk-Zeichensätze sind im FONTS-Verzeichnis unterge¬ 
bracht, in dem sie von allen Diskfont-Routinen auch gesucht 
werden. Hinweis: Gesucht wird im logischen Gerät FONTS:, 
welches dem FONTS-Verzeichnis der Startdiskette zugewiesen 
ist. Sollen Zeichensätze von einer anderen Diskette geladen 
werden, so muß die FONTS:-Zuweisung mit dem CLI-Befehl 
ASSIGN geändert werden. 

Für jeden Font wird im FONTS-Verzeichnis ein Verzeichnis mit 
dem Namen des Fonts (z.B. "garnet") und eine 
Verwaltungsdatei, die das Anhängsel ".font" bekommt (z.B. 
"garnet.font"), angelegt. 

Das Amiga-System sieht die Möglichkeit vor, ein Font in 
mehreren Größen zu verwenden. Als Kriterium für die 
Größeneinteilung wird immer die Höhe, also die 
Vertikalgröße, benutzt. Den Garnet-Font z.B. gibt es in zwei 
Größen: 16 und 9 (also 16 und 9 Punkte hoch). Die Font-Daten 
für die verschiedenen Größen werden jeweils in einer eigenen 
Datei abgelegt. Diese Dateien werden in den Font- 
Unterverzeichnisse abgespeichert und bekommen als Namen die 
Fontgröße. Im Unterverzeichnis "garnet" existieren also zwei 
Dateien mit den Namen "16" und "9". 

In den ".font"-Dateien sind nun lediglich Informationen über 
die verfügbaren Größen eines Fonts sowie über diverse andere 
Eigenheiten abgelegt. Die Zeichendaten selber stehen in den 
Unterverzeichnis-Dateien. Das dient dazu, daß zum Einlesen 
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aller verfügbaren Fonts nicht sämtliche Unterverzeichnisse 
und die darin enthaltenen Dateien durchgelesen werden müs¬ 
sen, sondern nur die kleinen Info-Dateien im Fonts-Hauptver¬ 
zeichnis . 


6.2 Das Einladen von Fonts 

Zum Laden eines Fonts von der Diskette dient die Routine 
OpenDiskFont: 

OpenDiskFont = -30 (Diskfont-Library) 


*textAttr 

a0 

< Zeiger auf TextAttr-Struktur, die 
gesuchten Zeichensatz beschreibt 

den 

*font 

do 

> Zeiger auf TextFont-Struktur des 
ladenen Font oder 0 bei Fehler 

ge- 

Erklärung 


Lädt den in der TextAttr-Struktur defi¬ 
nierten Zeichensatz von Diskette 

Wenn der Font 
Zeiger auf eine 

geladen werden konnte, haben wir in do 
TextFont-Struktur. Diesen Zeiger müssen 

den 

wir 


bei allen weiteren Operationen mit dem Zeichensatz angeben. 
Zum öffnen eines Fonts, der im ROM steht oder schon einmal 
von Diskette geladen wurde, gibt es noch eine andere Rou¬ 
tine. Diese steht allerdings in der Graphics-Library und 
kann nicht auf die Diskette zugreifen. Ihr Name ist Open- 
Font. Ihre Parameter und Funktionsweise entsprechen bis auf 
die Einschränkung 'kein Disk-Zugriff' exakt der von Open¬ 
DiskFont. Vorteile bietet die Benutzung von OpenFont nicht, 
da auch OpenDiskFont den Zeichensatz nur einmal wirklich 
einlädt und allen weiteren Programmen, die ihn öffnen wol¬ 
len, nur noch den TextFont-Zeiger übermittelt. 

OpenDiskFont erwartet einen Zeiger auf eine neue Struktur, 
nämlich TextAttr. TextAttr steht für "Text Attributes", die 
Struktur beschreibt also die Eigenschaften des gewünschten 
Zeichensatzes. Sie sieht folgendermaßen aus: 

Die TextAttr-Struktur: 


00 

dc.l 

*ta Name 

; Zeiger auf Font-Name 

04 

dc.w 

ta YSize 

; Vertikale Größe des Fonts 

06 

dc.b 

ta Style 

; Stil des Fonts (siehe unten) 

07 

dc.b 

ta Flags 

; Art des Fonts 

08 


ta SIZEOF 
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*ta_Name 

Ein Zeiger auf den Namensstring des Zeichensatzes, der auch 
die Endung ".font" enthält und wie fast alle Namenstexte mit 
einem Nullbyte abgeschlossen sein muß. 

ta_YSize 

Die Höhe des gesuchten Fonts. Falls es den Font in dieser 
Höhe nicht gibt, wird die Höhe benutzt, die der gewünschten 
am nächsten kommt. 

ta_Style 

Bit-Maske für den Schreibstil des Fonts. Folgende Werte, die 
bei Bedarf natürlich auch kombiniert (aufaddiert) werden 
können, sind möglich: 


Schreibstil 

Wert 


Bedeutung 

FSF NORMAL 

0 


Kein besonderer Stil 

FSF UNDERLINED 

1 


Unterstrichen 

FSF BOLD 

2 


Fettdruck 

FSF ITALIC 

4 


Kursiv-(Schräg-)Druck 

FSF EXTENDED 

8 


Doppelte Breite (bei normalen Fonts nicht 
möglich) 

ta Flags 

Bit-Maske für diverse 
die equ-Tabelle: 

andere Zeichensatz-Eigenarten. Hier 

Font-Flag 

Wert 


Bedeutung 

FPF ROMFONT 

1 


Font ist im ROM 

FPF DISKFONT 

2 


Font wurde von Disk geladen 

FPF REVPATH 

4 


Ausrichtung von rechts nach links 

FPF TALLDOT 

8 


Hires-Noninterlaced-Font 

FPF WIDEDOT 

16 


Lores-Interlaces-Font 

FPF PROPORTIONAL 

32 


Proportional-Font 

FPF DESIGNED 

64 


Font ist gezeichnet, nicht berechnet 

FPF_REMOVED 

128 


Font wurde per Lib-Routine entfernt 

FPF ROMFONT 


Der 

Zeichensatz befindet sich im ROM (gilt z.Z. 



nur 

für den Topaz-Font). 

FPF DISKFONT 


Der 

Zeichensatz ist auf Diskette zu finden. 

FPF REVPATH 


Die 

Zeichen sollen nicht von links nach rechts, 



sondern von rechts nach links ausgegeben werden. 

FPFTALLDOT 


Der 

Zeichensatz ist für eine Bildschirmauflösung 



von 640x256 Punkten (Hires Non-Interlaced) ge¬ 
dacht . 

FPF WIDEDOT 


Der 

Zeichensatz ist für eine Bildschirmauflösung 



von 

320x512 Punkten (Lores Interlaced) gedacht. 

FPF PROPORTIONAL 


Die 

Zeichen werden auf dem Bildschirm proportio- 


nal ausgegeben, d.h. sie nehmen nur so viel 
Platz ein, wie sie wirklich brauchen. Bei nicht- 
proportional-Zeichensätzen nehmen alle Zeichen 
gleich viel Platz ein. 
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FPFDESIGNED Die Zeichensatzgröße wurde gesondert entworfen 

und nicht vom System berechnet. Eine solche Be¬ 
rechnung ist erst ab der Version 2.0 des Be¬ 
triebssystems möglich. 

FPF_REMOVED Der Zeichensatz wurde mit einer Graphics-Routine 

aus der Systemliste entfernt. 


Der Eintrag ta_Flags ist nur vollständig von Interesse, wenn 
Sie sich Informationen über alle verfügbaren Zeichensätze 
geben lassen. Beim öffnen eines bestimmten Fonts brauchen 
nur FPF_ROMFONT bzw. FPF_DISKFONT entsprechend gesetzt zu 
werden. 

Zum Eintrag ta YSize ist noch folgendes zu sagen. Unter 
Kickstart 2.0 ist es möglich, einen Zeichensatz auch in 
einer Größe darzustellen, die nicht eigens entworfen wurde. 
Gibt man in ta_YSize eine Größe an, die im Font-Verzeichnis 
nicht existiert, wird der Font, der dieser Größe am nächsten 
kommt geladen und dann auf die gewünschte Größe umgerechnet. 
Die Punkte, aus denen die Zeichen aufgebaut sind, werden da¬ 
bei einfach je nach Bedarf verdoppelt, verdreifacht usw. Die 
Zeichen sind danach zwar größer, sehen aber auch viel grober 
aus. Bei älteren Versionen des Betriebssystems ist eine sol¬ 
che automatische Vergrößerung noch nicht möglich, hier wird 
bei nicht vorhandener Größe nur der Font geladen, der der 
gewünschten Größe am nächsten kommt. 

Die TextFont-Struktur (nicht zu verwechseln mit TextAttr), 
auf die der Rückgabewert von OpenDiskFont zeigt, ist für den 
Programmierer eigentlich weniger wichtig. Sie wird nur vom 
System zur Verwaltung des Fonts benutzt. Sie soll hier aber 
trotzdem vorgestellt werden: 

Die TextFont-Struktur: 


00 

ds.b 

tf Message,20 

Eine Exec-Message (siehe unten) 

20 

dc.w 

tf YSize 

Y-Größe des Fonts 

22 

dc.b 

tf Style 

Schreibstil 

23 

dc.b 

tf Flags 

Font-Eigenschaften 

24 

dc.w 

tf XSize 

Standard-Fontbreite 

26 

dc.w 

tf Baseline 

Grundlinie 

28 

dc.w 

tf BoldSmear 


30 

dc.w 

tf_Accessors 

Anzahl der Zugriffe 

32 

dc.b 

tf LoChar 

Erstes ASCII-Zeichen im Font 

33 

dc.b 

tf Hichar 

Letztes ASCII-Zeichen im Font 

34 

dc.l 

*tf CharData 

Zeiger auf die Zeichen-Daten 

38 

dc.w 

tf_Modulo 


40 

dc.l 

*tf CharLoc 


44 

dc.l 

*tf CharSpace 

Zeiger auf Proportional-Daten 

48 

dc.l 

*tf CharKern 

Zeiger auf Kerning-Daten 


52 tfSIZEOF 

tfMessage 

Vor den eigentlichen Font-Daten befindet sich eine Struktur, 
die aus der Exec-Library stammt. Sie nennt sich "Message- 
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Struktur" und wird im Kapitel über die Exec-Lib genauer be¬ 
sprochen. 

tfYSize, tf_Style, tf Flags 

Diese drei Einträge entsprechen den gleichnamigen in der 
TextAttr-Struktur. 

tf XSize 

BeX nicht-proportionalen Fonts steht hier die Pixelbreite 
der Zeichen. Bei Proportionalfonts hat der Eintrag keine Be¬ 
deutung . 

tf_BaseLine 

Hier wird der Abstand der Grundlinie vom oberen Zeichenrand 
eingetragen. Auf diese Linie beziehen sich die y-Positionen 
bei Textausgaben. Wenn ein Text z.B. ab der Zeile 200 ausge¬ 
geben werden soll, seine Grundlinie aber 10 Pixel von der 
Oberkante entfernt liegt, wird er in Wirklichkeit ab Zeile 
190 ausgegeben. 

tf_Accessors 

Die Anzahl der OpenDiskFont-Aufrufe für den Zeichensatz. 
Beim Schließen des Zeichensatzes wird der Zähler um eins 
verkleinert. Wenn er Null erreicht, wird der Zeichensatz aus 
dem Speicher gelöscht. 

tf LoChar, tf HiChar 

Das erste und letzte ASCII-Zeichen, für das der Zeichensatz 
entworfen wurde. 

* tf_CharData 

Ein Zeiger auf die eigentlichen Pixel-Daten des Fonts. 

*tf CharSpace, *tf_CharKern 

Zwei Zeiger auf Datenfelder, die bei Proportionalfonts be¬ 
nutzt werden. In den Feldern stehen die Pixelbreiten der 
einzelnen Zeichen. 


Wenn ein Zeichensatz nicht mehr benötigt wird, sollte er ge¬ 
schlossen werden. Das übernimmt die Routine CloseFont, die 
sich allerdings in der Graphics-Library befindet. Wir 
greifen hier etwas vor, aber die CloseFont-Routine paßt 
thematisch besser in dieses Kapitel. 


CloseFont = -78 (Graphics-Library) 


«textFont al < Zeiger auf die TextFont-Struktur des zu 
schließenden Zeichensatzes 

Erklärung Schließt den angegebenen Zeichensatz. 

Wenn alle Öffnungs-Aufrufe durch den 
Close-Aufruf rückgängig gemacht wurden, 
wird der Zeichensatz aus dem Speicher 
entfernt. 
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Noch ein kurzes Beispielprogramm, das den Zeichensatz 
"Garnet" mit einer Y-Größe von 16 Punkten öffnet und wieder 
schließt. Die Basis der Graphics- und Diskfont-Library wer¬ 
den in Variablen vorausgesetzt. 


move.1 

dfbase,a6 

; Diskfont-Basis nach a6 

lea 

textattr,aO 

; Zeiger auf TextAttr-Struktur 

jsr 

-30(a6) 

; Font öffnen 

move.1 

dO ,d6 

; TextFont-Zeiger sichern 

move.1 

gfxbase,a6 

; Graphics-Basis nach a6 

move.1 

d6,al 

; TextFont-Zeiger nach al 

jsr 

-78(a6) 

; Font schließen 


textattr: 

dc.l 

fontname 

; Zeiger auf Font-Namenstext 


dc.w 

16 

; Höhe: 16 Pixel 


dc.b 

0 

; Text-Stil: Normal 


dc.b 

2 

; Font-Art: Diskfont 

fontname: 

dc.b 

even 

"garnet.font" 

,0 


Bild 6.1: Öffnen und Schließen eines Fonts 


Nun wissen wir, wie man Zeichensätze öffnet und schließt. 
Bevor wir aber zur ihrer Benutzung in Programmen kommen, 
wollen wir uns erst ansehen, wie man sich Informationen über 
alle verfügbaren Zeichensätze geben lassen kann. 


6.3 Informationen über verfügbare Zeichensätze 

In der Diskfont-Library existiert eine Routine, die einen 
Pufferspeicher, den wir reservieren und dessen Startadresse 
wir der Routine übergeben müssen, mit diversen Strukturen 
füllt. Aus diesen Strukturen kann man Informationen über 
alle auf der Diskette (und im ROM) verfügbaren Fonts, ihre 
Größen, Schriftarten und sonstigen Eigenheiten ablesen. Die 
Routine heißt AvailFonts: 


AvailFonts = -36 (Diskfont-Library) 


*buffer 

aO 

bufBytes 

dO 

flags 

dl 


< Startadresse, ab der die Info-Strukturen 
angelegt werden sollen 

< Größe des Info-Puffers in Bytes 

< Geben an, welche Typen von Fonts gesucht 
werden sollen 
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error do > Anzahl der Info-Bytes, die nicht mehr in 

den Puffer paßten oder 0, wenn alles in 
Ordnung war 

Erklärung Füllt einen Speicherbereich mit Info- 

Strukturen über die verfügbaren Fonts. 
Falls der Bereich zu klein ist, werden 
nicht alle Fonts behandelt und die An¬ 
zahl der fehlenden Bytes gemeldet. 


Zuerst die möglichen Werte für die Flags: 
Font-Typ Wert Bedeutung 


AFF_MEM0RY 1 Suche Fonts im ROM 

AFF DISK 2 Suche Fonts auf der Diskette 


AFF_MEMORY und AFF_DISK können auch kombiniert (aufaddiert) 
werden, dann werden Fonts im ROM und auf Disk gesucht. Nun 
zu den Strukturen, die im Info-Puffer angelegt werden. Zu 
Beginn kommt eine AvailFontsHeader-Struktur. Sie besteht ei¬ 
gentlich nur aus einem Wort-Eintrag, der angibt, wieviele 
AvailFonts-Strukturen danach folgen werden: 

Die AvailFontsHeader-Struktur: 


00 

dc.w 

afh NumEntries 

; Anzahl der folgenden AF-Strukturen 

02 

ds.b 

afh AF,10 

; Die erste AvailFonts-Struktur 

12 

ds.b 

afh AF,10 

; Die zweite AvailFonts-Struktur 

, , 



; usw. 


Die Größe dieser Struktur ist also nicht festgelegt. Sie be¬ 
trägt 2 (für das NumEntries) plus Anzahl Fonts * 10. 

Die AvailFonts-Struktur: 


00 

dc.w 

af Type ; 

AFF MEMORY oder AFF_DISK 

02 

dc.l 

*af_Name,0 ;• 


06 

dc.w 

af YSize ; 

TextAttr- 

08 

dc.b 

af_style ; 

Struktur 

09 

dc.b 

af Flags 


10 


af SIZEOF 



Die AvailFonts-Struktur besteht aus einem Wort, das angibt, 
ob der Font im ROM steht (1) oder auf Disk (2), und einer 
TextAttr-Struktur, welche die eigentlichen Informationen 
enthält. 

Das folgende Beispielprogramm wird die Benutzung von Avail- 
Fonts noch etwas klarer machen. Es gibt Namen, Größen und 
Modi (proportional oder nicht) aller Fonts auf der Diskette 
aus. 
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* Programm 6.1: Anzeige aller verfügbaren Diskfonts 


ExecBase = 

4 


OpenLib = 

-552 


CloseLib = 

-414 


AvailFonts 

-36 


Output = 

-60 


Write 

-48 


move.1 

ExecBase,a6 

; DOS-Lib öffnen 

lea 

dosname,al 


clr.l 

do 


jsr 

OpenLib(a6) 


move.1 

dO,dosbase 

; Basis sichern 

lea 

dfname,al 

; Diskfont-Lib öffnen 

clr.l 

dO 


jsr 

-552(a6) 


move.1 

d0,dfbase 

; Basis sichern 

move.1 

dfbase,a6 

; Benutze Diskfont-Lib 

* Fontinfo-Puffer füllen 


lea 

fontbuff,a0 

; Zeiger auf Fontinfo-Puffer 

move.1 

#2000,do 

; 2000 Bytes sollten reichen 

move.1 

#2,dl 

; Flags: Nur Diskfonts 

jsr 

AvailFonts(a6) 

; Puffer füllen lassen 

move.1 

dosbase,a6 

; Benutze jetzt DOS-Lib 

jsr 

0utput(a6) 

; Output-Handle holen 

move.1 

d0,d4 


lea 

fontbuff,a5 

; Start Fontbuffer in Arbeitsregister 

move.w 

(a5)+,d6 

; Anzahl Fonts nach d6 

subq 

#l,d6 

; DBRA läuft bis -1 

lea 

text0,a0 

; Titeltext 

bsr 

print 

; ausgeben 

* Hauptschleife: 

Einen Fonteintrag ausgeben 

mainl: addq 

#2 ,a5 

; Type-Wort in AF-Struktur überspr. 

move.1 

(a5)+,a0 

; Zeiger auf Font-Name nach aO 

bsr 

print 

; Name ausgeben 

lea 

textl,a0 

; Zwischentext 

bsr 

print 

; ausgeben 

clr.l 

dO 

; dO long-löschen 

move.w 

(a5)+,d0 

; Fonthöhen-Wort nach dO 

lea 

dezbuff,a0 

; Start des Dez-Puffers 
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bsr 

dezascii 

; Zahl umrechnen 


lea 

dezbuff,a0 

; Dez-Puffer-Inhalt 


bsr 

print 

; ausgeben 


move.w 

(a5)+,d0 

; Style- u. Flag-Byte nach dO 


btst 

#5,d0 

; Bit 5 im Flag-Byte gesetzt? 


beq 

main2 

; Wenn nein, kein Prop-Font 


lea 

text2,a0 

; Sonst Text "Prop" ausgeben 


bsr 

print 


main2: 

lea 

text3,a0 

; Return-Zeichen 


bsr 

print 

; ausgeben 


dbra 

d6,mainl 

; Zur Hauptschleife 


move.1 

ExecBase,a6 

; Jetzt Exec-Lib benutzen 


move.1 

dosbase,al 

; DOS-Lib 


jsr 

CloseLib(a6) 

; schließen 


move.1 

dfbase,al 

; Diskfont-Lib 


jsr 

CloseLib(a6) 

; schließen 


rts 


; und Ende 

print: 

movem.1 

dl-d3,-(sp) 

SUB Textausgabe für DOS-Write 


move.1 

a0,d2 

*a0 < Zeiger auf Text (O-terminiert) 


clr.l 

d3 

d4 < Handle der Ausgabedatei 

prl: 

addq 

#1 ,d3 



tst.b 

(a0) + 



bne 

prl 



subq 

#1 ,d3 



move.1 

d4,dl 



jsr 

Write(a6) 



movem.1 

(sp)+,dl-d3 



rts 



dezascii: 


; SUB Umrechnung Dez-Zahl -> ASCII-Text 


movem.1 

dl/d2/al,-(sp) 

; dO <- Dezimalzahl 


clr .b 

d2 

; *a0 <- Pufferzeiger 


lea 

values,al 


dal: 

clr .b 

dl 


da2: 

addq 

*1 ,dl 



sub. 1 

(al) ,d0 



bcc 

da 2 



add.l 

(al),dO 



subq 

#1 ,dl 



tst.b 

dl 



beq 

da 3 



264 




Die Diskfont-Library 


add.b 

#"0",dl 

move. ] 

b dl,(aO)+ 

moveq 

#l,d2 

bra 

da 4 

da3: tst.b 

d2 

beq 

da 4 

move. ] 

b #"0",(a0)+ 

da4: cmp.l 

#l,(al) 

beq 

da 5 

add.l 

#4,al 

bra 

dal 

da5: move.] 

b #0,(aö) 

movem.l (sp)+,dl/d2/al 

rts 


* Datenbereich 

dosname: 

dc.b "dos.library",0 


even 

dfname: 

dc.b "diskfont.library",0 


even 

dosbase: 

de. 1 0 

dfbase: 

dc.l 0 

fontbuff: 

ds.b 2000 

textO: 

dc.b 10,"Liste der verfügbaren Disk-Fonts:",10 

dc.b "-",10,10,0 

textl: 

dc.b " ",0 

text2: 

dc.b " (Prop)",0 

text3: 

dc.b 10,0 

dezbuff: 

ds.b 8 

values: 

dc.l 1000000000,100000000,10000000,1000000 

dc.l 100000,10000,1000,100,10,1 


Programm 6.1: Anzeige aller verfügbaren Diskfonts 


Die Benutzung der AvailFonts-Routine dürfte klar sein. Das 
Library-Öffnen und Output-Handle-Holen sowieso. Interessant 
wird es an der Stelle 

lea fontbuff,a5 ; Start Fontbuffer in Arbeitsregister 

move.w (a5)+,d6 ; Anzahl Fonts nach d6 

subq #l,d6 ; DBRA läuft bis -1 

Wir speichern den Start des Fontpuffers ins Adreßregister 
a5, das wir in Zukunft immer zum Zugriff auf den Puffer 
benutzen werden. Das erste Wort ist die Anzahl der Fonts, 
also der AvailFonts-Strukturen, die nach dem Wort folgen 
werden. Die Hauptschleife wird mit DBRA aufgebaut, weshalb 
wir 1 von der Fontanzahl subtrahieren müssen. In der Zeile 


265 





Kapitel 6 


mainl: addq #2,a5 ; Type-Wort in AF-Struktur überspr. 

erhöhen wir den Pufferzeiger um zwei, wodurch wir das Type- 
Wort, das in jeder AF-Struktur vor dem TextAttr-Teil steht, 
überspringen. Da wir sowieso nur Diskfonts einladen, ist 
eine Auswertung des Font-Typs überflüssig. Das nächste 
Langwort ist ein Zeiger auf den Fontnamen, der, für unsere 
Print-Routine sehr günstig, mit einem Nullbyte endet. Wir 
können Print also direkt aufrufen: 

move.l (a5)+,a0 ; Zeiger auf Font-Name nach aO 

bsr print ; Name ausgeben 

Das nächste Wort beinhaltet die Fontgröße, die wir nach Um¬ 
rechnung durch DezAscii von Print ausgeben lassen können. In 
der Zeile 

move.w (a5)+,d0 ; Style- u. Flag-Byte nach do 

holen wir die Bytes für Style und Flags auf einmal nach do. 
Eigentlich brauchen wir nur die Flags, aber durch das MOVE.W 
können wir uns ein Erhöhen des Adreßzeigers um eins sparen. 
Der MOVE-Befehl schreibt das Flags-Byte ins unterste Byte 
des Registers. Wir können also das Bit Nr. 5 von do, welches 
das PROPORTIONAL-Bit des Flagbytes enthält, testen: 

btst #5,d0 ; Bit 5 im Flag-Byte gesetzt? 

beq main2 ; Wenn nein, kein Prop-Font 

War das Bit nicht gesetzt, wird die Ausgabe des Textes 
"Prop" übersprungen. Der Rest des Programms dürfte eigent¬ 
lich klar sein. 


6.4 Textausgabe mit eingeladenen Fonts 

Es gibt zwei Möglichkeiten, zur Textausgabe der eingeladenen 
Fonts. Die erste beruht auf einer Routine aus der Graphics- 
Library, genannt SetFont, die einen wählbaren Zeichensatz 
einstellt. Da diese Routine aber nur im Zusammenhang mit 
weiteren Graphics-Routinen und -Strukturen einsetzbar ist, 
werden wir im Graphics-Kapitel darauf zurückkommen. 

Die zweite Möglichkeit beruht auf Intuition-Strukturen, die 
das Einsetzen eines Font-Zeigers erlauben. Das sind die New- 
Screen-Struktur und die intuiText-Struktur. Man kann also 
schon beim öffnen eines neuen Screens angeben, daß ein be¬ 
stimmter Zeichensatz verwendet werden soll. Dieser wird dann 
für alle Textausgaben im Screen (auch die Titelzeile usw.) 
und in allen entsprechenden Windows benutzt. 

Die IntuiText-Struktur wird bekanntlich überall da einge¬ 
setzt, wo es um direkte Textausgabe (mit PrintIText) oder 
Angabe eines Gadget- oder Menütextes usw. geht. Durch Ver- 
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Wendung eines Font-Zeigers kann man hier individuelle Fonts 
einstellen, die sich auch vom Standard-Font (beim Öffnen des 
Screens angegeben) unterscheiden können. 

Wichtig ist dabei, daß erstens der entsprechende Font vor 
der Benutzung in Intui-Strukturen geöffnet worden sein muß, 
und daß zweitens, der Font-Zeiger ein Zeiger auf die 
TextAttr-Struktur sein muß, also auf die selbe Struktur, die 
wir zum öffnen mit OpenDiskFont benutzten, nicht den 
Rückgabe-Zeiger (auf TextFont-Struktur) dieser Routine. Die 
Graphics-Routine, die wir später kennenlernen werden, 
erwartet allerdings einen TextFont-Zeiger. 

Alle erforderlichen Routinen und Strukturen zum Screenöffnen 
und zur Fontbenutzung sind ja schon bekannt, daher können 
wir sofort ein Beispielprogramm bringen. Es öffnet einen 
Screen unter der Benutzung des Fonts 'Garnet 16', auf dem 
Screen ein Fenster, und in dieses wird mit dem Font 'Emerald 
17' ein Text ausgegeben. Diese beiden Fonts finden Sie 
"serienmäßig" auf der Workbench-Diskette. 


* Programm 6.2: Benutzung von Diskfonts in Screens und Windows 


ExecBase = 

4 


OpenLib = 

-552 


CloseLib = 

-414 


OpenDiskFont = 

-30 


OpenScreen = 

-198 


OpenWindow = 

-204 


PrintIText = 

-216 


WaitPort 

-384 


GetMsg 

-372 


ReplyMsg = 

-378 


CloseWindow = 

-72 


CloseScreen = 

-66 


CloseFont = 

-78 


move.1 

4,a6 

; Int-Lib öffnen 

lea 

intname,al 


clr.l 

dO 


jsr 

0penLib(a6) 


move.1 

dO,intbase 


lea 

gfxname,al 

; Graphics-Lib öffnen 

clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

dO,gfxbase 


lea 

dfname,al 

; Diskfont-Lib öffnen 

clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

d0,dfbase 


tst.l 

dO 

; Fehler? 
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endel 


beq 


; Wenn ja 


move.l dfbase,a6 ; Benutze Diskfont-Lib 


lea 

tattrl,aO ; 

Font 'Garnet 16' 

öffnen 

jsr 

OpenDiskFont(a6) 



tst.l 

dO ; 

Fehler? 


beq 

ende2 ; 

Wenn ja 


move.1 

dO,tfontl ; 

TextFont-Zeiger 

sichern 


lea 

tattr2,a0 ; 

Font 'Emerald 17' öffnen 

jsr 

OpenDiskFont(a6) 


tst.l 

dO ; 

Fehler? 

beq 

ende3 ; 

Wenn ja 

move.1 

d0,tfont2 ; 

Zeiger sichern 

move.1 

intbase,a6 


lea 

nscreen,aO ; 

Screen öffnen 

jsr 

OpenScreen(a6) 


move.1 

dO,wscreen 


lea 

nwindow,aO ; 

Window öffnen 

jsr 

OpenWindow(a6) 


move.1 

dO,window 


move.1 

dO,aO ; 

Zeiger nach aO 

move.1 

$32(aO),a4 ; 

Rastport nach a4 

move.1 

$56(a0),a5 

Userport nach a5 

move.1 

a4,a0 ; 

Text ausgeben mit PrintIText 

lea 

itext,al 


move.w 

#0,d0 

Position steht in der Struktur 

move.w 

#0,dl 


jsr 

PrintlText(a6) 


move.1 

ExecBase,a6 


move.1 

a5,a0 ; 

Warte auf Nachricht 

jsr 

WaitPort(a6) 


move.1 

a5,a0 ; 

Nachricht 

jsr 

GetMsg(a6) ; 

abholen 

move.1 

dO,al ; 

Nachricht 

jsr 

ReplyMsg(a6) ; 

quittieren 

move.1 

intbase,a6 


move.1 

window,aO ; 

Window schließen 

jsr 

CloseWindow(a6) 


move.1 

wscreen,aO ; 

Screen schließen 

jsr 

CloseScreen(a6) 


move.1 

gfxbase,a6 
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move.1 
jsr 

tfont2,al 

CloseFont(a6) 

; Fonts schließen 

ende3: 

move.1 

tfontl,al 



jsr 

CloseFont(a6) 


ende2: 

move.1 

ExecBase,a6 

; Alle Libs schließen 


move.1 

dfbase,al 



jsr 

CloseLib(a6) 


endel: 

move.1 

gfxbase,al 



jsr 

CloseLib(a6) 



move.1 

intbase,al 



jsr 

CloseLib(a6) 



rts 


* Datenbereich 



intname: 

dc.b 

"intuition.library",0 


even 



dfname: 

dc.b 

''diskfont. library" ,0 


even 



gfxname: 

dc.b 

"graphics.library",0 


even 



intbase: 

dc.l 

0 


dfbase: 

dc.l 

0 


gfxbase: 

dc.l 

0 


tattrl: 

dc.l 

f namel 



dc.w 

16 



dc.b 

0,2 


fnamel: 

dc.b 

"garnet.font",0 



even 



tattr2: 

dc.l 

fname2 



dc.w 

17 



dc.b 

0,2 


fname2: 

dc.b 

"emerald.font", 

0 


even 



nscreen: 

dc.w 

0,0,640,256,1 

Screen-Dimensionen und -tiefe 


dc.b 

0,1 

$8000,15 

Zeichenstifte 


dc.w 

Modus HIRES, Typ CUSTOMSCREEN 


dc.l 

tattrl 

Zeiger auf TextAttr für Font 


dc.l 

stitle 

Zeiger auf Titel 


dc.l 

0,0 

Keine Gadgets und Custombitmap 

stitle: 

dc.b 

"Garnet-Screen 

(Font = Garnet 16)",0 


even 



nwindow: 

dc.w 

0,30,640,180 

Window-Dimensionen 


dc.b 

0,1 

Zeichenstifte 


dc.l 

$200,15 

IDCMP: CLOSEWINDOW, Alle Gadgets 


dc.l 

0,0 

Keine Gadgets und Checkmark 


dc.l 

wtitle 

Zeiger auf Titel 

wscreen: 

dc.l 

0 

Zeiger auf Screen 


dc.l 

0 

Keine Custombitmap 
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dc.w 

200 

,100,640,200 ; Min- und Max-Größe 


dc.w 

15 

; Typ CUSTOMSCREEN 

wtitle: 

dc.b 

"<- 

Close-Gadget klicken zum Beenden",0 


even 



window: 

dc.l 

0 


tfontl: 

dc.l 

0 


tfont2: 

dc.l 

0 


itext: 

dc.b 

1,0 

; Farben 


dc.b 

0,0 

; Draw-Mode u. Adjust-Byte 


dc.w 

10, 

30 ; Text-Position 


dc.l 

tattr2 ; Zeiger auf TextAttr für ] 


dc.l 

itextr ; Zeiger auf Text 


dc.l 

0 

; Kein weiterer Text 

itextr: 

dc.b 

"Dies ist ein Text in Emerald 17",0 


even 




Programm 6.2: Benutzung von Diskfonts in Screens und Windows 


Das Interessanteste ist diesmal in den Strukturen zu finden. 
In der Screen-Struktur heißt es jetzt 


dc.l 


tattri 


; Zeiger auf TextAttr für Font 


was die Benutzung von Garnet 16 als Standard-Font bewirkt. 
Der Screen-Titel und alle Windows, die wir öffnen wollen, 
werden in diesem Font dargestellt. Beachten Sie, daß nicht 
der von OpenDiskFont gemeldete TextFont-Zeiger hier 
eingetragen werden muß, sondern der Zeiger auf die TextAttr- 
Struktur, die wir auch zum öffnen des Fonts verwendet haben. 
Auf die selbe Weise verfahren wir in der IText-Struktur: 


dc.l tattr2 


; Zeiger auf TextAttr für Font 


Beachten Sie noch die Zeilen 


move.1 

a5,a0 

; Warte auf Nachricht 

jsr 

WaitPort(a6) 


move.1 

a5,a0 

; Nachricht 

jsr 

GetMsg(a6) 

; abholen 

move.1 

d0,al 

; Nachricht 

jsr 

ReplyMsg(a6) 

; guittieren 


Wir warten hier einfach auf eine Nachricht, holen sie ab und 
quittieren sie sofort. Auszuwerten brauchen wir sie nicht, 
da es sowieso nur die eine sein kann, die wir für das Fen¬ 
ster zugelassen haben (CLOSEWINDOW). 
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Damit dürfte die Anwendung von Diskfonts in eigenen Screens 
und ITexten klar sein. 


6.5 Insider-Wissen über Diskfonts 

Nun wollen wir uns noch etwas Hintergrundwissen aneignen. 
Für die Benutzung von Fonts sind die beiden folgenden Ab¬ 
schnitte nicht unbedingt nötig, aber für den einen oder an¬ 
deren sind sie vielleicht interessant. 


6.5.1 Font-Informationen auf eine etwas andere Weise 

Neben der besprochenen Routine AvailFonts, die eine gleich¬ 
namige Struktur aufbaut, gibt es noch eine weitere Routine: 
NewFontContents. Sie sieht folgendermaßen aus: 


NewFontContents = -42 (Diskfont-Library) 


♦fontsLock 

»fontName 

dO 

al 

< Lock auf das gewünschte Font-Directory 

< Zeiger auf den Namen der Font-Verwal¬ 
tungsdatei 

*fch 

dO 

> Adresse der FontContentsHeader-Struktur 
oder 0 bei Fehler während der Erstellung 

Erklärung 


Liest die Font-Daten aus der angegebenen 


Verwaltungsdatei und stellt sie in einer 
FontContentsHeader-Struktur zusammen 


Mit dieser Routine kann man sich Informationen über einen 
bestimmten Font besorgen. In do muß ein Lock auf das ge¬ 
wünschte Font-Verzeichnis stehen (z.B. "df0:fonts/garnet" ) 
und in al ein Zeiger auf den Namen der Font-Verwaltungsdatei 
(z.B. "dfo:fonts/garnet.font"). Im Gegensatz zu AvailFonts 
braucht man keinen Zeiger auf den Speicherbereich zu überge¬ 
ben, in dem die Info-Struktur angelegt werden soll. NewFont¬ 
Contents wählt den Speicherplatz selber aus. Die FontCon- 
tentsHeader-Struktur (kurz 'fch'), in der die Informationen 
zusammengestellt werden, sieht so aus: 

Die FontContentsHeader-Struktur: 


000 

dc.w 

fch 

FilelD 

; $0f00 

002 

dc.w 

fch" 

"NumEntries 

; Anzahl der folgenden fc-Strukturen 

004 

ds.b 

fch 

'FH, 260 

; Die erste FC-Struktur 

264 

ds.b 

fch 

"FH, 260 

; Die zweite FC-Struktur 


; usw. 
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fch_FileID 

Dies ist das erste Wort, das in der ". font"-Datei steht. Es 
kennzeichnet die Datei als Font-Verwaltungsdatei. Da 
NewFontContents im Prinzip diese Datei einfach nur einlädt, 
steht in der fch-Struktur auch als erstes dieses Kennungs- 
Wort . 


Der Aufbau dieser Struktur läuft analog zur AvailFontsHea- 
der-Struktur. Das zweite Wort gibt an, wieviele FontCon- 
tents-Strukturen folgen werden, die so aussehen: 

Die FontContents-Struktur: 


000 

ds.b 

fc FileName,256 

; Name der Fontdatei (0-terminiert) 

256 

dc.w 

fc YSize 

; Y-Größe 

258 

dc.b 

fc Style 

; Schreibstil 

259 

260 

dc.b 

fc Flags 
fc SIZEOF 

; Font-Eigenschaften 


Die Felder entsprechen bis auf fc_FileName denen der Tex- 
tAttr-Struktur. Der FileName-Eintrag steht hier in der 
Struktur selber und wird nicht über einen Zeiger angespro¬ 
chen. Der Eintrag für den Namen ist immer 256 Bytes groß, 
auch wenn der Name für gewöhnlich viel kürzer sein dürfte 
(dann sind die restlichen Zeichen mit Nullen gefüllt). Auch 
hat der Name hier einen anderen Aufbau: Im Falle des Fonts 
Garnet 16 würde hier nicht "garnet.font" stehen, sondern 
"garnet/16", also der Pfad- und Dateiname der Font-Datenda¬ 
tei (vom Verzeichnis FONTS: aus gesehen). 

Da die Routine NewFontContents selbstständig einen Speicher¬ 
bereich für die Struktur auswählt, muß es auch eine Routine 
geben, die diesen wieder freigibt. Sie heißt DisposeFontCon- 
tents und sieht folgendermaßen aus: 


DisposeFontContents = -48 (Diskfont-Library) 


*fch al < Zeiger auf die zu entfernende fch-Struk¬ 

tur 

Erklärung Gibt den von der angegebenen fch-Struk¬ 

tur belegten Speicher frei. 


Sinnvoll ist die Benutzung von NewFontContents, wenn Sie nur 
über einen bestimmten Font Informationen benötigen, 
ansonsten benutzen Sie besser AvailFonts. 


6.5.2 Der Aufbau einer Font-Datendatei 

Ob Sie es glauben oder nicht, eine Font-Datendatei ist im 
Prinzip ein ausführbares Programm! Sie können es ja mal ver- 
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suchen und "fonts:garnet/16" als Programm starten. Eventuell 
müssen Sie vorher das Execute-Schutzbit mit dem CLI-Befehl 
SetProtection setzen. Passieren wird dabei allerdings nicht 
viel. Woran das liegt, werden Sie gleich erfahren. 

Der Grund, warum die Font-Dateien den gleichen Aufbau haben 
wie ausführbare Programme, liegt in den Zeigern, die in der 
Fontdatei verwendet werden. Die Datei muß ja an jeden belie¬ 
bigen Platz im Speicher geladen werden können, ein absoluter 
Zeiger würde sie aber an eine bestimmte Adresse binden. Um 
das zu umgehen, wird das Einladen vom DOS-Programmlader 
übernommen, der die absoluten Adressen bekanntlich anhand 
einer Tabelle anpaßt. 

Damit es aber keinen Absturz gibt, wenn man eine Fontdatei 
"einfach mal aus Spaß" als Programm startet, stehen zu 
Beginn der Datei die Befehle "moveq #0,d0" und "rts" in der 
Datei. Vor diesen Befehlen findet sich noch ein Null-Zeiger. 
An seiner Stelle steht bei einem richtigen Programm der Zei¬ 
ger auf das zweite Programmsegment (falls vorhanden), da es 
bei einer Fontdatei aber kein solches gibt, wird einfach 
eine Null eingetragen. Nach diesen beiden Langworten (die 
beiden Befehle sind zusammen ein Langwort groß) folgt die 
DiskFontHeader-Struktur, die so aussieht: 

Die DiskFontHeader-Struktur: 


000 

ds.b 

dfh DF,14 

; Ein Exec-Node (siehe unten) 

014 

dc.w 

dfh_FileID 

; $0f80 

016 

dc.w 

dfh Revision 

; Revisionsnummer des Fonts 

018 

dc.l 

dfh Segment 

; Segment-Adresse nach Laden 

022 

ds.b 

dfh Name,256 

; Name der Fontdatei 

278 

ds.b 

dfh TF,52 

; Eine TextFont-Struktur 

330 


dfh SIZEOF 


dfh DF 



Diese 

Struktur, die in die 

dfh-Struktur eingebettet 

stammt aus 

der Exec-Library. 

Sie dient zum Verknüpfen 


einzelnen Zeichensätze im Speicher. Genauer besprochen wird 
sie im Exec-Kapitel. 

dfh_FileID 

Das Wort $Of80 kennzeichnet die Datei als Font-Datendatei. 
dfhRevision 

Eine Art interne Versionsnummer des Zeichensatzes (mehr oder 
weniger Spielerei). 

dfh_Segment 

Hier wird nach dem Einladen die Startadresse der als Segment 
geladenen Fontdatei eingetragen. 

dfh_Name 

Entspricht dem FileName-Eintrag in der FontContents-struk- 

tur. 
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dfhTF 

Eingebettet in die dfh-Struktur ist auch eine TextFont- 
Struktur, die zur Verarbeitung des Zeichensatzes unerläßlich 
ist. Sie enthält alle weiteren wichtigen Daten. 
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Die wichtigsten Graphics-Strukturen 
Einstellen der Zeichenfarben 

Einfache Zeichenroutinen 

Die Area-Zeichenroutinen 
Textausgabe und Zeichensätze 
Kopieren und Scrollen von Grafik 
Rast- und Viewports 
Sprites, VSprites und Bobs 
Das IFF-Grafikformat 

Die Basisstruktur der Graphics-Library 
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Wenn wir die Intuition-Library benutzen und uns von ihr Win¬ 
dows, Menüs oder Gadgets darstellen lassen, brauchen wir uns 
um das eigentliche Zeichnen der Grafiken nicht zu kümmern. 
Als nächstes wollen wir im Betriebssystem eine Stufe tiefer 
gehen und uns ansehen, wie wir all das, was von Intuition 
automatisch gezeichnet wird (Linien, Blöcke, Punkte usw.), 
selbst auf den Bildschirm bringen können. 

Dazu bedienen wir uns der Graphics-Library. Sie ist für die 
erwähnten einfachen Zeichenroutinen zuständig, umfaßt aber 
auch komplexere Dinge wie Textausgabe, Spriteverwaltung, 
Display-Handling und Bildschirmscrolling. Ehe wir mit 
einfachen Zeichenroutinen beginnen, brauchen wir noch ein 
paar allgemeine Grundlagen zur Benutzung der Graphics- 
Library. 


7.1 Die wichtigsten Graphics-Strukturen 


7.1.1 Die Rastport-Struktur 

Ähnlich, wie wir bei den Intuition-Routinen Window-, Screen- 
und sonstige Strukturen verwendeten, um unsere Objekte 
anzusprechen, gibt es in Graphics drei Strukturen, die das 
anzusprechende "Grafik-Fenster" bestimmen. Die eine ist die 
RastPort-Struktur. Einen RastPort kann man als Graphics- 
Instanz eines Intuition-Fensters bezeichnen. Er enthält 
Informationen über die Farben, die beim Zeichnen verwendet 
werden sollen, über den Zeichensatz, die Cursorposition usw. 
Rastports können sich, genau wie Fenster, überlagern. Wenn 
wir in einen Rastport zeichnen, wird nur der Teil sichtbar, 
der nicht von anderen Rastports überlagert wird. 

Für jeden Intuition-Screen und jedes Intuition-Fenster wird 
automatisch ein Rastport eingerichtet und in der Screen- 
bzw. Window-Struktur eingetragen. Wenn wir in ein Fenster 
oder einen Screen zeichnen wollen, brauchen wir also die 
Rastport-Startadresse nur aus der entsprechenden Struktur 
abzulesen. Es besteht aber auch die Möglichkeit, Rastports 
unabhängig von Intuition-Objekten einzurichten. Diese werden 
dann aber nicht automatisch auf dem Bildschirm dargestellt, 
das muß man dann schon selbst übernehmen. Wie das geht, wer¬ 
den wir später noch sehen. 

Die RastPort-Struktur sieht folgendermaßen aus (nicht alle 
Einträge sind für den Programmierer interessant): 

Die RastPort-Struktur 


000 

dc.l 

*rp Layer 

; Zeiger auf den Layer des Rastports 

004 

dc.l 

*rp BitMap 

; Zeiger auf zugehörige BitMap 

008 

dc.l 

*rp AreaPtrn 

; Zeiger auf Füllmuster 

012 

dc.l 

*rp TmpRas 

; Zeiger auf Zwischenspeicher 
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016 

dc.l 

*rp Areainfo 

; Zeiger auf Area-Struktur 

020 

dc.l 

*rp Geisinfo 

; Zeiger auf Gelslnfo-Struktur 

024 

dc.b 

rp Mask 


025 

dc.b 

rp FgPen 

; Vordergrundfarbe 

026 

dc.b 

rp BgPen 

; Hintergrundfarbe 

027 

dc.b 

rp AOLPen 

; Begrenzungsfarbe beim Füllen 

028 

dc.b 

rp DrawMode 

; Zeichenmodus 

029 

dc.b 

rp AreaPtSz 

; Anzahl Worte im Füllmuster 

030 

dc.b 

rp Dummy 

; Nicht benutzt 

031 

dc.b 

rp linpatcnt 


032 

dc.w 

rp Flags 

; System-Flags 

034 

dc.w 

rp LinePtrn 

; Linienmuster 

036 

dc.w 

rp cp x 

; x-Position des Zeichencursors 

038 

dc.w 

rp_cp_y 

; y-Position des Zeichencursors 

040 

ds.b 

rp minterms,8 

; Blittermaske (Grafik-Hardware) 

048 

dc.w 

rp PenWidth 

; Breite des Zeichenstiftes 

050 

dc.w 

rp PenHeight 

; Höhe des Zeichenstiftes 

052 

dc.l 

*rp Font 

; Zeiger auf TextFont-Struktur 

056 

dc.b 

rp AlgoStyle 

; Font-Stil 

057 

dc.b 

rp TxFlags 

; Font-Flags 

058 

dc.w 

rp TxHeight 

; Höhe des Fonts 

060 

dc.w 

rp TxWidth 

; Breite des Fonts 

062 

dc.w 

rp TxBaseline 

; Position der Font-Grundlinie 

064 

dc.w 

rp TxSpacing 

; Leer-Abstand der Fontzeichen 

066 

dc.l 

*rp RP User 

; Zeiger auf Reply-Port 

070 

ds.b 

rp reserved,30 

; Reserviert für Erweiterungen 

100 


rp SIZEOF 


*rp 

Layer 




Layers werden vom System zur Verwaltung der Zeichenebenen 
eingesetzt, damit entsprechend reagiert werden kann, wenn 
sich RastPorts überlagern. Für den Assembler-Programmierer 
sind sie weniger interessant. 

*rp_BitMap 

In dieser Struktur ist verzeichnet, wie breit und wie hoch 
die Zeichenebene ist und wieviele Farben (Bitplanes) sie 
hat. Zu ihr werden wir später noch kommen. 

♦rpAreaPtrn 

Falls Sie beim Ausfüllen einer Fläche nicht das Standard- 
Füllmuster (vollständig ausgefüllt) benutzen möchten, können 
Sie hier einen Zeiger auf ihre eigenen Füllmusterdaten ein¬ 
tragen . 

*rp_TmpRas 

In der TmpRas-Struktur, auf die hier ein Zeiger steht, ist 
die Adresse eines Zwischenspeichers eingetragen, der für be¬ 
stimmte Zeichenroutinen benötigt wird. 

*rp_AreaInfo 

Die sog. Area-Zeichenroutinen benötigen hier einen Zeiger 
auf ihre Info-Struktur. 
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*rp Geisinfo 

Falls Graphic-Elements (VSprites, Bobs) im Rastport ange¬ 
zeigt werden sollen, muß hier ein Zeiger auf ihre Info- 
Struktur stehen. 

rp_FgPen, rp_BgPen, rp_AOLPen 

Die Farbregister-Nummern für die Vordergrund-, Hintergrund- 
und Füllrandfarbe. 

rp_DrawMode 

Hier wird der derzeitige Zeichenmodus (JAM1, JAM2, COMPLE- 
MENT oder INVERSVID) eingetragen. Genauere Beschreibung 
siehe Zeichenmodus-Abschnitt (7.2.3). 

rpAreaPtSz 

Gibt an, wieviele Punkte das durch rp_AreaPtrn festgelegte 
Füllmuster hoch ist. 

rp_LinePtrn 

Bitmuster, das angibt, mit welchem Muster Linien gezeichnet 
werden sollen. Gesetzte Bits erzeugen einen Punkt in der 
Linie. Normalerweise steht hier $FFFF (alle Bits gesetzt), 
was eine durchgezogene Linie erzeugt. 

rp_cp_x, rp cp_y 

Die aktuelTe Position des Grafik-Cursors (pixel-genau zu 
setzen). 

rp_PenWidth bis rp_TxSpacing 

Hier finden sich die entsprechenden Einträge aus der Text- 
Font-Struktur des derzeit eingestellten Zeichensatzes. 

*rp_RP User 

Ein Zeiger auf einen Exec-Messageport. Dieser dient zum Sen¬ 
den und Empfangen von Nachrichten (genauere Beschreibung im 
Exec-Kapitel). 


Wie gesagt werden einige Einträge dieser Struktur nur vom 
System benutzt. Alle brauchbaren Einträge werden später noch 
ausführlich beschrieben. 

Vorausgesetzt, wir wollen keinen eigenen RastPort einrich¬ 
ten, können wir in Windows zeichnen, indem wir den Eintrag 
wd_RPort (Offset 50) der Window-Struktur auslesen (dort 
steht der RastPort-Zeiger): 

move.l window,aO ; Window-Struktur-Beginn nach aO 

move.l 50(a0),al ; Rastport-Beginn dann in al 

Wir können auch direkt auf den Screen zeichnen, wobei der 
Rastport bei Screen+86 steht. Wichtig ist, daß in der 
Screen-Struktur kein Zeiger auf den Rastport steht, sondern 
der Rastport direkt in der Screen-Struktur enthalten ist: 
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move.l screen,aO ; Screen-Struktur-Beginn nach aO 

lea 86(a0),al ; Rastport-Beginn dann in al 


7.1.2 Die ViewPorts 

Die zweite wichtige Struktur ist die ViewPort-Struktur. Sie 
enthält Informationen über die verwendeten Farben, über die 
Bildschirmmodi und zur Ansteuerung der Grafik-Hardware. Die 
einzelnen Einträge des ViewPort und die dritte Struktur, ge¬ 
nannt "View-Struktur", sind bis auf den ColorMap-Eintrag im 
ViewPort nur dann wichtig, wenn man eigene Rast- und View- 
Ports einrichten will. Die kompletten Strukturen stellen wir 
später vor. Zunächst setzen wir voraus, daß View und 
ViewPort schon eingerichtet sind, sprich ein Intuition- 
Screen oder -Window geöffnet ist. 

In diesem Fall muß man wissen, wo man sich den Zeiger auf 
die ViewPort-Struktur besorgen kann. Einen ViewPort gibt es, 
im Gegensatz zum RastPort, nur für Screens, da die Farben 
und Auflösung für alle Objekte auf einem Screen gleich sind. 
Benötigt wird der ViewPort-Zeiger hauptsächlich für Farbän¬ 
derungen. Man findet ihn in der Screen-Struktur bei Offset 
44. Es gilt dasselbe wie für den Rastport im Screen: Es han¬ 
delt sich nicht um einen Zeiger, sondern der Viewport ist in 
der Screen-Struktur direkt enthalten. Durch folgende Befehle 
kann man sich den Zeiger besorgen: 

move.l screen,aO ; Screen-Struktur-Beginn nach aO 
lea 44(a0),al ; Viewport-Beginn dann in al 

Falls man den Viewport-Zeiger ausgehend von einem Window ha¬ 
ben möchte, muß man eine Library-Routine bemühen, da in der 
Window-Struktur kein solcher Zeiger vorhanden ist: 


ViewPortAddress = -300 (Graphics-Library) 


*window 

aO 

*viewPort 

dO 

Erklärung 



< Zeiger auf Window, dessen Viewport er¬ 
mittelt werden soll 

> Zeiger auf zugehörigen Viewport 

Ermittelt die Adresse eines, zu einem 
Window gehörigen, Viewports. 


7.2 Das Einstellen der Farben 

Zu diesem Thema zählen drei Dinge: die Änderung der Farbpa- 
lette, also die Einstellung einer ganz neuen Farbe, das Be¬ 
stimmen der Vorder- und Hintergrundfarbe und die Festlegung 
des Zeichenmodus. Zunächst zur Farbpalette. 
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7.2.1 Einstellen der Farbpalette 

Die maximale Anzahl Farben, die auf einem Bildschirm dar¬ 
stellbar sind, ist durch die Angabe 'Depth' (Tiefe) beim 
öffnen des Screens festgelegt. Depth gibt die Anzahl der 
Bitplanes an, die verfügbare Farbanzahl beträgt 2 De P th . Zur 
Änderung einer Farbe aus dieser Palette gibt es drei Routi¬ 
nen. Die erste: 


SetRGB4 



= -228 (Graphics-Library) 

*viewPort 

aO 

< 

Zeiger auf ViewPort 

index 

dO 

< 

Nummer des zu ändernden Farbregisters 

r 

dl 

< 

Rotanteil der neuen Farbe (0-15) 

g 

d2 

< 

Grünanteil 

b 

d3 

< 

Blauanteil 


Erklärung Nimmt die Einstellung eines Farbregi- 

sters in einem ViewPort vor. Die neue 
Farbe wird dann sofort auf den Bild¬ 
schirm übernommen. 


Hier haben wir also das erste Einsatzgebiet für den View- 
Port. Ein Anwendungsbeispiel in einem Programm wird später 
noch folgen. Die zweite Routine zur Farbeinstellung ist fol¬ 
gende : 


SetRGB4CM = -630 (Graphics-Library) 


aO < Zeiger auf ColorMap 

dO < Nummer des zu ändernden Farbregisters 

dl < Rotanteil der neuen Farbe (0-15) 

d2 < Grünanteil 

d3 < Blauanteil 

Ändert eine Farbe in einer ColorMap. Die 
Änderung wird nicht sofort am Bildschirm 
dargestellt, sondern erst nach Aufruf 
der RemakeDisplay- oder MakeScreen-Rou- 
tine. 


Der Unterschied zu SetRGB4 ist, daß hier ein Zeiger auf eine 
ColorMap-Struktur erwartet wird. Dieser ist in der ViewPort- 
Struktur im Eintrag vp_ColorMap (Offset 4) zu finden. Außer¬ 
dem wird die neue Farbe nicht sofort sichtbar, sondern erst 
nach Aufruf der MakeScreen- oder RemakeDisplay-Routine: 


*colorMap 

color 

r 

g 

b 


Erklärung 
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MakeScreen 

= -378 (Intuition-Library) 

♦screen aO < 

Zeiger auf den neu zu berechnenden 
Screen 

Erklärung 

Führt eine Neuberechnung der Hardware- 
Kontrollstrukturen für den angegebenen 
Screen durch. 

RemakeDisplay 

= -384 (Intuition-Library) 

Erklärung 

Ruft MakeScreen für alle Screens auf. 


Beachten Sie, daß sich die beiden Routinen in der Intuition- 
Library befinden. Am besten benutzen Sie allerdings SetRGB4, 
das erspart Ihnen die Arbeit, eine dieser Routinen aufzuru¬ 
fen . 

Die dritte Farbroutine ermöglicht es, gleich mehrere Farben 
auf einen Schlag einzustellen: 


LoadRGB4 = -192 (Graphics-Library) 


*viewPort 

aO 

< ViewPort, dessen Farben eingestellt wer¬ 
den sollen 

♦colors 

al 

< Zeiger auf Farb-Feld (1 Wort pro Farbe) 

count 

dO 

< Anzahl der einzustellenden Farben 

(eingestellt werden die Farben 0 bis 
count-1) 

Erklärung 


Stellt mehrere Farben eines ViewPorts, 
die aus einem Farbfeld gelesen werden, 
ein. 


Im Farbfeld muß für jede einzustellende Farbe ein Wort ste¬ 
hen. Das Wort, welches man am günstigsten in hexadezimal an¬ 
gibt, hat den Aufbau $0rgb, wobei r, g und b die Farbanteile 
Rot, Grün und Blau darstellen. Das oberste Nibble des Wortes 
wird nicht benutzt. Um eine Farbe auf Rot 12, Grün 6 und 
Blau 4 einzustellen, verwendet man also das Wort $0c64. 

Neben den Farbeinstell-Routinen gibt es noch eine, die das 
Auslesen eines Farbwertes aus einer ColorMap ermöglicht: 


GetRGB4 = -582 (Graphics-Library) 


♦colorMap ao < Zeiger auf die auszulesende Colormap 

entry do < Nummer des gewünschten Farbeintrags 
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color do > Ermittelter RGB-Farbwert 

Erklärung Liest einen Farbwert aus einer Colormap- 

Struktur aus. 


Hier wird wieder ein Zeiger auf eine ColorMap-Struktur er¬ 
wartet (ViewPort, Offset 4). Die Ergebnisfarbe ist in einem 
Register zusammengefaßt. Das unterste Nibble von do enthält 
dabei den Blauwert, das zweitunterste den Grünwert und das 
drittunterste den Rotwert (wie bei der Einstellung mit 
LoadRGB4). Mit einer AND-Verknüpfung kann man problemlos die 
einzelnen Farbanteile isolieren: 


do 

AND 

$00f 

ergibt den 

Blauwert 

do 

AND 

$0f0 

ergibt den 

Grünwert 

do 

AND 

$foo 

ergibt den 

Rotwert 


7.2.2 Wechseln der Zeichenfarben 

Die Graphics-Routinen verwenden eine Vorder- und Hin¬ 
tergrundfarbe. Die gesetzten Punkte des auszugebenden Objek¬ 
tes werden in der Vordergrundfarbe dargestellt und die ge¬ 
löschte in der Hintergrundfarbe. Letztere wird natürlich 
nicht bei allen Grafikobjekten gebraucht, so wird ein 
ausgefülltes Rechteck wohl kaum gelöschte Punkte enthalten. 

Wenn Sie mit Füllroutinen arbeiten, wird noch eine weitere 
Farbe verwendet, die Füllrandfarbe. Diese gibt an, welche 
Farbe als Begrenzung der zu füllenden Fläche dient. 

Zum Einstellen der Farben gibt es zwei Routinen: 


SetAPen = -342 (Graphics-Library) 


♦rastPort 

al 

< Rastport, dessen Zeichenfarbe geändert 
werden soll 

pen 

dO 

< Farbnummer für den Vordergrund 

Erklärung 


Stellt die Vordergrund-Zeichenfarbe ei¬ 
nes RastPorts ein 


SetBPen 


-348 (Graphics-Library) 


*rastPort 

pen 


al < Rastport, dessen Zeichenfarbe geändert 
werden soll 

do < Farbnummer für den Hintergrund 


Erklärung 


Stellt die Hintergrund-Zeichenfarbe ei¬ 
nes RastPorts ein 
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Zur Einstellung der Füllrand-Farbe existiert leider keine 
Graphics-Routine, hier muß man "von Hand" auf den RastPort 
zugreifen: Die betreffende Farbnummer steht im Eintrag 

rp_AOLPen (Offset 27) und ist ein Byte groß. Folgende Be¬ 
fehlssequenz kann zur Einstellung dienen: 

move.l rp,aO ; Rastport-Zeiger nach aO 

move.b #2,27(aO) ; Stellt Farbe 2 als Füllrandfarbe ein 

Ein Beispielprogramm, in dem auch diese Routinen zur Anwen¬ 
dung kommen, werden wir uns ansehen, wenn wir genug "Stoff" 
(demonstrierwürdige Routinen) beisammen haben. 


7.2.3 Einstellen des Zeichenmodus 

Hierbei wird eigentlich keine Farbe ein- oder umgestellt, es 
wird nur festgelegt, wie die gesetzten und gelöschten Punkte 
eines zu zeichnenden Objekts interpretiert werden. Gelöschte 
Punkte können z.B. Vorkommen, wenn Sie Text ausgeben. Das 
Grafikobjekt Textzeile wird dabei als Rechteck angesehen, in 
das der Text genau hineinpaßt. Die Stellen im Rechteck, an 
denen der Text steht, sind dann die gesetzten Punkte, und 
die restlichen gelten als gelöscht. 

Zur Einstellung des Zeichenmodus verwendet man die Routine 
SetDrMd. Beachten Sie, daß der eingestellte Modus für fast 
alle Zeichenroutinen der Graphics-Library gilt. 


SetDrMd = -354 (Graphics-Library) 


»rastPort 

al 

< Rastport, 

dessen Zeichenmodus gesetzt 



werden soll 


drawMode 

dO 

< Gewünschter 

Zeichenmodus 

Erklärung 


Stellt den 
port ein. 

Zeichenmodus in einem Rast- 


Folgende Zeichenmodi, die bis auf JAM1 auch miteinander kom¬ 
biniert werden können ('equ'-Werte aufaddieren), können in 
dO eingetragen werden: 

Zeichenmodus Wert Bedeutung 


JAMl 

JAM2 

COMPLEMENT 

INVERSVID 


0 Normal 

1 Gelöschte Punkte in Hintergrundfarbe 

2 Vorhandene Grafik NOT-verknüpfen 

4 Zu zeichnende Grafik invertieren 


JAMl Der 'normale' Zeichenmodus. Gesetzte Punkte wer¬ 

den in der mit SetAPen gewählten Farbe gezeich¬ 
net, bei gelöschten Punkten bleibt die vorher 
vorhandene Grafik erhalten. 
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JAM2 Gesetzte Punkte werden in der SetAPen-Farbe ge¬ 

zeichnet, gelöschte in der SetBPen-(Hintergrund) 
Farbe. Die Grafik an den Stellen mit gelöschten 
Punkten bleibt also nicht erhalten. 

COMPLEMENT Die mit SetAPen und SetBPen eingestellten Farben 

haben hier keine Bedeutung. Die vorher vorhan¬ 
dene Grafik wird komplementiert, d.h. die Farb- 
nummer (Palettennummer, nicht direkte Farbe!) 
des Punktes wird mit NOT-verknüpft. Aus einem 
Punkt mit der Farbe Kr. 9 (binär 1001) würde 
also ein Punkt mit der Farbe 6 (binär 0110), aus 
Farbe 5 {% 101) würde 2 (%010). Von dieser 

Komplementierung sind alle Punkte betroffen, an 
deren Position sich ein gesetzter Punkt im zu 
zeichnenden Objekt befindet. Wird COMPLEMENT mit 
JAM2 kombiniert (egu-Wert 3), sind auch die 
Punkte betroffen, an deren Position sich ein 
gelöschter Objekt-Punkt befindet. Die gesetzten 
und gelöschten Punkte im Objekt werden dann also 
gleich behandelt. 

INVERSVID Eine Kombination mit diesem Wert bewirkt, daß 

die gesetzten und gelöschten Punkte im zu zeich¬ 
nenden Objekt invertiert, also umgedreht werden. 
Vor allem Texte können so sehr leicht invertiert 
ausgegeben werden. 


Eine gute Anwendungsmöglichkeit für den Zeichenmodus COMPLE¬ 
MENT findet man in vielen Malprogrammen: Wenn man dort z.B. 
ein ausgefülltes Rechteck zeichnen will, kann man mit der 
Maus seine Größe bestimmen. Dabei wird bei jeder Mausbewe¬ 
gung ein Rechteck gezeichnet, das die gegenwärtig gewählte 
Größe angibt. Solche Rechtecke werden im Modus COMPLEMENT 
ausgegeben, da man sie dann sehr einfach wieder verschwinden 
lassen kann, nämlich durch nochmaliges Zeichnen in COMPLE¬ 
MENT (Ausgangsgrafik zweimal NOT-verknüpft ergibt wieder die 
Ausgangsgrafik). 


7.3 Einfache Zeichenroutinen 

Zu den einfachen Zeichenroutinen zählen Punkte, Linien, 
Kreise, Blöcke und das Ausfüllen. Legen wir los: 

7.3.1 Punkte: Zeichnen und Farbabfrage 

Um einen einzelnen Punkt auf den Bildschirm zu zeichnen, be¬ 
nutzt man die Routine WritePixel: 
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WritePixel 

= 

-324 (Graphics-Library) 


♦rastPort 

al 

< 

Rastport, in dem gezeichnet werden soll 

X 

dO 

< 

x-Koordinate des Pixels 

Y 

dl 

< 

y-Koordinate des Pixels 

error 

dO 

> 

-1 bedeutet, daß der Punkt außerhalb des 
Rastports lag. 

Erklärung 



Setzt einen Punkt in einem Rastport in 
der mit SetAPen gewählten Farbe 


Wenn wir wissen wollen, welche Farbe ein bestimmter Bild¬ 
punkt hat, verwenden wir die Routine ReadPixel: 


ReadPixel = -318 (Graphics-Library) 


*rastPort 

al 

< 

Auszulesender Rastport 

X 

dO 

< 

x-Koordinate des zu lesenden Punktes 

y 

dl 

< 

y-Koordinate dieses Punktes 

pen 

dO 

> 

Nummer der Farbe in der Palette, die 


dieser Punkt hat oder -1, wenn der Punkt 
außerhalb des Rastports lag 


Erklärung Ermittelt die Farbnummer eines bestimm¬ 

ten Punktes in einem Rastport. 


Wichtig ist, daß diese Routine nicht den direkten Farbwert 
des Punktes liefert, sondern die Palettennummer, mit der der 
Punkt gezeichnet wurde. 

Nun haben wir viel gelernt, was wir in einem 
Komplettprogramm demonstrieren können. Sie finden es im 
Verzeichnis "KAPITEL_7" unter dem Namen "PRG_7_1.S". 
Komplett abdrucken werden wir es nicht (wegen der Länge und 
weil es viele Teile enthält, die in früheren Kapiteln 
beschrieben wurden). 

Das gilt auch für die folgenden Programme. Das Programm öff¬ 
net ein Fenster auf der Workbench, merkt sich die einge¬ 
stellten Farben, stellt dann andere Farben ein und läßt Sie 
mit der Maus Punkte zeichnen. Die linke Taste setzt einen 
Punkt (sie kann auch festgehalten werden) und die rechte 
schaltet zur nächsten Zeichenfarbe weiter. Beim Verlassen 
des Programms (auszulösen durch Klick auf das Close-Gadget) 
werden die gemerkten Workbench-Farben wieder eingestellt. 
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* Programm 7.1 (Auszug): Demonstration GetRGB4, LoadRGB4, WntePixel, 

* SetAPen 


* Diverse Zeiger besorgen 



move.1 

dO,aO 


move.1 

$2e(a0),a0 


lea 

$2c(a0),a0 


move.1 

a0,a5 


move.1 

4(a0),a4 

* Alte 

Workbench- 

-Farben merken 


moveq 

#0 ,d4 


lea 

oldcol,a3 

main2: 

move.1 

a4,a0 


move.1 

d4,d0 


jsr 

move.w 

asl.w 

move.w 

addq 

GetRGB4(a6) 

d4,dl 

#l,dl 

d0,0(a3,dl.w) 

#l,d4 


cmp.b 

#4,d4 


blt 

main2 

* Neue 

Farben einstellen 


move.1 

a5,a0 


lea 

colors,al 


moveq 

#4,d0 


jsr 

LoadRGB4(a6) 


mbutton: 


cmp. 1 

#$68,d5 

beq 

mbl 

cmp.l 

#$e8,d5 

beq 

mb2 

cmp.l 

#$69,d5 

bne 

mb3 

* Farbnummer erhöhen 

add.b 

#l,drawcol 

cmp.b 

#3,drawcol 

ble 

mb3 

move.b 

#0,drawcol 

bra 

mb 3 

mbl: move.b 

#l,drawon 

bra 

mmove 


Window nach aO 

Zeiger auf Screen 

Jetzt zum ViewPort 

ViewPort merken 

Zeiger auf ColorMap merken 


Zähler für Farben 

Zeiger auf Feld für alte Farben 

ColorMap nach aO 

Farbnummer 


Farbe in Farbfeld eintragen 


ViewPort-Zeiger nach al 
Zeiger auf Farbfeld nach al 
Setze 4 Farben 
LoadRGB4 aufrufen 


Linke Taste gedrückt? 
Wenn ja 

Linke Taste losgelassen? 
Wenn ja 

Rechte Taste gedrückt? 
Wenn nein 


Nächste Farbe anwählen 
Höchste Farbnummer überschritten? 
Wenn nein 
Zur Farbe 0 zurück 


Zeichnen aktivieren 
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mb2: 

clr .b 

drawon ; 

Zeichnen deaktivieren 

mb3: 

bra 

mainl ; 

Zur Hauptschleife 

mmove: 

tst.b 

beq 

drawon ; 

mml ; 

Zeichnen aktiviert? 
Wenn nein 

* Punkt 

an Mauskoordinaten setzen 



move.1 
move.1 
move.b 
jsr 

gfxbase,a6 
a4,al ; 

drawcol,d0 ; 

SetAPen(a6) ; 

Rastport nach al 

Farbe nach do 

Farbe setzen 


move.1 
move.w 

move.w 

jsr 

a4,al ; 
d6,d0 ; 
d7,dl 

WritePixel(a6); 

Rastport 

Maus-x-Position 

Maus-y-Position 

Punkt zeichnen 

mml: 

bra 

mainl ; 

Zur Hauptschleife 


Programm 7.1 (Auszug) 


Zunächst besorgen wir uns diverse Zeiger. In der Window- 
Struktur (Zeiger in aO) steht ab Offset $2e der Zeiger auf 
den Screen, auf dem das Fenster liegt. In dessen Struktur 
ist ab $2c ein ViewPort eingebettet (deshalb LEA und nicht 
MOVE.L), und in diesem ab Offset 4 der ColorMap-Zeiger. 

Nun müssen wir uns die derzeitig eingestellten Workbench- 
Farben merken. d4 wird unser Farbnummer-Zähler, in a3 kommt 
die Startadresse des vier Worte großen Puffers. Dann rufen 
wir für jede der vier Farben GetRGB4 auf und schreiben das 
Ergebnis nach a3 (Pufferstart) plus d4 (Farbnummer) mal 2 
(ein Wort oder zwei Bytes pro Farbe). 

Nachdem wir mit LoadRGB4 unsere Farben eingestellt haben, 
können wir auf Nachrichten vom Fenster warten. Wenn eine 
Meldung eintrifft, merken wir uns die wichtigen Werte aus 
der IntuiMessage (dass, Code, MouseX und MouseY). Als 
Nachricht lassen wir CLOSEWINDOW (Sprung zum Programmende), 
MOUSEBUTTONS und MOUSEMOVE zu. 

In der MOUSEBUTTONS-Routine wird geprüft, was mit welcher 
Maustaste angestellt wurde. Bei Drücken der linken Taste 
wird ein Flag gesetzt, daß ab jetzt gezeichnet werden soll. 
Bei Loslassen der linken Taste wird selbiges gelöscht. Bei 
Druck auf die rechte Taste wird die Zeichenfarbnummer um 
eins erhöht und auf 0 gesetzt, wenn die 3 überschritten 
wurde (die Workbench hat die Farben 0-3). Im Falle von linke 
Taste gedrückt wird zur Zeichenroutine gesprungen, ansonsten 
zur Hauptschleife. 
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Die Zeichenroutine, die immer bei Verwendung von MOUSEMOVE 
aufgerufen wird, ist ganz einfach. Wenn das Zeichen-Flag 
gesetzt ist, wird die Zeichenfarbe mit SetAPen eingestellt 
und an die Maus-Koordinaten (gemerkt zum Zeitpunkt des 
Eintreffens der MOUSEMOVE-Nachricht) mit WritePixel ein 
Punkt gesetzt. 

In der Finish-Routine werden vor dem Schließen des Fensters 
usw. die alten Farben per LoadRGB4 wieder eingestellt. 

Wenn Sie das Programm ausprobieren, wird Ihnen bestimmt auf- 
fallen, daß bei schnellen Mausbewegungen keine durchgezoge¬ 
nen Linien gezeichnet werden. Das liegt daran, daß Intuition 
die Mausposition nur in gewissen Intervallen abfragen kann 
und deshalb bei hoher Geschwindigkeit einige Positionen 
"verpaßt". Im nächsten Beispielprogramm werden wir dieses 
Manko ausgleichen. 


7.3.2 Setzen des Stiftes und Zeichnen von Linien 

In jedem Rastport gibt es einen sog. "Zeichenstift", der auf 
einen Punkt zeigt und daher auch punkt-genau zu setzen ist. 
Seine derzeitige Position ist in der RastPort-Struktur ver¬ 
merkt. Diesen Stift kann man über den Rastport bewegen, und 
zwar entweder mit oder ohne gleichzeitigem Zeichnen. Die Be¬ 
wegung ohne Zeichnen besorgt die Move-Routine: 


Move 



= -240 (Graphics-Library) 

*rastPort 

al 

< 

Rastport, dessen Stiftposition geändert 
werden soll 

X 

do 

< 

Neue x-Position 

y 

dl 

< 

Neue y-Position 

Erklärung 



Versetzt den Zeichenstift in einem Rast- 
Port, ohne dabei zu zeichnen. 


Das Verschieben mit Zeichnen besorgt die Draw-Routine: 


Draw = -246 (Graphics-Library) 


»rastPort 

al 

< Rastport, dessen Stiftposition 
werden soll 

geändert 

X 

dO 

< Neue x-Position 


y 

dl 

< Neue y-Position 


Erklärung 


Versetzt den Zeichenstift in einem Rast- 
Port und zeichnet dabei eine Linie in 
der APen-Farbe mit dem LinePtrn-Muster 
von der alten Stiftposition zur neuen. 
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Nun ist klar, wie man eine Linie zeichnet: Man setzt den 
Zeichenstift mit Move auf den Startpunkt und zieht ihn mit 
Draw zum Endpunkt. Sie haben vielleicht erwartet, daß es nur 
eine Graphics-Linienroutine gibt, der man Start- und End¬ 
punkt übergeben muß. Die verwendete Methode mit den zwei 
Routinen bietet aber Vorteile, wenn man zusammenhängende Li¬ 
nien zeichnet, also der Endpunkt einer Linie gleichzeitig 
der Startpunkt der nächsten ist. Dann braucht man jeweils 
für jede Linie nur den nächsten Endpunkt anzugeben - der 
Startpunkt ist ja durch den Zeichenstift, der beim Zeichnen 
der letzten Linie mit verschoben wurde, festgelegt. 

Außerdem gibt es noch einige weitere Routinen, die sich auf 
die mit Move (oder Draw) gewählte Zeichenstiftposition be¬ 
ziehen, z.B. Text oder ClearEOL. 

Mit unserem jetzigen Wissen können wir das letzte Beispiel¬ 
programm noch etwas aufpeppen: Es hatte ja den Nachteil, daß 
aufgrund der intervallartigen Mausabfrage durch Intuition 
bei schnellen Mausbewegungen keine durchgezogenen Linien ge¬ 
zeichnet wurden. Das werden wir nun ändern. Das zugehörige 
Programm finden Sie unter dem Namen "PRG_7_2.S" auf der Dis¬ 
kette. 


* Programm 7.2 (Auszug): Demonstration GetRGB4, LoadRGB4, SetAPen, 
WritePixel, Move, Draw 


move.1 

a4,al 

Rastport nach al 

move.b 

drawcol,dO 

Farbe nach dO 

jsr 

SetAPen(a6) 

Farbe setzen 

move.1 

a4,al 

: Rastport 

move.w 

d6,d0 

; Maus-x-Position 

move.w 

d7,dl 

; Maus-y-Position 

jsr 

WritePixel(a6); 

Punkt zeichnen 

move.1 

a4,al 

: Rastport 

move.w 

d6,d0 

: x-Pos 

move.w 

d7,dl 

: y-Pos 

jsr 

Move(a6) 

: Zeichenstift repositionieren 


move.1 

a4,al 

; Rastport 

move.w 

d6,d0 

; Maus-x-Position 

move.w 

d7,dl 

; Maus-y-Position 

jsr 

Draw(a6) 

; Linie zum neuen Punkt ziehen 


Programm 7.2 (Auszug) 
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Viel hat sich nicht geändert. In der Routine, die das Drük- 
ken der linken Maustaste bearbeitet, wird neben dem Setzen 
des Zeichen-Flags an die angeklickte Position ein Punkt ge¬ 
setzt und außerdem der Zeichenstift mit Move dorthin ge¬ 
bracht. In der Routine für Mausbewegungen wurde lediglich 
der WritePixel-Aufruf durch einen Draw-Aufruf ersetzt. 

Ergebnis: Wird die Maustaste nur gedrückt und wieder losge¬ 
lassen, wird an dieser Stelle ein Punkt gesetzt (mit Wri- 
tePixel in der mbutton-Routine). Wird bei gedrückter Taste 
die Maus bewegt, werden Linien gezeichnet, wodurch die In¬ 
tervall-Tastenabfrage von Intuition "überlistet" wird und 
durchgezogene Linien erscheinen. 


Zeichnen von mehreren Linien mit PolyDraw 

Für den Fall, daß Sie mehrere Linien hintereinander zeichnen 
wollen, brauchen Sie nicht für jede die Draw-Routine aufzu¬ 
rufen. Es gibt eine Routine, die man als "Abkürzung" einset- 
zen kann, und zwar PolyDraw: 


PolyDraw = -336 (Graphics-Library) 


♦rastPort 

♦polyTable 

count 


al < Rastport, in dem gezeichnet werden soll 
aO < Zeiger auf die Tabelle, die die Linien- 
Koordinaten enthält 

do < Anzahl der zu zeichnenden Linien 


Erklärung Zeichnet mehrere Linien, deren Koordina¬ 

ten aus einer Tabelle gelesen werden, in 
einen Rastport (Abkürzung für mehrmali¬ 
gen Aufruf von Draw). 


In der Tabelle werden für jede Linie die Koordinaten des 
Zielpunktes angegeben. Die x- und y-Koordinaten sind jeweils 
ein Wort groß. Da der Zeichenstift beim Linienzeichnen mit¬ 
bewegt wird, ist der Endpunkt jeder Linie gleichzeitig der 
Anfangspunkt der nächsten (genau wie bei Draw). Ein Beispiel 
für einen PolyDraw-Aufruf, der ein Quadrat auf den Bild¬ 
schirm zeichnet: 


move.1 

a4,al 

; Rastport stehe in a4 

move.1 

#100,do 

; Das Quadrat soll bei 100/100 beginnen, 

move.1 

#100,dl 

; dazu muß der Stift dorthin geMovet 

jsr 

-240(a6) 

; werden, da PolyDraw wie Draw arbeitet 

lea 

poly,a0 

; Zeiger auf Punkt-Tabelle 

move.1 

#5,d0 

; Zeichne 4 Linien 

jsr 

—336(a6 

; PolyDraw anspringen 
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poly: 

dc.w 

150,100 

; Zeichne nach 150/100 


dc.w 

150,150 

; Dann nach 150/150 


dc.w 

150,100 

; usw. 


dc.w 

100,100 



Bild 7.1: Zeichnen von mehreren Linien mit PolyDraw 


Änderung des Linienmusters 

Nun zum Linienmuster. In der Rastport-Struktur gibt es ab 
Offset 34 einen Wort-Eintrag namens rp_LinePtrn. Dieses Wort 
dient in Binärdarstellung als Pixel-Muster, in dem alle Li¬ 
nien gezeichnet werden. Ein gesetztes Bit im Muster erzeugt 
einen gesetzten Punkt und ein gelöschtes Bit einen gelösch¬ 
ten Punkt. Falls die zu zeichnende Linie länger als 16 Pixel 
(so viele Bits hat ein Wort) ist, wird im Muster wieder von 
vorne begonnen. Der Standardwert für das Muster ist $FFFF 
(alle Bits gesetzt, durchgezogene Linie). 

Das Muster kann jederzeit durch Zugriff auf den Rastport ge¬ 
ändert werden. Um ein unterbrochenes Linienmuster anzuwäh¬ 
len, könnte folgender Befehl dienen: 

move.w f%1010101010101010,34(al) oder 
move.w #$aaaa,34(al) 

wenn der Rastport-Zeiger in al steht. 


7.3.3 Zeichnen von Kreisen und Ellipsen 

Eine Ellipse ist im Prinzip ein Kreis mit getrennt anzuge¬ 
benden Radien für die horizontale und vertikale Richtung. 
Der Amiga geht den "umgekehrten" Weg: Er stellt nur eine 
Routine zum Zeichnen von Ellipsen zur Verfügung; einen Kreis 
erstellt man einfach als Ellipse mit identischen Radien. Die 
zuständige Routine heißt DrawEllipse: 


DrawEllipse = -180 (Graphics-Library) 


♦rastPort 

al 

< 

Rastport, in dem gezeichnet werden soll 

cx 

dO 

< 

x-Koordinate des Mittelpunkts 

cy 

dl 

< 

y-Koordinate des Mittelpunkts 

a 

d2 

< 

Horizontaler Radius 

b 

d3 

< 

Vertikaler Radius 

Erklärung 



Zeichnet eine Ellipse in der APen-Farbe 


in einen Rastport 


Wichtig ist, daß Sie die Auflösung des Screens beachten, auf 
den Sie zeichnen wollen. Beispiel: Bei einem Screen mit ho¬ 
rizontal hoher und vertikal niedriger Auflösung wirkt sich 
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der Vertikalradius doppelt so stark aus wie der Horizontal¬ 
radius, da die Pixel doppelt so hoch wie breit sind. Wenn 
Sie die Radien gleich einstellen, wird die Ellipse also dop¬ 
pelt so hoch wie breit sein. Um Kreise auf solchen Screens 
zu zeichnen, muß der Horizontalradius immer doppelt so groß 
sein wie der Vertikalradius. Bei Screens mit anderen Auflö¬ 
sungen gilt Entsprechendes. Falls die Auflösungen des 
Screens horizontal und vertikal gleich sind, können Sie die 
Radien "ganz normal" wählen. 

Zum Thema Ellipsen wollen wir uns auch ein Demoprogramm an¬ 
schauen. Es zeichnet eine Anzahl von konzentrischen Ellipsen 
mit variierenden Vertikal- und Horizontalradien in einen 
Screen mit vertikal und horizontal niedriger Auflösung, also 
einem LORES-Screen (damit es keinen Ärger mit den Radien 
gibt). Das Programm steht unter "PRG_7_3.S" auf der Dis¬ 
kette . 

Der Kern des Programms steckt in einer Schleife, in der 
zunächst eine Ellipse mit festem Mittelpunkt und variablen 
Radien ausgegeben wird: 


mainl: move.l 

a4,al ; 

Rastport nach al 

move.1 

# 160 , do 

Mittelpunkt: Bildschirmmitte 

move.1 

#125,dl 


move.1 

xrad,d2 ; 

Radien nach d2 und d3 

move.1 

yrad,d3 


jsr 

DrawEllipse(a6) 


Die Variablen 

xrad und yrad 

finden Sie im Datenbereich 


xrad: dc.l 140 ; Merker für x-Radius 

yrad: dc.l 0 ; Merker für y-Radius 

Die Ellipse startet also mit einem x-Radius von 140 und ei¬ 
nem y-Radius von 0. Das entspricht einer waagerechten Linie, 
die in der Mitte des Bildschirms liegt. Bei jedem Schleifen¬ 
durchlauf werden nun die Radien verändert: 


sub.l 

#7,xrad 

x-Radius plus 7 

add.l 

#5,yrad 

y-Radius minus 5 

cmp.l 

# 120 ,yrad 

y-Radius größer als 120? 

bgt 

finish 

Wenn ja, Ende 

cmp.l 

#0,xrad 

x-Radius unter Null? 

blt 

finish 

Wenn ja 

bra 

mainl 

Nächste Ellipse 


Der x-Radius wird jeweils um 7 kleiner und der y-Radius um 5 
größer. Die Ellipse wird also immer höher und immer schmä¬ 
ler. Beendet wird die Schleife, wenn entweder der y-Radius 
120 überschreitet oder der x-Radius kleiner als 0 wird (ein 
DrawEllipse-Aufruf mit negativen Radien gibt nämlich einen 
Absturz). Das Ergebnis ist eine interessante Figur, die Sie 
sich am besten im Programm selbst anschauen. Sie können mit 
den Radien-Werten und den sub- und add-Befehlen nach Her¬ 
zenslust experimentieren. 
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7.3.4 Normale und ausgefüllte Rechtecke 

Zum Zeichnen eines nicht-ausgefüllten Rechtecks gibt es 
keine besondere Routine, Sie müssen dies mit einem Move- und 
vier Draw-Befehlen erledigen. Beispiel: Um ein Rechteck zu 
zeichnen, dessen Ecken bei den Koordinaten 50,50 (linke 
obere Ecke) und 100,100 (rechte untere Ecke) liegen, gehen 
Sie folgendermaßen vor: 

- Move nach 50,50 

- Draw nach 50,100 

- Draw nach 100,100 

- Draw nach 100,50 

- Draw nach 50,50 

Sie fahren also die vier Seiten des Rechtecks ab. Zur 
Erstellung eines ausgefüllten Rechtecks gibt es jedoch eine 
Graphics-Routine: 


RectFill = -306 (Graphics-Library) 


*rastPort 

al 

< 

Rastport 

, in 

dem gezeichnet werden soll 

xl 

dO 

< 

x-Koord. 

der 

linken oberen Ecke 

yi 

dl 

< 

y-Koord. 

der 

linken oberen Ecke 

XU 

d2 

< 

x-Koord. 

der 

rechten unteren Ecke 

yu 

d3 

< 

y-Koord. 

der 

rechten unteren Ecke 

Erklärung 



Zeichnet 

ein Rechteck im angegebenen 




Rastport 

in 

der APen-Farbe und füllt es 


in der gleichen Farbe aus. 


Beachten Sie, daß die End-Koordinaten (rechte untere Ecke) 
des Rechtecks nicht oberhalb bzw. links von den Startkoordi¬ 
naten liegen dürfen (d2 bzw. d3 also kleiner sind als do 
bzw. dl). In diesem Fall gibt es nämlich einen (meistens 
grafisch recht intensiven) Absturz. 

Das Rechteck-Beispielprogramm dient gleichzeitig auch der 
Demonstration des COMPLEMENT-Zeichenmodus. Es öffnet ein 
Window auf der Workbench und läßt Sie mit der Maus ausge¬ 
füllte Rechtecke zeichnen. Sie müssen zuerst die linke obere 
Ecke anfahren, dann die linke Taste festhalten, zur rechten 
unteren Ecke fahren und die Taste loslassen. Während der 
Mausbewegung bei gedrückter Taste werden Sie sehen, daß je¬ 
weils die Momentangröße des Rechtecks gezeigt wird, und zwar 
durch Komplementierung der schon vorhandenen Grafik. Dadurch 
kann das "Derzeit-Rechteck" leicht wieder entfernt werden, 
nämlich einfach durch nochmaliges Zeichnen (siehe auch Ab¬ 
schnitt "Einstellen des Zeichenmodus", 7.2.3). Sie finden 
das Programm unter "PRG_7_4.S" auf der Diskette. 
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* Programm 7.4 (Auszug): Demonstration RectFill und Zeichenmodus 
COMPLEMENT 


mbl: 

move.1 

gfxbase,a6 



move.b 

move.w 

move.w 

move.w 

move.w 

#l,recton 

d6,xs 

d7,ys 

d6,xe 

d7,ye 

; Zeichnen aktivieren 


move.1 

moveq 

jsr 

a4,al 

#2,d0 

SetDrMd(a6) 



move.1 
move.w 

move.w 

jsr 

a4,al 

xs,dO 

ys,dl 

WritePixel(a6) 



bra 

mainl 


mb2: 

move.1 
clr.b 

gfxbase,a6 

recton 

; Zeichnen deaktivieren 


move.1 

clr.l 

jsr 

a4,al 

dO 

SetDrMd(a6) 



move.1 
move.b 
jsr 

a4,al 

rectcol,d0 
SetAPen(a6) 



bsr 

drawrect 


mmove: 

tst.b 

beq 

recton 

mainl 

; Zeichnen aktiviert? 

; Wenn nein 


move.1 

gfxbase,a6 



bsr 

drawrect 



move.w 

move.w 

d€,xe 

d7,ye 



bsr 

drawrect 



bra 

mainl 

; Zur Hauptschleife 
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drawrect: 

move.1 


move.w 

xs,dO 


move.w 

ys,dl 


move.w 

xe,d2 


move.w 

ye,d3 


cmp.w 

d0,d2 


bge 

drl 


exg 

d0,d2 

drl: 

cmp.w 

dl,d3 


bge 

dr2 


exg 

dl ,d3 

dr2: 

jsr 

RectFill(a6) 


rts 



Programm 7.4 (Auszug) 


Das Programm arbeitet wieder mit Auswertung der Messages 
MOUSEBUTTONS und MOUSEMOVE. In der Routine 'linke Taste ge¬ 
drückt' wird eine Marke gesetzt, die anzeigt, daß ab jetzt 
die "Derzeit-Rechtecke" gezeichnet werden sollen. In die 
Variablen xs, ys, xe und ye, welche die Start- und 
Endkoordinaten des Rechtecks beinhalten, werden die 
derzeitigen Mauskoordinaten geschrieben. Anschließend wird 
der Zeichenmodus COMPLEMENT eingeschaltet und an die 
Mausposition ein Punkt gesetzt. 

In der Routine 'linke Taste losgelassen' wird das Rechteck- 
Flag gelöscht, der Zeichenmodus wieder auf JAM1 zurückge¬ 
stellt, die Farbe gemäß dem Inhalt der Variablen "rectcol" 
eingestellt und die Rechteck-Zeichen-Unterroutine "drawrect" 
aufgerufen. 

Beim Bewegen der Maus wird zuerst das vorige Rechteck ge¬ 
löscht, indem es in COMPLEMENT noch einmal an die gleiche 
Stelle gezeichnet wird. Danach ist wieder die Grafik, die 
vor dem Zeichnen des Rechtecks da war, zu sehen. Dann wird 
die Rechteck-Endkoordinate in den Variablen xe und ye auf 
den aktuellen Mausstand gesetzt und das Rechteck erneut ge¬ 
zeichnet . 

Die Rechteckzeichen-Unterroutine schließlich versorgt die 
Register mit den für RectFill notwendigen Daten. Falls die 
Endkoordinate für x oder y kleiner sein sollte als die 
Startkoordinate (was ja nicht sein darf), werden Start und 
Ende entsprechend vertauscht. Das dient dazu, daß man die 
Rechtecke in alle Richtungen zeichnen kann. 

Zeichenprogramme bieten gewöhnlich die Funktion des Linien¬ 
zeichnens, wobei der Start- und Endpunkt auf die gleiche 
Weise mit der Maus bestimmt wird, wie beim Zeichnen von 
Rechtecken. Unsere Methode mit dem COMPLEMENT-Zeichnen kön¬ 
nen wir auch problemlos auf Linien übertragen. Im Programm 
"PRG_7_5.S" ist dies geschehen. 
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* Programm 7.5 (Auszug): Demonstration Move, Draw und Zeichenmodus 
COMPLEMENT 


drawline: 


move.1 

a4,al 

move.w 

xs,dO 

move.w 

ys,dl 

jsr 

Move(a6) 

move.1 

a4 ,al 

move.w 

xe,dO 

move.w 

ye,dl 

Draw(a6) 

jsr 

rts 



Programm 7.5 (Auszug) 


Das einzige, was sich an diesem Programm geändert hat, ist 
die Haupt-Zeichenroutine (jetzt "drawline" und nicht mehr 
"drawrect"). Hier wird per Move der Startpunkt der Linie an¬ 
gesprungen und per Draw die Linie zum Endpunkt gezogen. Ein¬ 
fach, aber wirkungsvoll. 


7.3.5 Das Ausfüllen von Flächen 

Manchmal will man noch weitere ausgefüllte Figuren 
erstellen. Dazu muß man zuerst die Umrandung der Figur mit 
Draw, Ellipse o.ä. zeichnen und diese anschließend aus¬ 
füllen. Bevor wir die Routine benutzen können, müssen wir 
allerdings ein bißchen Vorarbeit leisten. 


Die temporären Rastports 

Ein temporärer (zeitweiser) Rastport ist guasi ein Grafik- 
Zwischenspeicher, der in bestimmten Fällen von der Füllrou¬ 
tine benötigt wird. Welche Fälle das sind, werden wir gleich 
sehen. Jetzt wollen wir zuerst erfahren, wie man diesen tem¬ 
porären Grafikspeicher anmelden kann. Dazu benötigen wir 
eine neue (sehr kurze) Struktur: 

Die TmpRas-Struktur (Temporal Rastport) 


00 

dc.l 

*tr_RasPtr 

; Zeiger auf den Speicherbereich 

04 

dc.l 

tr Size 

; Größe dieses Bereichs 

08 


tr SIZEOF 
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*tr_RasPtr 

Ein Zeiger, der auf den Beginn des Speicherbereiches weist, 
der für den zeitweisen Rastport verwendet werden soll. 

tr_size 

Die Größe des Grafikzwischenspeichers. Er muß mindestens so 
groß sein, daß das größte auszufüllende Objekt hineinpaßt, 
also im Zweifelsfalle die Größe des Bildschirms besitzen. 


Diese Struktur richtet man am besten auf folgende Weise ein: 

Zuerst läßt man sich vom System Speicherbereich für den tem¬ 
porären Rastport reservieren. Dafür stellt Graphics eine 
komfortable Routine zur Verfügung, der man nur die benötigte 
Höhe und Breite der Grafik mitteilt. Sie rechnet dann 
automatisch die Byte-Größe der Grafik aus und reserviert 
entsprechend Speicherplatz im Chip-Memory. Die Reservierung 
von Speicherbereich wird im Exec-Kapitel noch vertieft 
werden. 


AllocRaster = -492 (Graphics-Library) 


dO < Breite des Grafik-Rasters in Punkten 
dl < Höhe des Grafik-Rasters in Punkten 

do > Start des reservierten Speicherbereichs 
oder 0, falls nicht genügend freier 
Speicher verfügbar war. 

Rechnet aus der Grafikhöhe und -breite 
die benötigte Speicherplatzgröße aus und 
reserviert diesen Speicherplatz im Chip- 
Memory . 


Sie können den Speicherplatz für den temporären Rastport na¬ 
türlich auch selbst bereitstellen (z.B. mit einem 'ds.b'-Be- 
fehl), müssen aber dafür sorgen, daß der Speicherbereich im 
Chip-Memory liegt, da die Graphics-Routinen ihn zum Zugriff 
auf die Grafikhardware benutzen, die ihrerseits nur auf das 
Chip-Memory zugreifen kann. 

Als nächstes müssen Start und Größe des reservierten 
Speicherbereich in die eben vorgestellte TmpRas-Struktur 
eingetragen werden. Das könnte man "von Hand" (mit MOVE- 
Befehlen) tun, doch es gibt dafür auch eine Graphics- 
Routine: 


width 

height 

*planeptr 

Erklärung 


InitTmpRas = -468 (Graphics-Library) 


*tmpras aO < Zeiger auf den Speicherbereich, in dem 

die TmpRas-Struktur eingerichtet werden 
soll 
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*buff al < Startadresse des Speicherbereichs für 

der temporären Rastport 

size dO < Größe des Rastport-Speicherbereichs 

Erklärung Stellt aus den Angaben in al und dO eine 

TmpRas-Struktur ab der Adresse in aO zu¬ 
sammen . 


Die 8 Bytes für die TmpRas-Struktur stellt man am günstig¬ 
sten mit einem 'ds.b'-Befehl im Programm bereit. Nachdem die 
TmpRas-Struktur eingerichtet ist, braucht man nur noch einen 
Zeiger auf sie in der RastPort-Struktur des Rastports, in 
dem ausgefüllt werden soll, zu setzen. Er muß im Langwort 
rp_TmpRas (Offset 12) abgelegt werden. Das waren die 
Vorarbeiten, nun können wir das eigentliche Füllen 
besprechen. 


Die Flood-Routine 

Die Routine, die beliebig begrenzte Flächen ausfüllt, heißt 
Flood (zu deutsch Flut): 


Flood = -330 (Graphics-Library) 


♦rastPort 

al 

< 

X 

do 

< 

y 

dl 

< 

mode 

d2 

< 


Rastport, in dem gefüllt werden soll 
x-Koordinate eines beliebigen Punktes 
innerhalb der zu füllenden Fläche 
y-Koordinate dieses Punktes 
Füllmodus 


Erklärung 


Füllt eine beliebig begrenzte Fläche in 
einem Rastport mit der APen-Farbe aus 


Für den Füllmodus kann eine 0 oder 1 angegeben werden. Bei 
einer 0 wird der Bildschirm, egal welche Farbe er hat, so¬ 
weit ausgefüllt, bis Flood auf Punkte in der Begrenzungs¬ 
farbe, die im AOLPen-Eintrag des Rastports festgelegt ist 
(siehe Abschnitt Wechseln der Zeichenfarben, 7.2.2), trifft. 
Sie müssen hier aufpassen, daß die Begrenzungslinien in der 
AOLPen-Farbe keine Lücken aufweisen, da der Bildschirm sonst 
"überläuft" (die Bezeichnung Flood ist dann recht wörtlich 
zu nehmen). 

Bei Benutzung dieses Füllmodus ist die Einrichtung eines 
temporären Rastports nicht unbedingt nötig. Fehlt er, so 
kann man den Ablauf des Füllvorgangs, der je nach Größe der 
zu füllenden Fläche einige Sekunden dauern kann, am Bild¬ 
schirm verfolgen. Wurde aber ein TmpRas eingerichtet, ge¬ 
schieht die eigentliche Berechnung des Füllvorgangs 
"verdeckt", nämlich im temporären Rastport, der nicht auf 
dem Bildschirm zu sehen ist. Erst wenn das Füllen beendet 
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ist, wird der "richtige" Zeichenrastport aktualisiert, das 
Ausfüllen geschieht also quasi "auf einen Schlag". 

Eine 1 als Füllmodus bewirkt, daß nur Punkte, die die glei¬ 
che Farbe haben wie der, der mit x und y im Routinenaufruf 
festgelegt ist, ausgefüllt werden. Jede andere Farbe als die 
des x/y-Punktes gilt hier als Begrenzungsfarbe. Für diesen 
Füllmodus ist die Einrichtung eines temporären Rastports al¬ 
lerdings unerläßlich. 

Wenn man den temporären Rastport nicht mehr braucht, sollte 
man den von ihm belegten Speicher wieder freigeben, da dies 
nicht automatisch beim Programmende geschieht. 

Zur Freigabe dient die Routine FreeRaster: 


FreeRaster = -498(Graphics-Library) 


*planeptr 

aO 

< Zeiger auf den mit AllocRaster reser¬ 
vierten Speicherbereich 

width 

do 

< Seine Breite in Punkten 

height 

dl 

< Seine Höhe in Punkten 

Erklärung 


Gibt mit AllocRaster reservierten 

Speicherbereich wieder frei. 


Vor der Freigabe mit dieser Routine sollte der Eintrag 
rp_TmpRas in der Rastport-Struktur wieder gelöscht werden, 
damit nicht "aus Versehen" Fülloperationen mit nicht mehr 
reservierten Speicher vorgenommen werden (Guru-Gefahr). 


Einstellung des Füllmusters 

Die Flood-Routine füllt Flächen standardmäßig vollständig 
aus. Falls Sie ein eigenes Füllmuster benutzen möchten, müs¬ 
sen Sie auf zwei Einträge in der RastPort-Struktur zugrei¬ 
fen. In den Eintrag rp_AreaPtrn (Offset 8) muß ein Zeiger 
auf ein Datenfeld, das das Füllmuster angibt, weisen. In 
diesem Datenfeld steht für jede Zeile des Musters ein Wort. 
Sie müssen also für jede Zeile eine Folge von 16 gesetzten 
oder gelöschten Punkten (Bits) angeben, die sich bei 
größeren Füllflächen wiederholen wird. Die Anzahl der Zeilen 
wird im Byte-Eintrag rp_AreaPtSz (Offset 29) angegeben. Der 
Wert, den man dort hineinschreibt, muß dabei 2 Zeilenzahl 
betragen, also 0 für eine Zeile, 1 für zwei Zeilen, 2 für 4 
Zeilen usw. Bei Füllflächen, die höher sind als das 
Füllmuster, wird sich dieses auch in der vertikalen Richtung 
wiederholen. Das so eingestellte Füllmuster gilt für alle 
Graphics-Routinen, die irgendetwas ausfüllen, so auch 
RectFill und die Area-Routinen (letztere kommen später). Ein 
kleines Beispiel: Die folgende Befehlssequenz stellt ein 
schraffiertes Füllmuster, das acht Zeilen hoch ist, ein. 
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move.l rp,al ; Rastport nach al 

move.l #ptrn,8(al) ; Beginn der Pattern-Daten 

move.b #3,29(al) ; Das Pattern ist 2 3 =8 Zeilen hoch 


ptrn: dc.w %1111000011110000 

dc.w %0111100001111000 
dc.W %0011110000111100 
dc.w %0001111000011110 
dc.w %0000111100001111 
dc.w %1000011110000111 
dc.w %110000U11000011 

dc.w *1110000111100001_ 

Bild 7.2: Einstellung eines Schraffur-Füllmusters 


Dieses Muster findet auch im Beispielprogramm "PRG_7_6.S" 
Verwendung. Das Programm öffnet ein Window auf der Workbench 
und füllt es mit dem Schraffur-Muster aus. Auch können Sie 
die Anwendung von AllocRaster, InitTmpRas und FreeRaster in 
diesem Programm in der Praxis sehen: Mit 


move.1 

#640,dO 

Breite 640 Pixel 

move.1 

#256,dl 

Höhe 256 Pixel 

jsr 

AllocRaster(a6) 

Speicher für TmpRas holen 

tst.l 

dO 

keinen bekommen? 

heg 

ende 

Wenn ja, Ende 

move.1 

dO, rasmein 

Speicher merken 


reservieren wir genug Speicher für einen 640 Punkte breiten 
und 256 Punkte hohen Rastport. Wir prüfen, ob wir den 
Speicher erfolgreich erhalten haben, springen im Fehlerfalle 
(dO steht auf 0) zum Ende und sichern ansonsten den Start 
des Speicherbereichs. Dann legen wir die TmpRas-Struktur an: 

lea tmpras,aO ; Zeiger auf 8 Bytes für TmpRas 

move.l rasmem,al ; Adresse des Rastport-Speichers 

move.l #20480,dO ; Länge: 20480 Bytes 

jsr InitTmpRas(a6) ; TmpRas-Struktur einrichten 

Wir füllen sie mit dem Start und der Größe unseres reser¬ 
vierten Speicherbereichs. Die Berechnung der Byte-Anzahl 
funktioniert so: Man teile die Breite der Grafik durch 8, da 
jeder Punkt durch ein Bit dargestellt wird und jedes Byte 8 
Bit hat. Dann nehme man das Divisionsergebnis mit der Höhe 
der Grafik mal. So berechnet auch die AllocRaster-Routine 
den Speicherplatzbedarf. 

Den Beginn der TmpRas-Struktur müssen wir noch mit 

lea tmpras,a0 ; Zeiger auf TmpRas 

move.l aO,12(a4) ; in RastPort eintragen 
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in den Rastport eintragen. Dann setzen wir die Zeichenfarbe 
(wir benutzen Farbe 1) und tragen Start und Größe des Füll¬ 
musters mit 

move.l #patt,8(a4) ; Beginn der Pattern-Daten 

move.b #3,$ld(a4) ; Das Pattern ist 2~3=8 Zeilen hoch 

in den Rastport ein (in a4 haben wir den Zeiger auf ihn ge¬ 
sichert). Nun können wir die Flood-Routine aufrufen: 


move.1 

a4,al 

; Rastport 

move.1 

#1 ,d2 

; Füll-Modus = 1 

move.1 

#100,dO 

; Beliebige Koordinate im auszu 

move.1 

#100,dl 

; füllenden Fenster 

jsr 

Flood(a6) 

; Füllen ausrufen 


Die Koordinaten können für jeden beliebigen Punkt innerhalb 
der zu füllenden Fläche stehen. Wir benutzen den Füllmodus 
1, wodurch der gesamte Innenraum des Fensters bis hin zum 
Rand gefüllt wird. Das geschieht daher, weil wir als Start¬ 
punkt für das Füllen einen Punkt mit der Farbe 0 gewählt ha¬ 
ben (an den Koordinaten 100/100 steht in dem neu geöffneten 
Fenster sicher nichts). Flood füllt im Modus 1 alle Punkte, 
die die gleiche Farbe wie der Startpunkt haben, wobei alle 
anderen Farben als Begrenzung fungieren (in unserem Fall der 
andersfarbige Fensterrahmen). 

Nach dem obligatorischen Warten auf den Closegadget-Klick 
wird der Eintrag für den temporären Rastport wieder aus der 
Rastport-Struktur gelöscht 

clr.l 12(a4) ; TmpRas-Eintrag im Rastport löschen 

und der vorher reservierte Speicherbereich freigegeben: 

move.l rasmem,aO ; Raster-Speicher freigeben 

move.l #640,do 

move.l #256,dl 

jsr FreeRaster(a6) 

Da wir den Füllmodus 1 benutzt haben, mußten wir einen tem¬ 
porären Rastport einrichten. Hätten wir 0 benutzt, wäre es 
auch ohne gegangen, dann hätten wir allerdings die Füllrand¬ 
farbe im rp_AOLPen-Eintrag des Rastports richtig setzen müs¬ 
sen . 


Einfärben eines gesamten Rastports 

Neben der "normalen" Füllroutine gibt es noch eine, die 
einen gesamten Rastport einfärbt, ohne auf irgendwelche Be¬ 
grenzungslinien zu achten. Sie füllt in einer wählbaren 
Farbe mit dem Standard-Muster (komplett ausgefüllt) . Die 
Routine heißt SetRast: 
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SetRast 

= 

-234 (Graphics-Library) 


*rastPort 

al 

< Rastport, der komplett ausgefüllt 
soll 

werden 

color 

dO 

< Nummer des Farbregisters, mit 
Farbe der Rastport gefüllt wird 

dessen 

Erklärung 


Füllt einen gesamten Rastport in 
wählbaren Farbe aus. 

einer 


7.4 Die Area-Zeichenroutinen 

Zu dieser Gruppe gehören drei Routinen: Das Versetzen des 
Zeichenstiftes, das Versetzen mit gleichzeitigem Zeichnen 
von Linien und das Zeichnen von Ellipsen. Moment, werden Sie 
jetzt denken, das hatten wir doch alles schon. Das stimmt - 
fast. Der Aufruf der drei Ärea-Routinen AreaMove, AreaDraw 
und AreaEllipse ist identisch mit dem, der drei schon 
bekannten Routinen, allerdings werden die Zeichenbefehle 
nicht sofort am Bildschirm ausgeführt, sondern in eine Art 
"Warteschlange" geschickt, die sich in der Amiga-Sprache 
Areainfo-Struktur nennt. Dort werden alle Punkte (bzw. ihre 
x- und y-Koordinaten) der Objekte, die mit den Area-Routinen 
gezeichnet werden, abgelegt. Eine weitere Routine, AreaEnd, 
leitet dann das Zeichnen aller Objekte in der Warteschlange 
ein. Alle Objekte werden automatisch mit dem eingestellten 
Füllmuster ausgefüllt. Sollte ein Vieleck nicht 
"geschlossen" sein, d.h. ist sein letzter Punkt nicht gleich 
seinem ersten, wird noch eine weitere Linie vom letzten an¬ 
gegebenen Punkt zum ersten gezogen, damit ausgefüllt werden 
kann. 


7.4.1 Einrichtung der Arealnfo-Struktur 

Bevor man überhaupt mit Area-Routinen arbeiten kann, muß der 
temporäre Rastport für den Rastport, in dem man zeichnen 
möchte, installiert sein. AllocRaster und InitTmpRas sind 
also wieder gefragt. Als nächstes muß die schon erwähnte 
Areainfo-Struktur initialisiert werden. Hier zunächst ihr 
Aufbau: 

Die Areainfo-Struktur 


00 

dc.l 

*ai VctrTbl 

Beginn der Vektortabelle 

04 

dc.l 

*ai_VctrPtr 

Nächster Vektoreintrag 

08 

dc.l 

*ai FlagTbl 

Beginn der Flagtabelle 

12 

dc.l 

*ai_FlagPtr 

Nächster Flageintrag 

16 

dc.w 

ai Count 

Derzeitige Vektoreintragsnummer 

18 

dc.w 

ai_MaxCount 

Maximalzahl Vektoreinträge 

20 

dc.w 

ai_FirstX 

x-Koord. des ersten Punktes 
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22 dc.w ai_FirstY ; y-Koord. des ersten Punktes 

24 aiJSIZEOF 

*ai_VctrTbl 

Die Bezeichnung "Vektor" steht bei den Area-Routinen für ein 
x/y-Koordinatenpaar. In ai_VctrTbl steht ein Zeiger auf den 
Beginn einer Wort-Tabelle, in der die Koordinaten aller 
Punkte der Objekte, die mit den Area-Routinen gezeichnet 
werden, stehen (jeweils ein Wort für x- und y-Koordinate, 
also insgesamt zwei Worte pro Vektoreintrag). 

♦aiVctrTbl 

Dieser Zeiger zeigt auf das nächste zu belegende Wort in der 
Vektortabelle. Nach jedem Area-Routinenaufruf wird er ent¬ 
sprechend der Koordinatenanzahl hochgezählt. 

*ai FlagTbl 

Zu 3 e dem Koordinatenpaar wird ein Flag in einer gesonderten 
Tabelle aufgezeichnet. Es enthält Informationen, um welchen 
Typ Punkt (Startpunkt eines Vielecks, Linie in einem Vieleck 
oder Koordinaten für eine Ellipse) es sich handelt. Die 
Flags sind jeweils ein Byte groß. 

*ai_FlagPtr 

Analog zu ai VctrPtr steht hier ein Zeiger auf die Stelle, 
an der das nächste Flag eingetragen werden soll. 

aicount 

Dies ist ein Zähler, der bei 0 startet. Für jedes eingetra¬ 
gene Koordinatenpaar wird er um eins erhöht. 

ai_MaxCount 

Gibt den Maximalwert für ai_Count, also die maximale Anzahl 
von Koordinatenpaaren in der Vektortabelle an. 

ai_FirstX 

Hier wird, zusätzlich zur Koordinatentabelle, die x-Koordi- 
nate des ersten Punkts im letzten gezeichneten Objekt einge¬ 
tragen. 

ai_FirstY 

Analog zu ai_FirstX steht hier die y-Koordinate. 


Wem diese Struktur etwas zu kompliziert vorkommt, den können 
wir beruhigen: Sie brauchen sich um ihre Verwaltung in kein- 
ster Weise zu kümmern. Alles, was Sie tun müssen, ist genug 
Speicher für Vektor- und Flagtabelle und die Info-Struktur 
zu reservieren, die Routine InitArea aufrufen (welche die 
Info-Struktur automatisch initialisiert) und den Beginn der 
Info-Struktur in den Rastport eintragen. 

Bevor Sie an die Speicherreservierung gehen, sollten Sie 
festlegen, wieviele Punkte ihre Area-Objekte maximal haben 
sollen. Jeder AreaMove- und AreaDraw-Befehl braucht einen 
Vektoreintrag und jeder AreaEllipse-Befehl zwei. Sicher- 
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heitshalber sollten Sie ein paar Punkte mehr vorsehen, da 
automatisch zusätzliche Punkte eingebaut werden, wenn Start- 
und Endpunkt eines AreaDraw-Vielecks nicht übereinstimmen. 
Dann zieht die AreaDraw-Routine automatisch eine Linie vom 
letzten angegebenen Punkt zum Startpunkt des Vielecks, damit 
es "geschlossen" ist. 

Jeder Punkt (jedes Koordinatenpaar) benötigt fünf Bytes 
(vier für die zwei Koordinaten-Worte und eins für das Flag). 
Der zu reservierende Speicherbereich beträgt also '5 mal 
Punktanzahl' Bytes. Die Reservierung nehmen Sie am besten 
mit einem 1 ds.b'-Befehl vor. Nachfolgend die Routine, die 
die Einrichtung der Areainfo-Struktur übernimmt: 


InitArea = -282 (Graphics-Library) 


*areaInfo aO 
♦vectorTable al 


vtSize dO 


< Zeiger auf den Speicherbereich für die 
einzurichtende Areainfo-Struktur 

< Zeiger auf den Speicherbereich, in dem 
die Koordinatenpaare und Flags abgelegt 
werden sollen 

< Anzahl der Paare, die in die Tabelle 
passen sollen 


Erklärung 


Richtet eine Areainfo-Struktur für die 
Benutzung von Area-Zeichenroutinen ein. 


Nachdem die Struktur eingerichtet ist, muß nur noch ein Zei¬ 
ger auf sie in den gewünschten Rastport eingetragen werden, 
und zwar in den Eintrag rp_Area!nfo (Offset 16). 


7.4.2 AreaMove, AreaDraw, AreaEllipse und AreaEnd 

Jetzt können wir endlich mit den eigentlichen Area-Routinen 
loslegen. Sie entsprechen exakt den "normalen" Routinen 
Move, Draw und Ellipse. 


AreaMove = -252 (Graphics-Library) 


*rastPort 

al 

< Rastport, dessen Areainfo ein Move 
zugefügt werden soll 

hin- 

X 

dO 

< Neue x-Koordinate 


y 

dl 

< Neue y-Koordinate 


Erklärung 


Hängt an die Areainfo-Liste eines Rast¬ 
ports einen Move-Befehl (Versetzung des 
Zeichenstiftes ohne Zeichnen) an. 
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AreaDraw 

= 

-258 (Graphics-Library) 


*rastPort 

al 

< Rastport, dessen Areainfo ein Draw hin¬ 
zugefügt werden soll 

X 

dO 

< Neue x-Koordinate 

y 

dl 

< Neue y-Koordinate 

Erklärung 


Hängt an die Areainfo-Liste eines Rast¬ 
ports einen Draw-Befehl (Versetzung des 
Zeichenstiftes mit Linienzeichnen) an. 


AreaEllipse 


-186 (Graphics-Library) 


*rastPort 

al 

< 

Rastport, dessen Areainfo eine Ellipse 
hinzugefügt werden soll 

cx 

dO 

< 

x-Koordinate des Mittelpunkts 

cy 

dl 

< 

y-Koordinate des Mittelpunkts 

a 

d2 

< 

Horizontaler Radius 

b 

d3 

< 

Vertikaler Radius 

Erklärung 



Hängt an die Areainfo-Liste eines Rast¬ 
ports eine Ellipse an. 


Die wichtigste und auch neue Routine kommt nun: AreaEnd 
sorgt dafür, daß alle seit ihrem letzten Aufruf (bzw. seit 
der Installierung der Areainfo-Struktur) getätigten Area-Be- 
fehle auf dem Bildschirm ausgeführt werden. 


AreaEnd = -264 (Graphics-Library) 


♦rastPort al < Rastport, dessen Arealnfo-Zeichenbefehle 
ausgeführt werden sollen 

Erklärung Zeichnet alle in der Areainfo-Struktur 

eingetragenen Objekte in den Rastport 
und entleert die Areainfo-Struktur. 


Als Zeichenfarbe für alle Objekte wird die aktuelle APen- 
Farbe (mit SetAPen eingestellt) benutzt. Wichtig: Alle Ob¬ 
jekte, einschließlich ihrer Rahmen, werden nach dem Zeichnen 
ausgefüllt, und zwar ebenfalls in der APen-Farbe! Die 
Areainfo-Struktur wird durch den AreaEnd-Aufruf entleert, 
aber nicht gelöscht. Sie steht sofort für neue Area-Objekte 
bereit. 

Das zugehörige Demonstrationsprogramm zeichnet ein regelmä¬ 
ßiges Sechseck und eine Ellipse unter Benutzung der Area-Be- 
fehle. Sie finden es unter "PRG 7 7.S". 
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7.5 Textausgabe und Zeichensätze 

Im Intuition-Kapitel haben wir schon die Möglichkeit der 
Textausgabe über PrintIText kennengelernt. Wir mußten dazu 
eine Struktur (intuiText) einrichten, in der die Farben, der 
Zeichenmodus, die Positionen, der Zeichensatz und schließ¬ 
lich ein Zeiger auf den Text selber angegeben wurden. Auf 
Graphics-Ebene können wir auch Texte ausgeben, dazu wird al¬ 
lerdings keine Struktur verwendet. Die Ausgabe erfolgt über 
die Graphics-Routine Text, der wir nur Start und Länge un¬ 
seres Textes übergeben. Ansonsten werden die Einstellungen 
von SetAPen, SetBPen, SetDrMd und Move übernommen. 


Text = -60 (Graphics-Library) 


*rastPort 

al 

< Zeiger auf den Rastport, in dem der Text 
ausgegeben werden soll 

*string 

aO 

< Zeiger auf den Beginn des Textes im 
Speicher. Der Text braucht nicht mit ei¬ 
nem Nullbyte abgeschlossen zu werden. 

count 

do 

< Länge des Textes in Bytes 

Erklärung 


Gibt einen Text in den angegebenen Rast¬ 
port in den APen/BPen-Farben, im Set- 
DrMd-Zeichenmodus und an der Move-Posi- 
tion aus. 


Vor dem Aufruf von Text müssen (bzw. sollten) also die Rou¬ 
tinen zur Einstellung von Farbe, Position etc. aufgerufen 
werden. Falls mehrere Texte in der gleichen Farbe oder dem 
gleichen Zeichenmodus ausgegeben werden, braucht SetAPen 
bzw. SetDrMd natürlich nur einmal aufgerufen zu werden. Die 
Textposition sollte aber immer vorher mit Move gesetzt wer¬ 
den . 

Neben Text gibt es eine Routine, die die Breite eines Textes 
in Pixeln bestimmt (nicht zu verwechseln mit der Anzahl der 
Zeichen im Text). Sie berücksichtigt dabei auch den gerade 
eingestellten Zeichensatz. Die Routine heißt TextLength: 


TextLength = -54 (Graphics-Library) 


♦rastPort 

al 

< 

Rastport, für den die Textlänge berech 
net werden soll (wichtig, da der einge 
stellte Font berücksichtigt wird) 

♦string 

aO 

< 

Zeiger auf den Textbeginn 

count 

dO 

< 

Länge des Textes in Zeichen 

length 

dO 

> 

Berechnete Breite des Textes in Pixeln 
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Erklärung Berechnet die Breite eines Textes in Pi- 

xeln, wobei der eingestellte Font be¬ 
rücksichtigt wird. 


7.5.1 Zentrierte Textausgabe 

Um einen Text zentriert auszugeben, muß man seine Breite in 
Pixeln wissen und deren Hälfte von der Mitte des Ausgabefen¬ 
sters abziehen. Dies ist dann die x-Startposition des Tex¬ 
tes. Das folgende Beispielprogramm gibt den Text in der Kom¬ 
mandozeile zentriert in einem neuen Fenster aus (auf Dis¬ 
kette unter "PRG_7_8.S"). 


* Programm 7.8 (Auszug) 


Zentrierte Ausgabe der 
Kommandozeile 


* Pixel-Breite des Textes bestimmen 


move.1 

a4,al ; 

Rastport 

move.1 

a3,a0 ; 

Beginn des Textes 

move.1 

d3,d0 ; 

Länge des Textes 

jsr 

TextLength(a6) ; 

Routine aufrufen 

move.1 

dO, d4 ; 

Pixelbreite merken 

Textausgabe-Position einstellen 


move.1 

a4,al ; 

Rastport 

move.1 

#50,dl 

y-Koordinate 50 

move.1 

#320,dO 

Mitte des Windows 

asr 

#1,d4 ; 

Text-Pixelbreite durch 

sub. 1 

d4,d0 ; 

x-Koordinate = Mitte - 

jsr 

Move(a6) 


Text ausgeben 

move. 1 

a4,al ; 

Rastport 

move.1 

a3,a0 ; 

Text-Beginn 

move.1 

d3,d0 ; 

Text-Länge 

jsr 

Text(a6) ; 

ausgeben 


Programm 7.8 (Auszug) 


Zunächst rufen wir die Routine TextLength auf und lassen uns 
aus der Zeichenanzahl im Text die benötigte Pixelbreite 
feststellen. Dann berechnen wir die x-Startkoordinate des 
Textes. Wir schreiben 320 nach dO (Mitte des Windows). Dann 
teilen wir die Pixelbreite durch zwei und ziehen das Ergeb¬ 
nis von der 320 in dO ab. Als y-Koordinate wählen wir 50. 
Nun rufen wir Move auf, wodurch der Zeichenstift, der für 
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die Textausgabe als Textcursor fungiert, gesetzt wird. Da 
wir die Farbe und den Zeichenmodus vorher schon eingestellt 
haben, können wir jetzt sofort Text aufrufen. 


7.5.2 Einstellung von Zeichensätzen 

Im Diskfont-Kapitel haben wir gelernt, wie man Zeichensätze, 
die sich im ROM oder auf der Diskette befinden, öffnet. Wir 
wissen auch schon, wie man sie in Verbindung mit IntuiTexten 
verwendet oder als Screen-Standardfont einsetzt. Nun wollen 
wir uns ansehen, wie man einen Rastport mit einem geladenen 
Font versorgen kann. Dazu dient die Routine SetFont: 


SetFont = -66 (Graphics-Library) 


*rastPort 

al 

♦textFont 

aO 

Erklärung 



< Zeiger auf den Rastport, dessen Zeichen¬ 
satz eingestellt werden soll 

< Zeiger auf die TextFont-Struktur des ge¬ 
wünschten Zeichensatzes 

Setzt im angegebenen Rastport den Zei¬ 
chensatz, auf dessen TextFont-Struktur 
aO zeigt. 


Wichtig: Bei den Intuition-Strukturen mußten wir zur Benut¬ 
zung eines Zeichensatzes einen Zeiger auf eine TextAttr- 
Struktur eintragen (die gleiche Struktur, die wir zum Aufruf 
von OpenDiskFont benutzten). Hier müssen wir allerdings den 
Zeiger auf die TextFont-Struktur, also den Rückgabewert von 
OpenDiskFont oder OpenFont, benutzen. 

Nach dem Aufruf von SetFont werden solange alle Textausgaben 
im neuen Zeichensatz durchgeführt, bis ein anderer einge¬ 
stellt wird. 

Wenn man wissen will, welcher Zeichensatz gerade eingestellt 
ist, verwendet man die Routine AskFont: 


AskFont = -474 (Graphics-Library) 


*rastPort al 
*textAttr aO 

Erklärung 


< Zeiger auf den Rastport, dessen Zeichen¬ 
satz abgefragt werden soll 

< Zeiger auf 8 Bytes reservierten Speicher 
(z.B. per 'ds.b'-Befehl), in dem eine 
TextAttr-Struktur angelegt wird 

Legt eine TextAttr-Struktur mit Informa¬ 
tionen über den momentan in einem Rast¬ 
port eingestellten Zeichensatz an. 
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Den Speicherplatz für die Struktur legt man am besten mit 
dem Befehl "ds.b 8" im Datenbereich des Programms an. Die 
einzelnen Einträge der TextAttr-Struktur (Zeiger auf Font- 
narae, Höhe, Stil und Flags) können nach dem AskFont-Aufruf 
ausgewertet werden. 


Wahl des Schriftstils 

Die Graphics-Routine AskSoftStyle ermittelt, welche Schrift¬ 
arten für den derzeitigen Font in einem Rastport möglich 
sind: 


AskSoftStyle 


-84 (Graphics-Library) 


♦rastPort 

al 

style 

dO 

Erklärung 



< Rastport, dessen mögliche Zeichensatz- 
Schriftarten ermittelt werden sollen 

> Mögliche Schriftarten 

Ermittelt die möglichen Schriftarten des 
momentan eingestellten Zeichensatzes im 
angegebenen Rastport. 


Die Bedeutungen der Schriftstil-Werte sind folgende: 
Schriftstil Wert Bedeutung 


FSF_NORMAL 0 
FSFUNDERLINED 1 
FSF_BOLD 2 
FSF_ITALIC 4 
FSF EXTENDED 8 


Kein besonderer Stil 

Unterstrichen 

Fettdruck 

Kursiv-(Schräg-)Druck 

Doppelte Breite (bei normalen Fonts nicht 

möglich) 


Im Ergebnis-Register do stehen die aufaddierten Werte aller 
möglichen Schriftarten. Wenn für einen Font UNDERLINED und 
ITALIC zugelassen sind, wäre der Rückgabewert also 5. Die 
Werte müssen Sie als Wertigkeiten der Binärstellen der Rück¬ 
gabezahl sehen. Ein Wert von 5 würde bedeuten, daß Bit Nr. 1 
und Nr. 3 (Zählung beginnt bei 0) gesetzt sind. AskSoftStyle 
gibt Werte zurück, bei denen die unbenutzten Bits 5-7 
(Wertigkeiten 16-128) des Style-Bytes gesetzt sein können, 
was aber keine Bedeutung hat. 

Das Ergebnis einer AskSoftStyle-Abfrage kann, muß aber 
nicht, in der folgenden Routine angewandt werden, die zur 
Einstellung des Schriftstils dient: 
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SetSoftStyle = -90 (Graphics-Library) 


♦rastPort 

al 

< 

Rastport, dessen Schriftart eingestellt 
werden soll 

style 

dO 

< 

Gewünschter Schriftstil 

enable 

dl 

< 

Zugelassene Arten (von AskSoftStyle zu¬ 
rückgegeben) 

newstyle 

dO 

> 

Wirklich gesetzter Schriftstil (ergibt 
sich durch OR-Verknüpfung von style und 
enable) 

Erklärung 



Setzt den gewünschten Schriftstil im an¬ 
gegebenen Rastport 


Falls die Ausgrenzung bestimmter Arten nicht gewünscht wird 
(die allermeisten Fonts sind sowieso in allen Schriftarten 
bis auf EXTENDED darstellbar), kann 'enable' auf -1 gesetzt 
werden, wodurch alle Bits gesetzt und alle Schriftstile zu¬ 
gelassen sind. 

Nun ein Programm, das einen Text in einem Fenster ausgibt 
(unter Benutzung der Text-Routine), und zwar im Zeichensatz 
Garnet 16 und im Schriftstil fett und unterstrichen. Es 
steht unter "PRG 7 9.S" auf der Diskette. 


* Programm 7.9 (Auszug): Graphics-Textausgabe mit Diskfonts 


lea tattr,aO ; Font Garnet 16 offnen 

jsr 0penDiskFont(a6) 

tst.l dO 

beq ende2 

move.l dO,tfont 


* Font und Stil einstellen 

move.l a4,al ; Rastport 

move.l tfont,aO ; Rückgabewert von OpenDiskFont 

jsr SetFont(a6) ; Font einstellen 

move.l a4,al ; Mögliche Stile erfragen 

jsr AskSoftStyle(a6) 

move.l d0,d4 ; und in d4 sichern 

move.l a4,al ; Rastport 

moveq #3,d0 ; Gewünschter Stil 

move.l d4,dl ; Verknüpft mit den möglichen 
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jsr 

SetSoftStyle(a6) 

move.1 
moveq 
moveq 
jsr 

a4,al 
#100,dO 
#50,dl 

Move(a6) 

; Koordinate 100/50 setzen 

move.1 
lea 
moveq 
jsr 

a4,al 

ausgtext,a0 
#31,dO 

Text(a6) 

; Text ausgeben 

Programm 7.9 

(Auszug) 


Das Öffnen eines Diskfonts ist aus Kapitel 6 schon bekannt. 
Als nächstes werden Vordergrundfarbe und Zeichensatz einge¬ 
stellt. Von AskSoftStyle lassen wir uns die zugelassenen 
Schriftarten des Fonts geben und schreiben sie beim SetSoft- 
Style-Aufruf als 'enable'-Maske nach dl. Als Schriftstil ge¬ 
ben wir 3 an, was unterstrichen (1) und fett (2) ergibt. Mit 
Move springen wir nach 100/50 und geben dort den Text aus. 

Wie Sie sehen, müssen wir die Länge des auszugebenden Textes 
wieder abzählen. Erinnern Sie sich noch an unsere Print-Rou¬ 
tine aus dem DOS-Kapitel? Sie nahm uns die Arbeit des Text- 
längen-Zählens ab. Diese Routine wollen wir nun für die Gra- 
phics-Textausgabe umschreiben. 

gprint: move.l 

a2,-(sp) 

; Register sichern 

move.1 
clr.l 
gprl: addq 

tst.b 
bne 
subq 

a0,a2 

dO 

#l,d0 
(a0) + 
gprl 
#l,d0 

; Text-Start sichern 
; Länge löschen 
; Länge plus 1 

; Textende-Kennzeichen erreicht? 

; Wenn nein 

; Letzten addq rückgängig 

move.1 
move.1 
jsr 

a2,a0 

a4,al 

Text(a6) 

; Textstart zurückholen 
; Rastport-Zeiger nach al 
; Text aufrufen 

move.1 
rts 

(sp)+,a2 

; Register zurück 
; Das wars 


Bild 7.3: Eine Print-Subroutine für Graphics-Text 


Die Routine arbeitet analog zur DOS-Print-Routine, wir nen¬ 
nen Sie 'gprint' (Graphics-Print), um sie von der anderen 
unterscheiden zu können. 
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7.5.3 Löschen des Bildschirms 

Für diesen Zweck existieren zwei Routinen. Die erste: 

ClearEOL = -42 (Graphics-Library) 


*rastPort al < Rastport, in dem eine Zeile gelöscht 
werden soll 

Erklärung Löscht eine Textzeile des angegebenen 

Rastports ab der Zeichenstiftposition 
bis zum Zeilenende. Der freiwerdende Be¬ 
reich wird mit der Hintergrundfarbe 
(SetBPen) aufgefüllt. 


Die Anzahl Zeilen, die dabei gelöscht wird, entspricht der 
Höhe des derzeit eingestellten Zeichensatzes, damit wirklich 
genau eine Textzeile entfernt wird. Die zweite Routine: 


ClearScreen = -48 (Graphics-Library) 


♦rastPort al < Rastport, der gelöscht werden soll 

Erklärung Löscht einen kompletten Rastport, d.h. 

er wird mit der Hintergrundfarbe 
(SetBPen) aufgefüllt. 


Dazu braucht wohl nichts mehr gesagt zu werden. 


7.6 Grafik-Kopier- und Scroll-Routinen 

Neben der Vielzahl an Routinen, die Grafiken auf den 
Bildschirm bringen, gibt es auch solche, die schon vorhan¬ 
dene Grafiken kopieren oder verschieben. Die Graphics- 
Library bedient sich zu diesem Zweck eines Coprozessors, des 
sogenannten "Blitters". Die Bezeichnung Blitter ist eine 
Zusammenfassung von "Block Image Transfer", also 
"Blockgrafik-Kopierer". Dies beschreibt auch gleich die 
Hauptaufgabe des Blitters: Die Kopie von rechteckig¬ 
organisierten Grafiken. Rechteckig-organisiert bedeutet, daß 
die Begrenzungslinien einer zu kopierenden Grafik immer 
horizontal bzw. vertikal sein müssen, also keine im Ratio 
abweichenden Grafiken kopieren kann. 

Der Blitter ist ein Spezialprozessor, dessen einzige Fähig¬ 
keit das Kopieren von Speicherbereichen (mit dazugehörigen 
Verknüpfungsoperationen) ist. Diese Fähigkeit beherrscht er 
dafür aber sehr gut, d.h. er weist eine sehr hohe Kopierge- 
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schwindigkeit auf. Diese hohe Geschwindigkeit nutzen auch 
die Graphics-Routinen aus. 


7.6.1 Kopieren auf Rastport- und Bitmap-Ebene 

Die erste Routine, die vorgestellt werden soll, ist Clip- 
Blit: 


ClipBlit 



= -552 (Graphics-Library) 

*srcrp 

a0 

< 

Zeiger auf Quell-Rastport 

srcx 

d0 

< 

x-Startkoordinate der Quellgrafik 

srcy 

dl 

< 

y-Startkoordinate der Quellgrafik 

*destrp 

a0 

< 

Zeiger auf Ziel-Rastport 

destx 

d2 

< 

x-Koordinate der Zielgrafik 

desty 

d3 

< 

y-Koordinate der Zielgrafik 

sizex 

d4 

< 

x-Größe der zu kopierenden Grafik 

sizey 

d5 

< 

y-Größe der zu kopierenden Grafik 

minterm 

Erklärung 

d6 

< 

Logische Verknüpfung für die Kopie 

Kopiert einen rechteckigen Grafik-Aus 


schnitt aus einem Rastport in einen an¬ 
deren (oder auch in denselben). 


Wie Sie sehen, arbeitet diese Routine auf Rastport-Ebene. 
Rastports werden bekanntlich für Screens und Windows einge¬ 
richtet. Die Koordinaten für die Quell- und Zielgrafik sind 
also relativ zur oberen, linken Ecke des Screens bzw. Win¬ 
dows zu sehen. Wenn Sie beispielsweise ein Window haben, das 
bei 50/50 beginnt, bezieht sich eine Koordinatenangabe von 
10/10 beim ClipBlit-Aufruf für dieses Window auf die reale 
Screen-Position 60/60. 

Nun wollen wir uns die logische Verknüpfung (minterm) noch 
etwas näher ansehen. Der Koprozessor Blitter hat die Mög¬ 
lichkeit, drei unabhängige Quell-Grafiken in einer festleg¬ 
baren Weise zu verknüpfen und in die Ziel-Grafik zusammenzu¬ 
kopieren. Die Mini-Terms (wofür 'minterm' steht) sind Boole¬ 
sche Gleichungen, welche die Verknüpfungsart festlegen. Im 
Falle der Graphics-Blitterroutinen arbeiten wir nur mit ei¬ 
ner Quelle und einem Ziel. 

Alle Blitterroutinen sehen die Quellgrafik und die am Ziel 
bisher vorhandene Grafik als Ausgangsgrafiken an, verknüpfen 
sie und schreiben das Ergebnis in die Zielgrafik. Die Ver¬ 
knüpfung geht punktweise vor sich, d.h. je ein Punkt aus der 
Quellgrafik wird mit dem entsprechenden Punkt aus der alten 
Zielgrafik verknüpft und der Punkt in der neuen Zielgrafik 
entsprechend dem Verknüpfungsergebnis gesetzt oder gelöscht. 
Dabei können wir in den Parameter 'minterm' Werte schreiben, 
welche die Art und Weise festlegen, wie die Quell- und alte 
Zielgrafik verknüpft werden. Zugelassen sind die Werte 128, 
64, 32 und 16. Jede dieser Zahlen steht für eine ganz 
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bestimmte Verknüpfungsvorschrift. Falls Sie mehrere dieser 
Vorschriften verwenden möchten, können Sie die ent¬ 
sprechenden Zahlen addieren. Hier nun die Bedeutungen der 
einzelnen Zahlen: 


Mini-Term 128 

Mini-Term 64 

Mini-Term 32 

Mini-Term 16 


Ein Punkt in der neuen Zielgrafik ist dann ge¬ 
setzt, wenn die entsprechenden Punkte in beiden 
Ausgangsgrafiken gesetzt waren. 

Ein Punkt in der neuen Zielgrafik ist dann ge¬ 
setzt, wenn der entsprechende Punkt in der 
Quellgrafik gesetzt, in der alten Zielgrafik 
aber gelöscht war. 

Ein Punkt in der neuen Zielgrafik ist dann ge¬ 
setzt, wenn der entsprechende Punkt in der 
Quellgrafik gelöscht, in der alten Zielgrafik 
aber gesetzt war. 

Ein Punkt in der neuen Zielgrafik ist dann ge¬ 
setzt, wenn die entsprechenden Punkte in beiden 
Ausgangsgrafiken gelöscht waren. 


Da die Miniterms auch beliebig addiert werden können, er¬ 
geben sich insgesamt 16 verschiedene Möglichkeiten, eine 
Grafik an eine andere Stelle zu kopieren. Nachfolgend die 
Effekte der verschiedenen Kombinationen: 


240 (128+64+32+16) 
224 (128+64+32) 

208 (128+64+16) 

192 (128+64) 

176 (128+32+16) 

160 (128+32) 

144 (128+16) 

112 (64+32+16) 


96 (64+32) 


Die neue Zielgrafik wird, egal was vorher in den 
Ausgangsgrafiken war, komplett ausgefüllt. 

Die neue Zielgrafik entsteht durch Zusammen-Ko- 
pieren der Quellgrafik und der alten Zielgrafik: 
Neuziel = Quelle OR Altziel. 

Die neue Zielgrafik entsteht durch Zusammen-Ko- 
pieren der Quellgrafik und der invertierten al¬ 
ten Zielgrafik: Neuziel = Quelle OR (NOT Alt¬ 
ziel). 

Die neue Zielgrafik wird durch die Quellgrafik 
ersetzt, egal, was in der alten Zielgrafik war. 
Die neue Zielgrafik entsteht durch Zusammen-Ko- 
pieren der invertierten Quellgrafik und der al¬ 
ten Zielgrafik: Neuziel = (NOT Quelle) OR Alt¬ 
ziel. 

Die Zielgrafik wird nicht verändert. 

Die Zielgrafik enthält dort gesetzte Punkte, wo 
in beiden Ausgangsgrafiken die Punkte entweder 
gesetzt oder gelöscht waren. 

Die neue Zielgrafik enthält dort gesetzte 

Punkte, wo entweder in der Quellgrafik oder in 
der alten Zielgrafik gesetzte Punkte oder in 
beiden Ausgangsgrafiken gelöschte Punkte waren. 
An den Stellen, an denen in beiden Ausgangsgra¬ 
fiken gesetzte Punkte waren, enthält die neue 
Zielgrafik gelöschte Punkte. 

Die neue Zielgrafik enthält dort gesetzte 

Punkte, wo entweder in der Quellgrafik oder in 
der alten Zielgrafik gesetzte Punkte waren. An 
den Stellen, an denen in beiden Ausgangsgrafiken 


314 




Die Graphics-Library 


gesetzte Punkte waren, enthält die neue Zielgra¬ 
fik gelöschte Punkte: Neuziel = Quelle EOR Alt¬ 
ziel. 

80 (64+16) Die Zielgrafik wird, unabhängig von der Quell¬ 

grafik, invertiert (Ziel NOT-verknüpft). 

48 (32+16) Die Zielgrafik wird durch die invertierte Quell¬ 

grafik ersetzt (Quelle NOT-Verknüpft). 

0 Die neue Zielgrafik wird, egal was vorher in den 

Ausgangsgrafiken war, komplett gelöscht. 


Die Gründe für die Wirkungen der einzelnen Kombinationen 
können Sie sich klarmachen, wenn Sie überlegen, wie die Kom¬ 
binationen der verschiedenen Verknüpfungs-Vorschriften auf 
die Punkte der Quell- und Zielgrafik wirken. Am Beispiel 192 
wollen wir das einmal durchgehen: 

192 bildet sich aus den Werten 128 und 64. 128 besagt, daß 
der neue Zielpunkt definiert sein soll, wenn beide 
Ausgangspunkte vorhanden sind. Bei 64 wird der Zielpunkt 
aktiviert, wenn der Quellpunkt gesetzt, der alte Zielpunkt 
aber gelöscht war. Das ergibt eine l:l-Kopie der Quellgrafik 
ohne Berücksichtigung der alten Zielgrafik. Mit den übrigen 
Miniterm-Kombinationen kann man es analog halten. 

Die nächste Kopierroutine heißt BltBitMap: 


BltBitMap = -30 (Graphics-Library) 


*srcbm 

aO 

< 

Zeiger auf Quell-Bitmap 

srcx 

dO 

< 

x-Startkoordinate der Quellgrafik 

srcy 

dl 

< 

y-Startkoordinate der Quellgrafik 

*destbm 

aO 

< 

Zeiger auf Ziel-Bitmap 

destx 

d2 

< 

x-Koordinate der Zielgrafik 

desty 

d3 

< 

y-Koordinate der Zielgrafik 

sizex 

d4 

< 

x-Größe der zu kopierenden Grafik 

sizey 

d5 

< 

y-Größe der zu kopierenden Grafik 

minterm 

d6 

< 

Logische Verknüpfung für die Kopie 

mask 

d7 

< 

Maske für die zu kopierenden Planes 

*buffer 

a2 

< 

Zeiger auf Zwischenspeicher bei Überla¬ 
gerung der Quell- und Zielgrafiken 




(sollte groß genug für eine Grafik-Zeile 
sein). 

Erklärung 



Kopiert einen rechteckigen Grafik-Aus¬ 
schnitt aus einer Bitmap. 


Im Gegensatz zu ClipBlit erwartet BltBitMap Zeiger auf sog. 
Bitmap-Strukturen. Im Intuition-Kapitel haben wir schon et¬ 
was über den Aufbau einer Amiga-Grafik erfahren. Zur Erinne¬ 
rung: Eine Grafik besteht aus bis zu sechs Bitplanes, die 
alle die gleiche Spalten- und Zeilenzahl haben. Die Farbta- 
bellennummer eines Punktes ergibt sich als Kombinations- 
Binärzahl aus den "übereinanderliegenden" Punkten (Bits) al- 
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ler Bitplanes. Die Zusammenstellung der Bitplanes zu einer 
Grafik nennt man Bitmap. Sie stellt die unterste Stufe der 
Grafikverwaltung dar. 

In jedem Rastport findet man einen Zeiger auf die Bitmap- 
Struktur, in der die Grafik verwaltet wird (Eintrag 
rp_BitMap, Offset 4). Alle Rastports (und damit alle Win¬ 
dows) auf einem Screen werden in ein und derselben Bitmap 
dargestellt. Überlagerung und Hintergrund/Vordergrund wie 
bei den Windows gibt es hier nicht, denn irgendwo müssen 
die, miteinander verknüpften Fenster, in einer einzigen 
Grafik zusammengefaßt werden, damit sie auf dem Bildschirm 
erscheinen können. 

Im Zusammenhang mit der BltBitMap-Routine ist es wichtig, 
daß die anzugebenden Koordinaten nicht relativ zur linken 
oberen Ecke des Rastports, sondern relativ zur Oberkante des 
Screens, auf dem der Rastport liegt, zu sehen sind. Hat man 
also ein Window, das bei 50/50 auf dem Screen beginnt, so 
muß man, um die window-relativen Koordinaten 10/10 zu errei¬ 
chen, die Koordinaten 60/60 an BltBitMap übergeben. 

Die Benutzung von BltBitMap bietet insofern Vorteile gegen¬ 
über ClipBlit, als Sie hier angeben können, welche Planes 
der Bitmap kopiert werden sollen. Angenommen, Sie haben 
einen Screen mit 16 Farben, also 4 Planes. Nun wollen Sie 
Grafiken kopieren, die ausschließlich die Farbe mit der Re¬ 
gisternummer 2 enthalten. Für einen solchen Grafikpunkt 
braucht lediglich des entsprechende Bit in der 1. Bitplane 
gesetzt zu sein (Zählung beginnt bei 0), da 2 1 gleich 2 ist. 
Hier reicht es also völlig aus, nur die 1. Bitplane zu 
kopieren, vorausgesetzt, die übrigen Planes im Grafik- 
Zielbereich enthalten nur Nullen. 

Im Masken-Register d7 muß nun für jede Bitplane, die kopiert 
werden soll, das ihrer Nummer entsprechende Bit gesetzt wer¬ 
den. In obigem Beispiel müßte also das 1. Bit (für die 1. 
Plane) gesetzt werden, d.h. ins Register müßte eine 2 ge¬ 
schrieben werden. Im Falle der 1. und 3. Bitplane wäre es 
eine 10 usw. 

Ins Register a2 muß ein Zeiger auf einen Zwischenspeicher 
eingetragen werden, der groß genug für eine Grafikzeile der 
Quellgrafik sein sollte. Er wird bei Überlagerungen der 
Quell- und Zielgrafik benötigt. 

Nun zur dritten Blitterroutine: 
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BltBitMapRastPort 

= 

-606 (Graphics-Library) 


*srcbm 

aO 

< 

Zeiger auf Quell-Bitmap 

srcx 

dO 

< 

x-Startkoordinate der Quellgrafik 

srcy 

dl 

< 

y-startkoordinate der Quellgrafik 

*destrp 

aO 

< 

Zeiger auf Ziel-Rastport 

destx 

d2 

< 

x-Koordinate der Zielgrafik 

desty 

d3 

< 

y-Koordinate der Zielgrafik 

sizex 

d4 

< 

x-Größe der zu kopierenden Grafik 

sizey 

d5 

< 

y-Größe der zu kopierenden Grafik 

minterm 

d6 

< 

Logische Verknüpfung für die Kopie 

Erklärung 



Kopiert einen rechteckigen Grafik-Aus 


schnitt aus einer Bitmap in einen Rast¬ 
port . 


Diese Routine stellt eine Transfer-Kopierroutine dar, die 
Grafiken aus einer Bitmap in einen Rastport kopiert. Im 
Grunde kann man sich natürlich auch aus dem Ziel-Rastport 
den Zeiger auf die Bitmap besorgen und dann BltBitMap benut¬ 
zen. Diese Routine kann man einsetzen, wenn es programmtech¬ 
nisch günstig ist. 


7.6.2 Schnelles Löschen von Grafiken 

Die letzte Blitter-Routine, dient nicht dem Kopieren, 
sondern dem schnellen Löschen von Grafiken und 
Speicherbereichen: 


BltClear = -300 (Graphics-Library) 


*memory 

al 

< Zeiger auf Beginn des zu löschenden 
Speicherbereichs 

size 

dO 

< Größe des zu löschenden Speicherbereichs 

flags 

dl 

< Bestimmt die Interpretation von 'size' 
und das Warteverhalten der Routine 

Erklärung 


Löscht rechteckige Grafiken oder 

Speicherbereiche. 


Im 'flags'-Register sind nur die zwei untersten Bits von Be¬ 
deutung. Wenn das Bit 0 gesetzt ist, wird das aktivierte 
Programm während des Löschvorgangs angehalten, die Routine 
kehrt also erst nach Beendigung des Löschens zurück. Anson¬ 
sten wird das Programm sofort fortgesetzt, das Ende des 
Löschvorgangs wird nicht abgewartet. 

Das Bit 1 legt fest, wie die 'size'-Angabe in do zu inter¬ 
pretieren ist. Bei gelöschtem Bit gibt dO die Gesamtlänge 
eines zusammenhängenden Speicherbereichs in Byte an. Ist das 
Bit gesetzt, so wird das obere Wort des Langworts do als Hö- 
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hen- und das untere Wort als Breitenangabe eines rechteckig¬ 
organisierten Speicherbereichs (allerdings in Byte, nicht in 
Pixeln) angesehen. Die Gesamt-Bytezahl berechnet BltClear 
aus der Multiplikation des oberen mit dem unteren Wort. 

Das folgende Programm demonstriert die Benutzung von Clip- 
Blit und BltBitMap. Es zeichnet zwei verschiedenfarbig aus¬ 
gefüllte Kreise in ein Fenster und kopiert sie unter Anwen¬ 
dung verschiedener Minterms in ein zweites Fenster. Sie fin¬ 
den es unter "PRG 7 10.S" auf der Diskette. 


* Programm 7.10 (Auszug): Demonstration ClipBlit und BltBitMap 


bsr verz ; Verzögerung per Delay 

* l:l-Kopie des Windows 1 ins Window 2 


move.1 

a3,a0 

moveq 

#0,d0 

moveq 

#0,dl 

move.1 

$32(a5),al 

moveq 

#0,d2 

moveq 

#0,d3 

move.1 

#300,d4 

move.1 

#100,d5 

move.b 

#192,d6 

jsr 

ClipBlit(a6) 

bsr 

verz 


Quell-Rastport 

Quell-Startkoordinaten 

Ziel-Rastport 

Ziel-Koordinaten 

Breite und Höhe 
der Grafik 

Minterm-Modus = 1:1-Kopie 


* Invertierte Kopie von Window 2 in Window 1 


move.1 

$32(a5),a0 

; Quell-Rastport 

moveq 

#0,d0 

; Quell-Koordinaten 

moveq 

#0,dl 


move.1 

a3,al 

; Ziel-Rastport 

moveq 

#0,d2 

; Ziel-Koordinaten 

moveq 

#0,d3 


move.1 

#300,d4 

; Breite und Höhe 

move.1 

#100,d5 


move.b 

#48,d6 

; Minterm-Modus = Invertiere Kopie 

jsr 

ClipBlit(a6) 


bsr 

verz 



* OR-Verknüpfung der ersten Planes der beiden Windows 

move.l $32(a4),a0 ; Quelle = Window 1 

move.l 4(a0),a0 ; Vom Rastport zur Bitmap 

moveq |5,d0 ; Start-x = 5 

moveq #15,dl ; Start-y = 15 


318 





Die Graphics-Library 


move.1 

$32(a5),al 

; Ziel = Window 2 

move.1 

4(al),al 

; Zur Bitmap 

move.1 

#315,d2 

; Ziel-Koordinaten 

move.1 

#120,d3 


move.1 

#290,d4 

; Breite 

move.1 

#70,d5 

; Höhe 

move.b 

#224,d6 

; Minterm-Modus: OR-Verknüpfung 

move.b 

#1 ,d7 

; Nur Plane 1 betroffen 

lea 

buff,a2 

; Zwischenspeicher 

jsr 

BltBitMap(a6) 


bsr 

verz 


EOR-Verknüpfung 


move.1 

a3,a0 

; Quelle = Window 1 

moveq 

#0,d0 

; Koordinaten 

moveq 

#0,dl 


move.1 

$32(a5),al 

; Ziel = Window 2 

moveq 

#0,d2 

; Koordinaten 

moveq 

#0,d3 


move.1 

#300,d4 

; Breite 

move.1 

#100, d5 

; Höhe 

move.b 

#96,d6 

; Minterm-Modus: EOR-Verknüpfung 

jsr 

ClipBlit(a6) 



Programm 7.10 (Auszug) 


Beachten Sie den Unterschied zwischen ClipBlit und BltBitMap 
bezugnehmend auf die Wahl der Koordinaten: Wie schon erwähnt 
sind die Koordinaten von ClipBlit relativ zum jeweiligen 
Rastport zu sehen, während sie bei BltBitMap relativ zur 
Screen-Oberkante sind. 


7.6.3 Scrollen von Bildausschnitten 

Unter "Scrolling" versteht man die pixelweise Verschiebung 
eines Grafikbereiches. Man könnte dafür eine Kopierroutine 
verwenden und die Koordinaten der Quell- und Zielgrafik ent¬ 
sprechend wählen. Graphics stellt uns aber auch eine spe¬ 
zielle Routine zur Verfügung: 


ScrollRaster = -396 (Graphics-Library) 


*rp 

al 

< 

Zeiger auf Rastport, 
werden soll 

in dem gescrollt 

dx 

dO 

< 

Anzahl der Pixel, um 
x-Richtung verschoben 

die die Grafik in 
werden soll 

dy 

dl 

< 

Anzahl der Pixel, um 
y-Richtung verschoben 

die die Grafik in 
werden soll 

minx 

d2 

< 

x-Koordinate der linken oberen Ecke des 
Grafikausschnitts 


319 








Kapitel 7 


miny d3 < y-Koordinate der linken oberen Ecke des 

Grafikausschnitts 

maxx d4 < x-Koordinate der rechten unteren Ecke 

des Grafikausschnitts 

maxy d5 < y-Koordinate der rechten unteren Ecke 

des Grafikausschnitts 

Erklärung Scrollt (verschiebt) einen rechteckigen 

Grafikausschnitt um eine wählbare Anzahl 
Pixel. 


Beachten Sie, daß die Werte für 'dx' und 'dy' angeben, um 
wieviel die Grafik nach links bzw. oben gescrollt wird. Soll 
sie nach rechts bzw. unten gescrollt werden, sind für dx und 
dy negative Werte anzugeben. 


7.6.4 Multitasking-gerechtes Warten auf Graphics-Ebene 

Im DOS-Kapitel haben wir eine Methode kennengelernt, die 
eine Verzögerung des Programms ohne Behinderung des 
Multitasking-Betriebs erreicht. Auf Graphics-Ebene gibt es 
ähnliche Fälle. Hier ist es oft nötig, bestimmte 
Funktionsaufrufe mit dem Bildaufbau zu koordinieren. So ist 
es z.B. recht ungünstig, Änderungen an Bildschirmgrafiken 
vorzunehmen, wenn der Rasterstrahl, der das Monitorbild 
aufbaut, gerade diese Grafikbereiche darstellt. Die 
einfachste Methode, um dies zu verhindern, ist, auf den 
Rücklauf des Strahl vom rechten unteren zum linken oberen 
Rand zu warten, und genau das tut die Routine WaitTOF: 

WaitTOF = -270 (Graphics-Library) 

Erklärung Wait for Top of Frame - wartet auf den 

Rücklauf des Elektronen-Rasterstrahls. 


WaitTOF versetzt unser Programm solange in den Wartezustand 
und verhindert die Vergeudung von Prozessorzeit, bis der 
Strahlrücklauf durchgeführt wurde. 

Es gibt noch eine weitere Rasterstrahl-Warteroutine, deren 
Funktionsweise Sie erst nach dem nächsten Abschnitt richtig 
verstehen können. Sie sei hier aber schon einmal vorge¬ 
stellt: 


WaitBOVP = -402 (Graphics-Library) 

*vp aO < Zeiger auf ViewPort, auf dessen Ende ge¬ 

wartet werden soll 

Erklärung Wait for Bottora of ViewPort - wartet, 

bis der Rasterstrahl die letzte Zeile 
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des angegebenen Viewports gezeichnet 
hat. 


Als Beispielprogramm für ScrollRaster und WaitTOF eignet 
sich ein kleines Scrollschriftprogramm sehr gut. Es öffnet 
ein 12 Pixel hohes Window am unteren Rand der Workbench, 
zeichnet zwei waagerechte Linien und läßt einen Text im 
Fenster Scrollen. 


* Programm 7.11 (Auszug): Demonstration ScrollRaster 



lea 

scrtext,a3 ; 

mainl: 

move.1 

gfxbase,a6 


moveq 

#0,d6 

1 

main3: 

move.1 

a5,al ; 


move.1 

#637,dO ; 


tst.b 

d6 ; 


beq 

main2 ; 


subq 

#4 ,d0 

main2: 

moveq 

#8, dl 


jsr 

Move(a6) ; 


move.1 

a5,al ; 


move.1 

a3,a0 


moveq 

#l,d0 


jsr 

Text(a6) 


move.1 

a5,al ; 


moveq 

#4,d0 


moveq 

#0,dl 


moveq 

#0,d2 


moveq 

#2,d3 


move.1 

#639,d4 ; 


moveq 

#10,d5 ; 


jsr 

ScrollRaster(a6) 


jsr 

WaitTOF(a6) ; 


addq 

#l,d6 ; 


cmp.b 

#2,d6 


bne 

main3 


add.l 

#l,a3 


tst.b 

(a3) 


bne 

main4 ; 


lea 

scrtext,a3 ; 


Textzeichen-Zeiger 


Schleife: Jeden Buchstaben zweimal 
ausgeben 

Rastport 

x-Start des Textes auf 637 
Zweiter Schleifendurchlauf? 

Wenn nein 
x-Start auf 633 

y-Start auf 8 (relativ zum Window) 
Zeichencursor setzen 

Ein Textzeichen ausgeben 


Rastport 

Scrolle 4 Pixel nach links 
Kein Scrolling nach oben 
x-Start bei 0 
y-Start bei 2 
x-Ende bei 639 
y-Ende bei 10 
; Scrollen 

Warte auf Strahlrücklauf 
Schleife Textausgabe 


Zeichenzeiger erhöhen 
Ende-Nullbyte erreicht? 
Wenn nein 

Scrolltext von vorne 
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main4: 


move.1 

ExecBase,a6 


move.1 

$56(a4),a0 

; Message abholen 

jsr 

GetMsg(a6) 


tst.l 

dO 

; Keine da? 

beq 

mainl 

; Wenn so 


scrtext: dc.b "Mein erster Scrolltext ! ",0 

even 


Programm 7.11 (Auszug) 


Beim Scrolling wird der Text in einer Schleife durchlaufen, 
wobei bei jedem Durchlauf ein Zeichen ausgegeben wird. 

Ausgabe und Scrollen erfolgt für jedes Zeichen zweimal: Zu¬ 
erst wird das Zeichen ganz am linken Rand ausgegeben, dann 
wird die ganze Zeile vier Pixel nach links gescrollt, 
anschließend wird das Zeichen vier Pixel vom linken Rand 
entfernt ausgegeben und die ganze Zeile nochmal um vier 
Pixel gescrollt. Vor jedem Ausgabeaufruf wird per WaitTOF 
auf den Rücklauf des Rasterstrahls (50 Mal pro Sekunde) 
gewartet. Das Monitorbild wird also alle 1/50 Sekunde von 
neuem aufgebaut. 

Die zweifache Ausgabe jedes Zeichens hat den Zweck, das 
Scrolling nicht zu schnell werden zu lassen. Man könnte 
natürlich jedes Zeichen auch nur einmal ausgeben und die 
Zeile dann um 8 Pixel scrollen, dann jedoch würde die 
Schrift kaum noch lesbar sein. Will man aber gezielt hohe 
Geschwindigkeiten erreichen, gibt man jedes Zeichen nur 
einmal aus. 

Die Geschwindigkeit kann aber auch herabgesetzt werden: An¬ 
statt jedes Zeichen ein- oder zweimal auszugeben, könnte man 
dies auch viermal oder sogar achtmal tun. Bei viermaliger 
Ausgabe müßte man dann jedesmal um zwei Pixel scrollen, bei 
achtmaliger sogar nur um einen (Ergebnis: Scrollschrift im 
Schneckentempo). 


7.7 Einrichten eigener Rast- und ViewPorts 

Bisher haben wir nur Rast- und Viewports benutzt, die quasi 
von Intuition "vorgefertigt" waren. Es gibt aber auch die 
Möglichkeit, diese Strukturen selbst anzulegen und so einen 
von Screens und Windows unabhängigen Ausgabebildschirm zu 
erzeugen. Fangen wir dabei mit dem einfacheren Thema an: den 
Rastports. 
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7.7.1 Initialisierung einer neuen Rastport-Struktur 

Dazu ist kein großer Aufwand nötig. Sie brauchen lediglich 
100 Bytes für die Struktur zu reservieren (am besten mit 
'ds.b') und die InitRastPort-Routine aufzurufen: 


InitRastPort = -198 (Graphics-Library) 


*rastPort al < Zeiger auf Speicherbereich für zu in¬ 
itialisierende Rastport-Struktur 

Erklärung Richtet eine neue Rastport-Struktur ein 

und füllt sie mit den Standard-Werten. 


Das war schon alles. Auf den so eingerichteten Rastport kön¬ 
nen Sie alle Graphics-Routinen, die mit Rastports arbeiten, 
anwenden. Es entsteht allerdings ein Problem: Die Grafik-Be¬ 
fehle, die Sie auf den Rastport ausführen, laufen nur "im 
Hintergrund" ab. Sehen können Sie die Grafik nicht, da sie 
ja zu keinem Screen oder Window gehört, sondern sozusagen 
"frei im Speicher schwebt". Um sie auf dem Bildschirm 
sichtbar zu machen, müssen Sie die Viewports benutzen. Dazu 
werden wir uns aber erst ein wenig Hintergrundwissen 
aneignen. 


7.7.2 Die View- und ViewPort-Struktur 

Einen ViewPort kann man als Graphics-Äquivalent eines Intui- 
tion-Screens ansehen. Er hat eigene Farben, eine eigene Auf¬ 
lösung und seine Startposition und Ausdehnung können festge¬ 
legt werden. Aus den Viewports berechnet die Graphics-Li¬ 
brary Steuerprogramme für die Grafik-Hardware, wodurch die 
Grafik letztendlich erst sichtbar wird. 

Interessant ist in diesem Zusammenhang, wie die Überlagerung 
von Intuition-Screens funktioniert. Intuition arbeitet auch 
mit Viewports; für jeden Screen wird ein solcher eingerich¬ 
tet. Überlagern sich nun mehrere Screens, werden ihre View¬ 
ports entsprechend angepaßt. Ihre Positionen werden gemäß 
denen der Screens verschoben, und ihre vertikalen Größen 
werden so eingestellt, daß sie den sichtbaren Teilen ihrer 
zugehörigen Screens entsprechen. Viewports selbst dürfen 
sich nämlich nicht überlagern, sie müssen alle hübsch unter¬ 
einander stehen. Diese Viewport-Liste wird dann auf dem 
Bildschirm angezeigt, wodurch sich eine scheinbare Überlage¬ 
rung ergibt. Jetzt ist auch klar, warum das Ziehen eines 
Screens manchmal etwas zäh vor sich geht: Bei jeder Änderung 
an der Lage der Screens zueinander müssen die ganze View¬ 
port-Liste und die daraus resultierenden Hardware-Strukturen 
neu berechnet werden, was eine Weile dauern kann. 
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Alle Viewports sind untereinander verkettet. Der erste ent¬ 
hält einen Eintrag, der auf den zweiten zeigt, dieser einen, 
der auf den dritten zeigt usw. Beim letzten Viewport ist 
dieser Zeiger 0. An den "Kopf" der Viewport-Liste wird nun 
eine sog. "View-Struktur" gestellt, die das ganze Viewport- 
Chaos verwaltet. Einen View kann man als die Zusammenfassung 
aller momentan auf dem Bildschirm sichtbaren Screens (sprich 
Viewports) ansehen. Die Struktur sieht so aus: 

Die View-Struktur 


00 

dc.l 

*v ViewPort 

04 

dc.l 

*v LOFCprList 

08 

dc.l 

*v_SHFCprList 

12 

dc.w 

v DyOffset 

14 

dc.w 

v DxOffset 

16 

dc.w 

v Modes 

18 


V SIZEOF 


Zeiger auf den ersten ViewPort 
Zeiger auf Longframe-Copperlist 
Zeiger auf Shortframe-Copperlist 
y-Startkoordinate des View 
x-Startkoordinate des View 
Bildschirmauflösung etc. 


*v_ViewPort 

Dieser Zeiger leitet die Viewport-Verkettung ein. 
*v_LOFCprList 

Hier steht ein Zeiger auf eine CprList-Struktur, welche dem 
Aufbau der sogenannten "Copperliste" des View dient. Die Li¬ 
ste, auf die hier gezeigt wird, findet im interlace- und 
nicht-interlace-Modus des Bildschirms Anwendung. Der Copper 
ist ein Koprozessor, der in Abhängigkeit von der Position 
des Rasterstrahls bestimmte Hardwareregister verändern kann. 
Er ist in erster Linie für die Ansteuerung der Grafik-Hard¬ 
ware zuständig, so laufen die Einstellung der Farben, der 
Auflösung und der auszugebenden Grafik über ihn. Eine Cop¬ 
perliste ist nichts anderes, als ein Programm für den Ko¬ 
prozessor . 

*v_SHFCprList 

Befindet sich der Bildschirm im interlace-Modus, werden zwei 
Copperlisten benötigt. In diesem Fall steht hier der Zeiger 
auf die zweite Liste. 


v DyOffset, vDxOffset 

Diese Einträge bestimmen die Startkoordinaten des View auf 
dem Bildschirm. 


v Modes 

Die hier anzugebenden Auflösungs- und Bildschirmmodi ent¬ 
sprechen denen beim Öffnen eines Intuition-Screens. Die 
Viewmodes, die Sie hier angeben, gelten als erlaubte Modis 
für alle Viewports. Hier die Liste der Zahlenwerte, eine 
genaue Beschreibung finden Sie im Intuition-Kapitel. 
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View-Mode Wert Bedeutung 


GENLOCKVIDEO $0002 
EXTRA_HALFBRITE $0080 
DUALPF $0400 
Hold-And-Modify $0800 
VP_HIDE $2000 
SPRITES $4000 
HIRES $0004 
LACE $8000 


Bindet eine externe Signalquelle ein 
64-Farben Modus 
Dual-Playfield 
HAM-Modus (4096 Farben) 

Kein Bild 

View mit Hardware-Sprites 
Verdoppelt Auflösung in x-Richtung 
Verdoppelt Auflösung in y-Richtung 


Noch ein paar Worte zu den Startkoordinaten. Sie stimmen 
nicht mit den von Intuition gewohnten Koordinaten überein. 
0/0 liegt also nicht da, wo man sonst die linke obere Ecke 
eines neuen Screens mit den Koordinaten 0/0 erwarten würde, 
sondern weit außerhalb des sichtbaren Bildschirmbereichs. 
Die von Intuition benutzten View-Startkoordinaten liegen 
etwa bei 40 in y- und 120 in x-Richtung. Diese Werte können, 
je nach Preferences-Bildeinstellung, etwas variieren. Der 
sichtbare Bereich beginnt bei 29 in y- und 93 in x-Richtung. 


Nun wissen Sie auch, wie das Preferences-Programm in bezug 
auf die Bildzentrierung arbeitet. Es verändert einfach die 
Startkoordinaten des Intuition-View (in gewissen Grenzen). 
Außerdem fällt bei Betrachtung der von Intuition verwendeten 
Startkoordinaten und der Koordinaten, bei denen der sicht¬ 
bare Bildbereich beginnt, auf, daß das Bild noch ein ganzes 
Stück links bzw. oberhalb der Intuition-Begrenzung sichtbar 
ist. Man könnte also das Bild nach links und oben verschie¬ 
ben, und es dafür ein Stück breiter und höher machen. 
Tatsächlich lassen sich so Grafiken darstellen, die über die 
Intuition-Begrenzung von 640 Punkten horizontal und 256 
Punkten vertikal (im Modus Hires Non-Interlaced) hinausge¬ 
hen. Dies nennt man Overscan-Modus. 


Beim Anlegen eines eigenen View brauchen Sie sich im Normal¬ 
fall nicht mit dem Ausprobieren der günstigsten Startkoor¬ 
dinaten herumzuschlagen, sie werden von der Initialisie¬ 
rungsroutine automatisch auf die Intuition-Standardwerte ge¬ 
setzt (die Sie natürlich nachträglich ändern können). 

Es gibt eine Graphics-Routine, die eine neue View-Struktur 
anlegt, d.h. diese mit Standard-Werten füllt. Sie brauchen 
später nur noch den Zeiger auf den ersten Viewport und den 
Viewmode einzutragen. Die Routine heißt InitView: 


InitView 


-360 (Graphics-Library) 


*view al < Zeiger auf Speicherbereich für neue 

View-Struktur 

Erklärung Legt eine neue View-Struktur an und 

füllt sie mit Standardwerten. 
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Sie brauchen also lediglich 18 Bytes Speicher zu reservie¬ 
ren, InitView aufzurufen und später ViewPort und Modes zu 
setzen. Um die restlichen Einträge müssen Sie sich nicht 
kümmern (zumindest nicht direkt). 

Nun kommen wir zu den eigentlichen Viewports. Ihre Struktur 
sieht folgendermaßen aus: 

Die ViewPort-Struktur 


00 

dc.l 

*vp Next 

04 

dc.l 

*vp ColorMap 

08 

dc.l 

*vp_DspIns 

12 

dc.l 

*vp Sprlns 

16 

dc.l 

*vp clrlns 

20 

dc.l 

*vp UCopIns 

24 

dc.w 

vp DWidth 

26 

dc.w 

vp DHeight 

28 

dc.w 

vp DxOffset 

30 

dc.w 

vp Dyoffset 

32 

dc.w 

vp Modes 

34 

dc.w 

vp reserved 

36 

dc.l 

*vp RasInfo 

40 


vp SIZEOF 


Zeiger auf den nächsten ViewPort 
Zeiger auf ColorMap-Struktur 
Zeiger auf Display-Copperliste 
Zeiger auf Sprite-Copperliste 
Zeiger auf Color-Copperliste 
Zeiger auf User-Copperliste 
Breite des ViewPorts 
Höhe des ViewPorts 
x-Startkoordinate 
y-Startkoordinate 
Bildschirmauflösung etc. 
Reserviert für Erweiterungen 
Zeiger auf Rasinfo-Struktur 


*vpNext 

Wie gesagt sind alle Viewports eines View untereinander ver¬ 
kettet. An dieser Stelle steht jeweils ein Zeiger auf den 
nächsten Viewport, im letzten steht hier eine 0. 


*vp_ColorMap 

Die ColorMap-Struktur gibt die Farben für den Viewport an. 
Zu ihr kommen wir gleich. 


*vp_DspIns - *vp_UCopIns 

Diese Zeiger weisen auf CopList-Strukturen, welche dem Auf¬ 
bau der Teil-Copperlisten des Viewport dienen. Es gibt ge¬ 
trennte Copperlisten für die Bildschirmauflösung, die Spri¬ 
tes (falls vorhanden) und die Farben. In vp_UCopIns können 
Sie eine eigene Copperliste einbinden (User-Copperlist). 
Über eine Graphics-Funktion werden die Teillisten aller 
Viewports zur Gesamtliste des übergeordneten View zusammen- 
gefaßt. 

vp_DWidth, vp_DHeight 

Die Höhe und Breite des Viewports. Diese Werte können auch 
kleiner sein als die voll auszugebende Grafik, dann fehlen 
einfach die entsprechenden Teile an den Seiten. 

vp_DxOffset, vp_DyOffset 

Diese Einträge geben die horizontale und vertikale Startko¬ 
ordinate des Viewports an. Sie sind relativ zu den Offsets 
des übergeordneten View zu sehen und können auch negativ 
sein (dann beginnt der Viewport links bzw. oberhalb vom 
Haupt-View). 
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vpModes 

Die View-Modi des Viewports. Erlaubt sind nur die Modi, die 
im Modes-Eintrag des View angegeben sind. 

*vp_RasInfo 

Zeiger auf eine Struktur, welche die Verbindung zwischen 
Viewport und den eigentlichen Grafikdaten im Speicher 
herstellt. 


Auch zur Initialisierung dieser Struktur gibt es eine Gra- 
phics-Routine: 


InitVPort = -204 (Graphics-Library) 


*viewPort aO < Zeiger auf Speicherplatz für die neue 
ViewPort-Struktur 

Erklärung Richtet eine neue ViewPort-Struktur ein 

und belegt sie mit den Standard-Werten. 


Die durch diese Routine eingestellten Standardwerte können 
Sie natürlich auch nachträglich ändern, z.B. die Positions- 
Offsets oder die Viewmodi. Selbst belegen müssen Sie die 
Einträge vp DWidth, vp_DHeight, vp_ColorMap und vp_RasInfo, 
da dies nicht von InitVPort übernommen wird. 


ColorMap, BitMap und Rasinfo 

Kommen wir nun zur nächsten benötigten Struktur, der Co- 
lorMap-Struktur. Ihre Einrichtung brauchen Sie wie gewohnt 
nicht von Hand zu übernehmen, trotzdem sei sie hier vorge¬ 
stellt: 


Die ColorMap-Struktur 


00 

dc.b 

cm Flags 

; Interne Flags 

01 

dc.b 

cm Type 

; Betriebssystemsversion 

02 

dc.w 

cm Count 

; Anzahl der Farbeinträge 

04 

dc.l 

*cm ColorTable 

; Zeiger auf Farbtabelle 

08 


cm SIZEOF 



cm_Flags 

Interne Flags, für den Programmierer unwichtig (im Zweifels¬ 
fall auf 0 setzen). 

cm Type 

BeX der Betriebssystemsversion 1.2 oder früher steht hier 
eine 0, bei späteren eine 1. 

cmCount 

Anzahl der Farbeintrags-Worte in der Farbtabelle 
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cm_ColorTable 

Ein Zeiger auf eine Wort-Tabelle, in der jedes Wort für 
einen Farbeintrag steht. Die Kodierung erfolgt wie im Ab¬ 
schnitt über die Farbpalette (LoadRGB4) besprochen. 


Für die Einrichtung dieser Struktur ist die Routine GetCo- 
lorMap zuständig: 


GetColorMap = -570 (Graphics-Library) 


entries 

dO 

< Anzahl der gewünschten Farb-Einträge 

*cm 

do 

> Zeiger auf initialisierte ColorMap- 

Struktur oder 0, wenn der Speicherplatz 
nicht ausreichte 

Erklärung 


Reserviert Speicher für eine ColorMap- 
Struktur einschließlich Farbtabelle und 
richtet die Struktur ein. 


Den Zeiger, den wir von dieser Routine erhalten, brauchen 
wir nur in den Eintrag vp_ColorMap (Offset 4) des Viewports 
einzutragen, und schon ist unser Viewport bereit für Farbän¬ 
derungen. Diese können mit den schon bekannten Routinen Se- 
tRGB4, SetRGB4CM oder LoadRGB4 vorgenommen werden, genau 
wie bei Intuition-Screen-Viewports. 

Nun wollen wir aber nicht nur Farben einstellen und Bild¬ 
schirmparameter bestimmen. Wir wollen auch Grafik zeichnen, 
und für die brauchen wir einen Speicherbereich. Dieser 
Speicherbereich wird später von der Videohardware auf dem 
Bildschirm abgebildet, weshalb er im Chip-RAM liegen muß. Im 
Intuition-Kapitel haben wir schon etwas über den Bitplane¬ 
artigen Aufbau einer Amiga-Grafik erfahren. Zur Erinnerung: 
Eine Grafik besteht aus bis zu sechs Bitplanes, die alle die 
gleiche Spalten- und Zeilenanzahl haben. Die Farbtabellen- 
nummer eines Punktes ergibt sich als Kombinations-Binärzahl 
aus den "übereinanderliegenden" Punkten (Bits) aller Bitpla¬ 
nes . 

Auf Graphics-Ebene ist das natürlich genauso. Für jede Bit¬ 
plane, über die unsere Grafik verfügen soll, müssen wir 
gesondert Speicher reservieren und die Startadressen in 
einer neuen Struktur, der BitMap-Struktur, ablegen (die auch 
noch ein paar weitere Daten enthält): 

Die BitMap-Struktur 


00 

dc.w 

bm BytesPerRow 

; Anzahl Bytes in einer Grafikzeile 

02 

dc.w 

bm Rows 

; Anzahl Zeilen in der Grafik 

04 

dc.b 

bm Flags 

; System-Flags 

05 

dc.b 

bmDepth 

; Tiefe, Anzahl Bitplanes 

06 

dc.b 

bm Pad 

; Reserviert für Erweiterungen 
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08 ds.l *bm_Planes,8 ; 8 Langwort-Planezeiger 

40 bm_SIZE0F 

bm_BytesPerRow 

Die Anzahl Bytes pro Zeile ergibt sich aus der Division der 
Pixelzahl pro Zeile durch 8 (jedes Bit repräsentiert ein Pi¬ 
xel, ein Byte hat 8 Bit). 

bmRows 

Die Anzahl Bytes pro Zeile muß mit der Anzahl Zeilen malge¬ 
nommen werden, dann ergibt sich die Speichergröße, die ein 
Plane der Grafik benötigt 

bm Depth 

Nimmt man diese Größe noch mit der Anzahl der Planes mal, 
hat man den Gesamtspeicherbedarf des Grafikschirms. 

*bm_Planes 

Hier müssen die Zeiger auf die Bitplane-Startadressen (für 
jede Plane getrennt) eingetragen werden. Obwohl hier 8 Lang¬ 
worte vorgesehen sind, liegt die Maximalzahl Bitplanes in 
einer Grafik bei 6. (Vielleicht will Commodore in Zukunft 
einen 8-Bitplane-Amiga herausbringen ???) 


Auch für diese Struktur gibt es eine Initialisierungs-Rou¬ 
tine in der Graphics-Library: 


InitBitMap = -390 


*bitMap 

aO 

< 

Zeiger auf Speicherplatz für die zu in¬ 
itialisierende Bitmap-Struktur 

depth 

dO 

< 

Anzahl der Planes für die Bitmap 

width 

dl 

< 

Breite der Bitmap in Pixeln 

height 

d2 

< 

Höhe der Bitmap in Pixeln 

Erklärung 



Initialisiert eine Bitmap-Struktur mit 
den angegebenen Werten. 


Den Speicher für die Planes reserviert man am besten mit Al- 
locRaster (beschrieben im Abschnitt über die temporären 
Rastports, 7.3.5), da diese Routine die Umrechenarbeit Pi- 
xelhöhe/-breite in Bytes übernimmt und automatisch Chip-RAM 
anfordert. 

Der Zeiger auf die somit erstellte Bitmap-Struktur muß in 
eine weitere Struktur, Rasinfo, eingetragen werden, die so 
aussieht: 

Die Rasinfo-Struktur 


00 

dc.l 

*ri_Next 

; Zeiger auf nächste Rasinfo 

04 

dc.l 

*ri_BitMap 

; Zeiger auf Bitmap 

08 

dc.w 

ri RxOffset 

; x-Koordinate des Rasters 
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10 dc.w riRyOffset ; y-Koordinate des Rasters 

12 ri_SIZE0F 

*ri_Next 

Wenn man mit Spezial-Grafikmodi wie Dual-Playfield arbeitet, 
werden mehrere Raster-Bitmaps für einen Viewport benötigt. 
Im Normalfall aber kann hier einfach eine 0 eingetragen wer¬ 
den . 

*ri_BitMap 

Ein Zeiger auf eine Bitmap-Struktur. Rasinfo dient somit als 
"Verbindungsstück" zwischen Viewport und Bitmap. 


ri RxOffset, riRyOffset 

Auch dem Raster-Bitmap kann eine Startkoordinate gegeben 
werden. Das ist nützlich, wenn Sie nicht die komplette Gra¬ 
fik anzeigen wollen, sondern erst ab einer bestimmten Zeile 
und/oder Spalte. Im Normalfall können Sie einfach 0/0 ein¬ 
tragen . 


In die Rasinfo-Struktur wird ein Zeiger auf die Bitmap ein¬ 
getragen, und in die Viewport-Struktur der Zeiger auf die 
Rasinfo-Struktur (Eintrag vp_RasInfo, Offset 24). Die Ver¬ 
bindung zwischen Viewport und Bitmap ist somit hergestellt. 
Die Rasinfo-Struktur ist die einzige Struktur in diesem Zu¬ 
sammenhang, für die es keine Initialisierungs-Routine in der 
Graphics-Library gibt. Sie müssen die Werte also "von Hand" 
mit MOVE-Befehlen in die Struktur schreiben. 

Der Zeiger auf die Bitmap-Struktur muß schließlich auch noch 
in die Rastport-Struktur, in den Eintrag rp_Bitmap (Offset 
4), geschrieben werden. 

7.7.3 Vorbereitung des Views zur Bilddarstellung 

Wenn Sie alle gewünschten und benötigten Einstellungen in 
View und Viewport vorgenommen haben, insbesondere die Ein¬ 
stellung von vp_DWidth und vp_DHeight gemäß der Größe der 
Grafik, die Sie anzeigen möchten, trennen Sie nur noch drei 
Routinen-Aufrufe vom eigenen Grafikschirm. Der erste ist Ma- 
keVPort: 


MakeVPort = -216 (Graphics-Library) 


*view 

*viewPort 


aO < Zeiger auf View-Struktur, zu der der zu 
initialisierende Viewport gehört 
al < Zeiger auf zu initialisierenden Viewport 


Erklärung Berechnet die Teil-Copperlisten eines 

Viewports und stellt sie in CopList- 

Strukturen zusammen. 
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Wie diese Routine genau arbeitet, insbesondere wie die Co- 
pList-Struktur aussieht, ist hier nicht von Interesse. Sie 
müssen nur wissen, daß diese Routine aufzurufen ist, um aus 
den Angaben für die Startkoordinaten und die Größe eines 
Viewports sowie die Lage seiner Bitmap im Speicher, die 
Teil-Copperlisten für den Viewport zu berechnen. Die nächste 
Routine faßt alle Teil-Copperlisten der Viewports in einer 
Gesamt-Copperliste für den View zusammen: 


MrgCop = -210 (Graphics-Library) 


*view al < Zeiger auf den View, dessen Gesamt-Cop- 

perliste berechnet werden soll 

Erklärung Faßt alle Teil-Copperlisten der View¬ 

ports zur View-Gesamt-Copperliste zusam¬ 
men und bringt sie in eine CprList- 
Struktur. 


Vielleicht interessiert Sie der Unterschied zwischen einer 
CopList- und einer CprList-Struktur. In der CopList-Struktur 
stehen die Copper-Befehle in einer Graphics-spezifischen 
Form mit diversen System-Informationen wie Zeigern auf den 
nächsten Befehl etc. In der CprList aber steht nur das reine 
Copper-Programm, das der Coprozessor direkt ausführen kann. 
Nun zur dritten und letzten Routine: 


LoadView 


-222 (Graphics-Library) 


view 


al < Darzustellender View 


Erklärung 


Stellt den angegebenen View auf dem 
Bildschirm dar. 


Diese Routine sorgt also dafür, daß unser vorbereiteter und 
Copper-berechneter View auf dem Bildschirm ausgegeben wird. 

Falls Sie den Sinn der letzten drei Routinen noch nicht so 
ganz begriffen haben, macht nichts, rufen Sie sie einfach 
nach Beendigung Ihrer Viewport-Vorbereitungen oder 
-Änderungen nacheinander auf, dann kann nichts schiefgehen. 

Damit nach Beendigung des Programms wieder die Grafik 
erscheint, die vorher zu sehen war, sollte man sich am 
besten irgendwann vor dem LoadView-Aufruf die Adresse des 
aktuellen Views speichern. Dies geschieht mit der Routine 
ViewAddress: 
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ViewAddress 

= 

-294 (Intuition-Library) 


*view dO > Zeiger auf den aktuellen View 

Erklärung Ermittelt einen Zeiger auf die Struktur 

des derzeit angezeigten View. 


Beachten Sie, daß sich diese Routine in der Intuition-Li¬ 
brary befindet! Vor dem Programmende können Sie dann, um die 
alte Grafik wieder erscheinen zu lassen, Loadview mit der 
von ViewAddress gemeldeten Adresse aufrufen. 


7.7.4 "Aufräumarbeiten" vor dem Programmende 

Im Laufe der View- und Viewport-Vorbereitungen haben wir 
eine ganze Menge Routinen aufgerufen, die einige Strukturen 
angelegt haben. Als "ordentliche" Programmierer sollten wir 
diese Strukturen vor dem Programmende natürlich auch wieder 
"aufräumen", sprich den belegten Speicherplatz freigeben. 
Das dürfen Sie aber erst tun, wenn der View durch Aufruf von 
Loadview mit der alten View-Adresse vom Bildschirm entfernt 
worden ist! 

Beginnen wir mit dem Speicherbereich des Grafikrasters, den 
wir mit AllocRaster definiert und in die Bitmap-Struktur 
eingetragen haben. Mit der Routine FreeRaster, die bereits 
im Abschnit temporäre Rastports besprochen wurde, können wir 
den Raster wieder freigeben. 

Als nächstes nehmen wir uns die, von GetColorMap angelegte 
Colormap-Struktur vor. Sie ist recht einfach zu entfernen: 


FreeColorMap = -576 (Graphics-Library) 


*colorMap aO < Zeiger auf freizugebende Colormap 

Erklärung Gibt den, von der angegebenen Colormap- 

Struktur belegten Speicherbereich frei. 


Anschließend behandeln wir die Teil- und Gesamt- 
Copperlisten. In den Viewports wurden durch MakeVPort vier 
CopList-Strukturen angelegt. Diese müssen durch einen Aufruf 
der folgenden Routine freigegeben werden: 


FreeVPortCopLists = -540 (Graphics-Library) 


*viewPort aO < Zeiger auf Viewport, dessen Teil-Copper¬ 
listen freigegeben werden sollen 
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Erklärung Gibt den, von den vier Teil-Copperlisten 

des angegebenen Viewports belegten Spei¬ 
cher frei. 


Diese Routine muß für alle Viewports, die Sie benutzt haben, 
aufgerufen werden. In diesem Zusammenhang sei noch eine an¬ 
dere Routine, die auch zum Freigeben von CopLists dient, 
vorgestellt: 


FreeCopList = -546 (Graphics-Library) 


♦copList aO < Zeiger auf freizugebende CopList 

Erklärung Gibt den von einer CopList belegten 

Speicher frei. 


Anstatt FreeVPortCopLists, die sich automatisch alle vier 
CopLists eines Viewport vornimmt, können Sie FreeCopList 
benutzen, was allerdings etwas mehr an Arbeit bedeutet. 
Dieser Routine müssen Sie nämlich die Inhalte der vier 
Copperlist-Einträge vp_DspIns bis vp_UCopIns Ihrer Viewports 
übergeben. FreeCopList ist nur wirklich sinnvoll, wenn Sie 
eigene CopList-Strukturen aufgebaut hätten. 

Jetzt kommen die beiden Gesamt-Copperlisten aus der View- 
Struktur an die Reihe. Zeiger auf sie sind zu finden in den 
Einträgen v LOFCprList (Offset 4) und v_SHFCprList (Offset 
8). Die Inhalte dieser Einträge müssen der folgenden Routine 
übergeben werden: 


FreeCprList 


-564 (Graphics-Library) 


♦cprlist aO < Zeiger auf freizugebende CprList 

Erklärung Gibt den von einer CprList-Struktur be¬ 

legten Speicherplatz frei. 


Beachten Sie den Unterschied zwischen CopList und CprList! 
Im Viewport stehen CopLists, im View aber CprLists, die mit 
unterschiedlichen Routinen zu entfernen sind. 


7.7.5 Vorgehensweise bei der Arbeit mit Views 

Da es wohl etwas schwierig ist, all die Informationen der 
letzten Abschnitte zu behalten, hier noch einmal eine Kurz- 
Zusammenstellung der für eine View-Erstellung notwendigen 
Schritte: 
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1. Mit 'ds.b' (leeren) Speicherbereich für die Strukturen 
RastPort (100 Bytes), View (18 Bytes), ViewPort (40 By¬ 
tes), Rasinfo (12 Bytes) und BitMap (40 Bytes) im Pro¬ 
gramm reservieren. 

2. RastPort, ViewPort und BitMap durch Aufruf der Routinen 
InitRastPort, InitVPort und InitBitMap (letztere mit den 
Angaben für Breite, Höhe und Tiefe der Grafik) initiali¬ 
sieren. 

3. Mit AllocRaster Speicher für jede Bitplane der Grafik 
reservieren und die Zeiger auf sie in die BitMap-Struk- 
tur (Eintrag bm_Planes) eintragen. 

4. Von GetColorMap eine ColorMap-Struktur einrichten las¬ 
sen, den Zeiger auf die Struktur in den Eintrag 
vp ColorMap des Viewport schreiben und die Farben mit 
SetRGB4, SetRGB4CM oder LoadRGB4 einstellen. 

5. Die Rasinfo-Struktur durch Belegen der Einträge 

ri_BitMap, ri_DxOffset und ri_DyOffset einrichten und 
den Zeiger auf sie in den Viewport eintragen 

(vp_RasInfo). 

6. Den Eintrag rp_BitMap des Rastports mit dem Zeiger auf 
die Bitmap belegen. 

7. Die View-Struktur mit InitView initialisieren und den 
Zeiger auf den (ersten) Viewport darin eintragen. 

8. Bei Verwendung mehrerer Viewports die Schritte 1-3 wie¬ 
derholen und die Viewports durch Einträgen der Zeiger 
auf den jeweils nächsten untereinander verketten. 

9. Die Einträge vp DWidth, vp DHeight, vp_Modes und v_Modes 
mit den gewünschten Werten“belegen. 

10. Wenn gewünscht, die Einträge v_DxOffset, v_DyOffset, 
vp_DxOffset und vp_DyOffset nach Bedarf ändern. 

11. Die Routine MakeVPort für alle Viewports aufrufen. 

12. Die Routine MrgCop aufrufen. 

13. Die Adresse des alten Views mit ViewAddress holen und 
merken. 

14. Mit Loadview den neuen View auf den Bildschirm bringen. 

Zur ordentlichen Entfernung eines View sind folgende 
Schritte notwendig: 

1. Zurückholen des alten, gemerkten View per Loadview mit 
der alten View-Adresse. 

2. Freigabe der Teil-Copperlisten aller Viewports durch Auf¬ 
ruf von FreeVPortCopLists. 

3. Freigabe der View-Gesamtcopperlisten mit FreeCprList. 

4. Freigabe des Colormap-Speichers mit FreeColorMap. 

5. Freigabe des Grafik-Rasters mit FreeRaster. 

Übrigens: Vielleicht wundert es Sie, daß zwischen Rastport 
und Viewport überhaupt keine direkte Zeiger-Verbindung be¬ 
steht. Dies ist aber auch nicht nötig, da beide mit der 
Bitmap, die ja die eigentlichen Grafikdaten repräsentiert, 
in Verbindung stehen, über den Rastport wird in die Bitmap 
gezeichnet, und über den Viewport wird selbige auf dem Bild¬ 
schirm dargestellt. Alles klar? 
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Nun haben wir endlich alles beisammen, um einen eigenen. In¬ 
tuition-unabhängigen Grafikbildschirm erstellen, anzeigen 
und wieder entfernen zu können. Das war sicherlich ein har¬ 
tes Stück Theorie, aber das Thema Views und Viewports ist 
halt nicht so einfach. 


7.7.6 Beispielprogramme 

Die Mühe hat sich aber bestimmt gelohnt, denn die nun fol¬ 
genden Beispielprogramme sind sehr interessant und teilweise 
auch recht witzig. Fangen wir gleich zünftig an mit einem 
"Workbench-Erdbeben-Programm". Es verändert zufallsgesteuert 
die Bild-Startkoordinate des Intuition-View in bestimmten 
Grenzen (maximal 2 Pixel über oder unter der richtigen Ein¬ 
stellung) und bewirkt so einen recht "erschütternden" Ef¬ 
fekt: 


* Programm 7.12: "Bench-Quake" (Erdbeben auf der Workbench) 

ExecBase = 4 

OpenLib = -552 

CloseLib = -414 

ViewAddress = -294 

RemakeDisplay = -384 

WaitTOF = -270 

move.l ExecBase,a6 ; Libs öffnen 

lea intname,al 

clr.l do 

jsr OpenLib(a6) 

move.1 dO,intbase 

lea gfxname,al 

clr.l dO 

jsr 0penLib(a6) 

move.l dO,gfxbase 

move.l intbase,a6 

jsr ViewAddress(a6) ; Adresse des Intui-View holen 

move.l d0,a3 ; und sichern 

move.w 12(a3),d3 ; y-Koordinate des View 

move.w 14(a3),d4 ; x-Koordinate 

mainl: move.w d3,dl ; Alte y-Koordinate nach dl 

bsr random ; Zufallszahl erzeugen (-2 bis +2) 

add.w d0,dl ; Zur y-Koordinate hinzuaddieren 

move.w d4,d2 ; Selbiges für die x-Koordinate 

bsr random 

add.w d0,d2 

move.w dl,12(a3) ; Zufällig geänderte Koordinaten in den 

move.w d2,14(a3) ; View eintragen 
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jsr 


RemakeDisplay(a6) 

; Display neu berechnen : 

lassen 

move.1 


gfxbase,a6 



jsr 


WaitTOF(a6) ; 

Auf Strahlrücklauf warten 


move.1 


intbase,a6 



btst 


#6,$bfe001 ; 

Linke Maustaste gedrückt? 


bne 


mainl ; 

Wenn nein 


btst 


#2,$dff016 

Rechte Taste gedrückt? 


bne 


mainl ; 

Wenn nein 


move.w 


d3,12(a3) 

Alte Viewkoordinaten wiederherstellen 

move.w 


d4,14(a3) 

und das Display neu berechnen 

lassen 

jsr 


RemakeDisplay(a6) 


move.1 


ExecBase,a6 



move.1 


intbase,al ; 

Libs schließen und Ende 


jsr 


CloseLib(a6) 



move.1 


gfxbase,al 



jsr 


CloseLib(a6) 



rts 





random: move.l 


a5,d0 ; 

Zufallszahlen-Generator: 


asl.l 


#l,dO 

Erzeugt eine Zahl zwischen -2 

und +2 

bhi 


rnl ; 

und gibt sie in dO zurück 


eor .1 


#$ld872b41,do 



rnl: move.l 


dO,aS 



and.l 


#$ffff,d0 



divu 


#5,d0 



swap 


dO 



and.l 


#$ffff,do 



not.w 


dO 



add.w 


#2,d0 



rts 





* Datenbereich 





intname: 

dc.b "intuition.library",0 



even 



gfxname: 

dc.b "graphics.library",0 



even 



intbase: 

de 

.1 0 



gfxbase: 

de 

.1 0 




Programm 7.12: "Bench-Quake" (Erdbeben auf der Workbench) 


Die ursprünglichen Einstellungen für die Startkoordinaten 
werden aus der Intui-View-Struktur ausgelesen und in d3 und 
d4 zwischengespeichert. Bei jedem Durchlauf der Haupt¬ 
schleife wird zu diesen Koordinaten eine Zahl zwischen +2 
und -2 hinzuaddiert, und die neuen Koordinaten werden in die 
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View-Struktur eingetragen. Nach Aufruf von RemakeDisplay 
wird der View mit den neuen Einstellungen dargestellt. Abge¬ 
brochen werden kann die Schleife durch gleichzeitiges 
Drücken beider Maustasten. Vor dem Programmende werden dann 
die "richtigen" Startkoodinaten wieder eingetragen. 

Das nächste Demoprogramm initialisiert einen kompletten, ei¬ 
genen View. Auf diesem wird dann das schon bekannte Ellip- 
sen-Muster dargestellt: 


* Programm 7.13: Einrichtung eines Views 


ExecBase = 4 


OpenLib = 

-552 


CloseLib 

-414 


InitRastPort = 

-198 


InitBitMap 

-390 


InitVPort 

-204 


Initview = 

-360 


AllocRaster = 

-492 


GetColorMap = 

-570 


LoadRGB4 

-192 


MakeVPort = 

-216 


MrgCop = 

-210 


ViewAddress = 

-294 


Loadview = 

-222 


ClearScreen = 

-48 


DrawEllipse = 

-180 


FreeVPortCL 

-540 


FreeCprList 

-564 


FreeColorMap = 

-576 


FreeRaster = 

-498 


move.1 

4,a6 ; 

Libs öffnen 

lea 

intname,al 


clr.l 

dO 


jsr 

0penLib(a6) 


move.1 

dO,intbase 


lea 

gfxname,al 


clr.l 

dO 


jsr 

0penLib(a6) 


move.1 

d0,gfxbase 


move. 1 

gfxbase,a6 


lea 

rport,al ; 

Rastport einrichten 

jsr 

InitRastPort(a6) 


lea 

vport,a0 ; 

Viewport einrichten 

jsr 

InitVPort(a6) 


lea 

bmap,a0 ; 

Bitmap mit den Werten 

moveq 

#2,d0 

Tiefe = 2 
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move . 1 

#320,dl 

Breite = 320 

move.1 

#256,d2 

Höhe = 256 

jsr 

lnitBitMap(a6) ; 

einrichten 

lea 

bmap,a4 ; 

Start der Bitmap-Struktur 

move.1 

#320,dO ; 

Speicher für Plane 1 

move.1 

#256,dl 


jsr 

AllocRaster(a6) 

; allokieren 

move.1 

d0,8(a4) ; 

f 

Zeiger auf Speicher in Bitmap- 
Struktur eintragen 

move.1 

#320,dO ; 

Dasselbe mit Plane 2 

move.1 

#256,dl 


jsr 

AllocRaster(a6) 


move.1 

d0,12(a4) 


moveq 

#4,d0 

Colormap für 4 Farben holen 

jsr 

GetColorMap(a6) 


lea 

vport,a0 ; 

Zeiger auf sie in Viewport 

move . 1 

d0,4(a0) 

eintragen 

lea 

coltab,al ; 

Zeiger auf Farbtabelle 

moveq 

#2,d0 

Zwei Farben setzen 

jsr 

LoadRGB4(a6) 


lea 

bmap,a0 ; 

Bitmap-Zeiger 

lea 

rport,al ; 

Rastport-Zeiger 

move . 1 

a0,4(al) ; 

Bitmap in Rastport eintragen 

lea 

rinfo,al ; 

Rasinfo-Zeiger 

move . 1 

a0,4(al) 

Bitmap in Rasinfo eintragen 

lea 

vport,a0 ; 

Viewport-Zeiger 

move . 1 

al , $24(aO) ; 

Rasinfo in Viewport eintragen 

lea 

view,al ; 

View-Struktur einrichten 

jsr 

InitView(a6) 


lea 

view,a0 ; 

View-Zeiger 

lea 

vport,al ; 

Viewport-Zeiger 

move . 1 

al,(a0) 

Viewport in View eintragen 

move.w 

#320 , $18(al) 

Breite des Viewport = 320 

move.w 

#256,$la(al) 

Höhe des Viewport = 256 

move.w 

#0,$20(al) 

Viewmode des Viewport = 0 

move.w 

#0,$10(a0) 

Viewmode des View = 0 

jsr 

MakeVPort(a6) ; 

Teil-Copperlisten berechnen 

lea 

view,al ; 

View-Gesamtcopperlisten 

jsr 

MrgCop(a6) ; 

berechnen 

move.1 

intbase,a6 


jsr 

ViewAddress(a6) 

; alte View-Adresse holen 

move.1 

d0,oldview ; 

und merken 


338 




Die Graphics-Library 


move.l gfxbase,a6 

lea rport,al ; 

jsr ClearScreen(a6) 

lea view,al ; 

jsr LoadView(a6) 

lea rport,a4 

mainl: move.l a4,al ; 


finish: btst #6,$bfe001 ; 

bne finish ; 

move.l oldview,al ; 

jsr Loadview(a6) 

lea vport,aO ; 

jsr FreeVPortCL(a6) 

lea view,a3 ; 

move.l 4(a3),a0 

jsr FreeCprList(a6) 

move.l 8(a3),a0 

jsr FreeCprList(a6) 

lea vport,aO ; 

move.l 4(a0),a0 

jsr FreeColorMap(a6) 

lea bmap,a3 ; 

move.l 8(a3),a0 ; 

move.l #320,do 

move.l #256,dl 

jsr FreeRaster(a6) 

move.l 12(a3),a0 ; 

move.l #320,dO 

move.l #256,dl 

jsr FreeRaster(a6) 

move.l ExecBase,a6 

move.l gfxbase,al ; 

jsr CloseLib(a6) 

move.l intbase,al 

jsr CloseLib(a6) 

rts 

* Datenbereich 


Rastport löschen 
Neuen View darstellen 

Ellipsen-Muster zeichnen 

Linke Maustaste gedrückt? 

Wenn nein 

Gemerkten View wieder darstellen 
Teil-Copperlisten freigeben 
Gesamt-Copperlisten freigeben 

Colormap freigeben 

Zeiger auf Bitmap 

Speicher für Plane 1 freigeben 

Speicher für Plane 2 freigeben 

Libs schließen und Tschüß 


intname: dc.b "intuition.library",0 

even 

gfxname: dc.b "graphics.library",0 
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intbase: 

even 

dc.l 

0 

gfxbase: 

dc.l 

0 

rport: 

dcb.b 

100,0 

view: 

dcb.b 

18,0 

vport: 

dcb.b 

40,0 

rinfo: 

dcb.b 

12,0 

bmap: 

dcb.b 

40,0 

oldview: 

dc.l 

0 

coltab: 

dc.w 

$000,$ff0 

xrad: 

dc.l 

140 

yrad: 

dc.l 

0 


Programm 7.13: Einrichtung eines Views 


Die Funktionsweise dieses Programms dürfte aufgrund der vor¬ 
angegangenen ausführlichen Beschreibung klar sein. 

Kommen wir zum nächsten Programm. Es richtet keinen komplet¬ 
ten View, sondern nur einen Viewport ein und hängt diesen in 
die Liste der Intuition-Viewports, sprich der Screens. 
Dadurch erscheint der neue Grafikbereich vor den Intuition- 
Screens, ist selbst aber kein solcher. Auf diesem Viewport 
lassen wir eine Scrollschrift laufen, wie schon aus einem 
der vorangegangenen Programm bekannt. 


* Programm 7.14: 

ExecBase = 

OpenLib = 

CloseLib = 
InitRastPort = 
InitBitMap = 
InitVPort = 
AllocRaster = 
GetColorMap = 
LoadRGB4 
MakeVPort = 
MrgCop = 

ViewAddress 
LoadView = 
ClearScreen 
Move = 

Text = 

ScrollRaster = 
WaitTOF 

RemakeDisplay = 
FreeVPortCL = 
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FreeCprList = 

-564 

FreeColorMap = 

-576 

FreeRaster = 

-498 

move.1 

4,a6 ; 

lea 

intname,al 

clr.l 

dO 

jsr 

0penLib(a6) 

move.1 

dO,intbase 

lea 

gfxname,al 

clr.l 

dO 

jsr 

OpenLib(a6) 

move.1 

dO,gfxbase 

move.1 

gfxbase,a6 

lea 

rport,al ; 

jsr 

InitRastPort(a6) 

lea 

vport,aO ; 

jsr 

InitVPort(a6) 

lea 

bmap,aO ; 

moveg 

#2,d0 

move.1 

#640,dl 

move.1 

#14,d2 

jsr 

InitBitMap(a6) 

lea 

bmap,a4 

move.1 

#640,dO ; 

move.1 

#14,dl 

jsr 

AllocRaster(a6) 

move.1 

d0,8{a4) 

move.1 

#640,dO 

move.1 

#14,dl 

jsr 

AllocRaster(a6) 

move. 1 

d0,12(a4) 

moveq 

#4,d0 ; 

jsr 

GetColorMap(a6) 

lea 

vport,a0 ; 

move.1 

d0,4(a0) 

lea 

coltab,al ; 

moveq 

#2 ,d0 

jsr 

LoadRGB4(a6) 

lea 

bmap,a0 ; 

lea 

rport,al ; 

move.1 

a0,4(al) ; 

lea 

rinfo,al ; 

move.1 

a0,4(al) ; 

lea 

vport,a0 ; 


Libs öffnen 


Neuen Rastport einrichten 


Neuen Viewport einrichten 


Bitmap-Struktur mit gewünschten 
Werten initialisieren 


Speicher für Plane 1 allokieren 


und in Bitmap-Struktur eintragen 
Selbiges für Plane 2 


Colormap-Struktur für 4 Farben 
; holen 

und in Viewport eintragen 


Farben per LoadRGB4 setzen 


Bitmap nach aO 

Rastport nach al 

Bitmap in Rastport eintragen 

Rasinfo nach al 

Bitmap in Rasinfo eintragen 

Viewport nach aO 
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mainl: 


move.1 

al,$24(ao) ; 

Rasinfo in Viewport eintragen 

lea 

move.w 

move.w 

move.w 

move.w 

vport,al ; 

#640,$18(al) 
#14,$la(al) 
#$8000,$20(al) ; 
#245,$le(al) ; 

Viewport holen 

Breite eintragen 

Höhe eintragen 

Viewmode HIRES 
y-Start-Koordinate 

move.1 

intbase,a6 


jsr 

move.1 

ViewAddress(a6) 

d0,a5 

; Intui-View holen 

move.1 

gfxbase,a6 


lea 

move.1 
move.1 
move.1 

vport,al ; 

(a5),oldvport ; 
(a5),(al) 
al,(a5) 

Unser Viewport 

Alten Intui-Viewport merken 
Unseren Viewport in Intui-View 
einklinken 

jsr 

MakeVPort(a6) ; 

Teil-Copperlisten berechnen 

move.1 
jsr 

a5,al ; 

MrgCop(a6) 

Gesamt-Copperlisten berechnen 

lea 

jsr 

rport,al ; 

ClearScreen(a6) 

Rastport löschen 

move.1 
jsr 

a5,al ; 

LoadView(a6) 

Intui-View neu darstellen 

lea 

lea 

scrtext,a3 ; 

rport,a4 

Bekannte Scroll-Routine 

move.1 

gfxbase,a6 


move.1 

oldvport,(a5) ; 

Alten Intui-Viewport in View 

move.1 
jsr 

intbase,a6 ; Display neu berechnen 

RemakeDisplay(a6) 

lea 

jsr 

vport,a0 ; 

FreeVPortCL(a6) 

Viewport-Copperlisten freigeben 

lea 

move.1 
jsr 

vport,a0 ; 

4(a0),a0 

FreeColorMap(a6) 

Colormap freigeben 

lea 

move.1 
move.1 
move.1 
jsr 

move.1 

bmap,a3 ; 

8(a3),a0 
#640,dO 
#14,dl 

FreeRaster(a6) 
12(a3),a0 

Bitmap-Speicher freigeben 
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move.1 

#640,dO 

move.1 

#14,dl 

jsr 

FreeRaster(a6) 

move.1 

ExecBase,a6 

move.1 

gfxbase,al 

jsr 

CloseLib(a6) 

move.1 

intbase,al 

jsr 

rts 

CloseLib(a6) 


Libs schließen und Ende 


* Datenbereich 


intname: 

dc.b 

even 

"intuition.library",0 

gfxname: 

dc.b 

even 

"graphics.library",0 

intbase: 

dc.l 

0 

gfxbase: 

de. 1 

0 

rport: 

deb.b 

100,0 

vport: 

deb.b 

40,0 

rinfo: 

deb.b 

12,0 

bmap: 

deb.b 

40,0 

coltab: 

dc.w 

$000,$ff0 

scrtext: 

dc.b 

even 

"Scrolltext auf eigenem Viewport 

oldvport: 

dc.l 

0 


IT 


,0 


Programm 7.14: Scrollschrift auf eigenem Viewport 


7.8 Grafik-Elemente (Gels) 

Wenn Sie sich schon einmal mit Actionspielen befaßt haben, 
dann haben Sie sicherlich reichlich Bekanntschaft mit den 
Gels (Graphic-Elements) gemacht. Es handelt sich dabei um 
(meist relativ kleine) schnelle, bewegliche Grafiken, z.B. 
Raumschiffe, Gegner oder Schüsse. Es gibt drei verschiedene 
Typen von GELS, von denen sich zwei sehr ähneln, die dritte 
aber völlig anderer Art ist. Befassen wir uns zunächst mit 
dem einfachsten GEL-Typ: den SimpleSprites. 


7.8.1 Die SimpleSprites 

Der Begriff "Sprite" ist im Computer-Jargon weit verbreitet. 
Die wörtliche Übersetzung lautet "Elfe" oder "Fee". Wie man 
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auf diesen Ausdruck für diese Art Grafik-Elemente gekommen 
ist, ist wohl etwas rätselhaft. Die Sprites werden nämlich 
gewöhnlich zur Darstellung von Schüssen oder Explosionen 
eingesetzt, was wohl nicht sehr "feenhaft" ist (außer wir 
haben es mit einer bösen Fee zu tun...). 

Bei den Sprites handelt es sich um kleine Grafik-Elemente, 
die direkt von der Hardware erzeugt und in die normale Gra¬ 
fikausgabe eingemischt werden. Sie sind dementsprechend 
schnell zu bewegen und im Aussehen zu ändern. Ein solcher 
Geschwindigkeitsvorteil bringt aber gewöhnlich anderweitige 
Nachteile mit sich, so auch hier: Ein Sprite darf höchstens 
16 Pixel breit, dafür aber beliebig hoch sein. Außerdem kann 
er höchstens vier verschiedene Farben annehmen (wobei eine 
Farbe transparent dargestellt wird), bzw. 16 Farben, wenn 
man zwei Sprites zusammenmischt. 

Die Grafik-Hardware stellt uns 8 Sprites zur Verfügung 
(gezählt wird von 0 bis 7), von denen das Betriebssystem 
eins (das erste) für die Maus beschlagnahmt (richtig, die 
Maus ist ebenfalls ein Sprite). Über die übrigen 7 können 
wir, falls zur Zeit kein anderes sprite-benutzendes Programm 
läuft, frei verfügen. 


Anmeldung eines SimpleSprite 

Zunächst lassen wir uns den gewünschten Sprite vom System 
reservieren (falls er nicht schon reserviert ist), und zwar 
mit der Routine GetSprite: 


GetSprite = -408 (Graphics-Library) 


*sSprite 

aO 

< Zeiger auf SimpleSprite-Struktur für den 
zu benutzenden Sprite 

spriteNum 

do 

< Nummer des gewünschten Sprites (0-7) 
oder -1, wenn der erste freie Sprite ge¬ 
holt werden soll 

spriteNum 

dO 

> Nummer des effektiv geholten Sprites 
oder -1, falls alle bzw. der gewünschte 
Sprite belegt waren 

Erklärung 


Reserviert einen bestimmten oder 

beliebigen Hardware-Sprite. 


Die SimpleSprite-Struktur dient der Verwaltung des Sprites. 
Sie sieht folgendermaßen aus: 


Die SimpleSprite-Struktur 


00 

04 

06 


dc.l *ss_posctldata 
dc.w ss_height 

dc.w ss x 


; Zeiger auf Grafik-Daten 

; Höhe 

; x-Position 
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08 

dc.w 

ss _y 

; y-Position 

10 

dc.w 

ss num 

; Sprite-Nummer 

12 


ss SIZEOF 



Die Einträge, um die Sie sich selbst kümmern müssen, sind 
ss_posctldata und ss_height. Die übrigen werden automatisch 
vom System verwaltet, auch ss_num. In ss_height wird die 
Höhe des Sprites eingetragen und in ss_posctldata ein Zeiger 
auf die eigentlichen Grafik-Daten, zu deren Aufbau wir jetzt 
kommen wo11en. 

Da die Sprite-Grafikdaten von der Hardware auf den Bild¬ 
schirm gebracht werden, müssen sie immer im Chip-RAM stehen. 
Die Daten sind wortweise aufgebaut. In die ersten beiden 
Worte trägt das System die Werte für die x- und y-Positionen 
ein. Sie können hier einfach zwei Nullen eintragen. Eine 
besondere Bedeutung hat lediglich das Bit 7 im zweiten Wort: 
Ist es gesetzt, handelt es sich um einen Attached-Sprite 
(mit 16 Farben). Dazu kommen wir später noch. 

Dann folgen für jede Zeile des Sprites zwei Worte. Da Spri¬ 
tes, wie schon erwähnt, im Normalfalle vier Farben haben, 
werden zwei Bitplanes benötigt, um alle Farben darstellen zu 
können. Sprites sind immer 16 Punkte breit. Diese 16 Punkte 
haben genau in einem Wort Platz. Falls Sie einen schmaleren 
Sprite wollen, setzen Sie einfach die überflüssigen Punkte 
auf 0. 

Die erste Farbe (Nummer 0) jedes Sprites gilt als die trans¬ 
parente Farbe. An den Stellen, die diese Farbe haben, wird 
die unter dem Sprite liegende Grafik sichtbar. Die zwei 
Worte für jede Zeile stellen die zwei Bitplanes dar. Die 
Farbnummer für jeden Punkt ergibt sich aus der Kombination 
der Plane-Bits, wobei das erste Wort in der Datenzeile immer 
für die untere Plane und das 2. für die obere steht. Fol¬ 
gende Farbkombinationen ergeben sich: 

2. Wort 1. Wort Farbe 


0 

o 

1 

1 


0 

1 

0 

1 


durchsichtig 
Farbe 1 
Farbe 2 
Farbe 3 


Nach den Worten für die letzte Zeile müssen noch zwei Null- 
Worte als Endekennung folgen. Als Beispiel nun die Defini¬ 
tion einer kleinen Pacman-Spritegrafik, die auch im nächsten 
Demoprogramm Verwendung finden wird: 


ssprite: dc.l sprdata 

dc.w 16 

dc.w 0,0,0 

section "",data_c 


; Zeiger auf Daten 
; Höhe =16 Pixel 
; Wird vom System verwaltet 

; Folgende Daten ins Chip-RAM 
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sprdata: 


dc.w 0,0 ; Positionskontrolle (System) 

dc.w %0001111111111000,%0001111111111000 

dc.w 4ooimiiiiniioo,4ooiooooooooooioo 
dc.w 40111111100111110,40100000011000010 

dc.w %1111111100111111,%1000000011000011 
dc.w %1111111111111100,%1000000000001100 

dc.w %1111111111110000,*1000000000110000 

dc.w 41111111111000000,*1000000011000000 

dc.w %1111111100000000,*1000000100000000 

dc.w %1111111111000000,11000000011000000 

dc.w 41111111111111000,41000000000111000 
dc.w %1111111111111111,%1000000000000111 

dc.w %1111111111111111,%1000000000000001 
dc.w % 01111111 11111110,10100000000000010 

dc.w %0011111111111100,40010000000000100 

dc.w %0001111111111000,40001111111111000 

dc.w 0,0 ; Endemarke 


Bild 7.4: Sprite-Strukturen für einen "Pacman" 


Wichtig zu wissen ist, daß Sprites immer in Lores-Auflösung 
(niedrige Auflösung in x- und y-Richtung) dargestellt wer¬ 
den, auch wenn der Viewport, auf dem sie erscheinen, eine 
andere Auflösung hat. Auf dem Workbench-Screen z.B. wäre ein 
Sprite doppelt so breit wie eine Screengrafik mit der glei¬ 
chen Pixelbreite, da die Workbench in hoher x-Auflösung er¬ 
scheint, der Sprite aber in niedriger. 

Die Datenworte in unserem Pacman-Beispiel sind als Binär¬ 
werte abgelegt, damit man den Aufbau besser erkennen kann. 
Sie können sie natürlich auch in hex angeben, was zu enormer 
Platzersparnis führt. In der linken Spalte sehen Sie sie 16 
Zeilen für die untere Plane. Alles, was hier auf 1 steht, 
wird in Farbe 1 (bzw. 3) angezeigt, und alles, was auf 0 
steht, ist transparent. Die rechte Spalte ist die obere 
Plane. Die Einsen ergeben zusammen mit den Einsen der unte¬ 
ren Plane eine binäre 3, also wird der Punkt in Farbe 3 dar¬ 
gestellt. Eine Ausnahme bildet das "Auge": Hier sind die 
Punkte nur in der oberen Plane gesetzt, was die Farbnummer 2 
ergibt. Ergebnis: Der Innenraum des Pacmans ist in Farbe 1 
ausgefüllt, sein Rand hat die Farbe 3 und das Auge die Farbe 
2 . 

So entstehen also aus den Sprite-Pixeln die Farbnummern. 
Jetzt müssen wir wissen, welchen Viewport-Farben diese 
sprite-internen Farbnummern entsprechen. Eine Amiga-Grafik 
kann maximal 32 frei wählbare Farben haben. Die oberen 16 
werden als Spritefarben genutzt, auch wenn die angezeigte 
Grafik eigentlich weniger Farben hat. Jeder Sprite hat aber 
3 belegbare Farben (die durchsichtige nicht mitgezählt). Da 
es 8 Sprites gibt, müßten 3*8, also 24 Farben zur Verfügung 
stehen. 
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Da dem nicht so ist, faßt der Amiga jeweils zwei Sprites mit 
aufeinanderfolgenden Nummern zu einem Paar zusammen. Dieses 
Paar teilt sich dann einen Farbregistersatz. Die Register- 
Zuordnung sieht folgendermaßen aus: 

Sprites Farbreg. 1 Farbreg. 2 Farbreg. 3 


0 

und 

1 

17 

18 

19 

2 

und 

3 

21 

22 

23 

4 

und 

5 

25 

26 

27 

6 

und 

7 

29 

30 

31 


Die hier nicht vorkommenden Farbregister (16, 20, 24 und 28) 
enthalten die Spritefarbe Nr. 0, die aber nicht als Farbe, 
sondern durchsichtig dargestellt wird. Diese Farbnummern 
brauchen also nicht belegt zu werden. Beachten Sie, daß die 
Farbregister 16-31 bei Grafiken mit mehr als 4 Bitplanes 
sowohl für die Sprites als auch für die Bitmapgrafik verwen¬ 
det werden! 

Um das Aussehen eines SimpleSprites zu verändern, stellt uns 
Graphics die ChangeSprite-Routine zur Verfügung. Sie ändert 
den Zeiger auf die Grafikdaten in der SimpleSprite-Struktur 
und nimmt die Nötigen Anpassungen vor. 


ChangeSprite = -420 (Graphics-Library) 


♦viewPort 

aO 

< Zeiger auf Viewport, in dem der zu än¬ 
dernde Sprite liegt 

♦ssprite 

al 

< Zeiger auf Struktur des zu ändernden 
SimpleSprites 

♦newdata 

a2 

< Zeiger auf neue Sprite-Grafikdaten 

Erklärung 


Ändert das Aussehen eines SimpleSprites 
durch Wechseln des Grafikdaten-Zeigers. 


Bewegen und freigeben von SimpleSprites 

Wenn Sie Ihren Sprite mit GetSprite angemeldet haben, ist er 
noch nicht sofort am Bildschirm zu sehen, da seine Koordina¬ 
ten noch Undefiniert sind. Mit der Routine MoveSprite können 
Sie die Koordinaten ändern. Nach der ersten Änderung wird 
der Sprite auch sichtbar: 


MoveSprite = -426 (Graphics-Library) 


♦viewPort 

aO 

< 

Zeiger auf Viewport, in den der Sprite 
eingebunden werden soll bzw. sich befin¬ 




det 

*ssprite 

al 

< 

Zeiger auf SimpleSprite-Struktur, die 
den Sprite verwaltet 

X 

dO 

< 

Gewünschte x-Koordinate 

Y 

dl 

< 

Gewünschte y-Koordinate 
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Erklärung Verschiebt einen SimpleSprite an die an¬ 

gegebenen Koordinaten. 


Beachten Sie, daß die Sprite-Koordinaten gemäß der Auflösung 
des Viewports gezählt werden. Auf einem Viewport mit verti¬ 
kal oder horizontal hoher Auflösung, müssen Sie einen Sprite 
also um zwei Punkte verschieben, damit er sich effektiv um 
einen Punkt bewegt. Wie Ihnen vielleicht aufgefallen ist, 
sprechen wir immer vom Viewport, auf dem der Sprite auf- 
taucht, nicht vom Screen o.ä.. Sprites können sowohl auf In- 
tuition-Screens (die auch einen Viewport haben) als auch auf 
"selbstgestrickten" Viewports (siehe letzter Abschnitt) er¬ 
scheinen, weshalb wir die allgemeinere Bezeichnung Viewport 
verwenden. 

Wir sehen, daß die Sprites Viewport-abhängig sind. Daraus 
folgt, daß sich ein Sprite immer mit dem Screen, auf dem er 
zu sehen ist, mitbewegt. Wir werden gleich einen Gel-Typ 
kennenlernen, bei dem dies nicht so ist. 

Falls sich mehrere Sprites überlagern, gilt die von der 
Hardware festgesetzte Prioritätenfolge: Ein Sprite mit einer 
niedrigeren Nummer erscheint immer vor einem Sprite mit ei¬ 
ner höheren Nummer. 

Wenn Sie einen Sprite nicht mehr benötigen, melden Sie ihn 
mit FreeSprite ab. Er wird dadurch automatisch vom Viewport 
entfernt. 


FreeSprite 


-414 (Graphics-Library) 


spriteNum dO < Nummer des freizugebenden Sprites 

Erklärung Gibt einen SimpleSprite frei. Er wird 

vom Darstellungsviewport gelöscht und 
ist für andere Programme wieder verfüg¬ 
bar. 


Das erste Demoprogramm meldet einen SimpleSprite (den 
Pacman) auf einem eigenen Screen an, der immer hinter der 
Maus hergesteuert wird. Je weiter die Maus vom Pacman 
entfernt ist, desto schneller bewegt er sich auf sie zu. 
Außerdem wird das Aussehen des Sprites geändert, je nachdem, 
ob er sich rechts oder links von der Maus befindet. 


Programm 7.15 (Auszug): Demo SimpleSprites 
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move.1 

gfxbase,a6 


move. 1 

vport,aO ; 

Farbe 21 (Sprite 2, Farbe 1) 

moveq 

#21,d0 

einstellen 

moveq 

#15,dl 


move. w 

dl ,d2 


move. w 

d2,d3 


jsr 

SetRGB4(a6) 


move.1 

vport,aO ; 

Farbe 22 (Sprite 2, Farbe 2) 

moveq 

# 22 ,do ; 

einstellen 

clr.w 

dl 


clr.w 

d2 


clr.w 

d3 


jsr 

SetRGB4(a6) 


move.1 

vport,aO ; 

Farbe 23 (Sprite 2, Farbe 3) 

moveq 

#23,do 

einstellen 

moveq 

#12,dl 


move.w 

dl,d2 


move.w 

d2,d3 


jsr 

SetRGB4(a6) 


lea 

ssprite,aO ; 

SimpleSprite Nr. 2 

moveq 

#2 ,d0 


jsr 

GetSprite(a6) ; 

Reservieren 

clr.w 

d6 ; 

d6 und d7 enthalten die x- 

clr.w 

d7 

bzw. y-Position des Sprites 

main: move.l 

gfxbase,a6 


jsr 

WaitT0F(a6) 

Auf Strahlrücklauf warten 

* Sprite an neue 

Position bringen 


move.1 

vport,aO ; 

Viewport 

lea 

ssprite,al ; 

Sprite-Struktur 

move.w 

d6,d0 ; 

Koordinaten 

move.w 

d7,dl 


jsr 

MoveSprite(a6) ; 

Sprite bewegen 

» Maus-Koordinaten feststellen 


move.1 

intbase,aO ; 

Basis Int-Lib 

clr.l 

do 


clr.l 

dl 


move.w 

$46(a0),d4 

Mauskoordinate aus Intbase- 

move.w 

$44(a0),d5 ; 

struktur auslesen 

* Sprite an Mausbewegungen anpassen 

move.w 

d4,d0 

Wenn d6 größer oder gleich 

sub.w 

#2 ,d0 

d4 minus 2 ist, springe zu 

cmp.w 

d0,d6 ; 

main2 

bge 

main2 
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move.1 

vport,aO 


lea 

ssprite,al 


lea 

imagel,a2 ; 


jsr 

ChangeSprite (a6) 


move.w 

d4,d0 


sub.w 

d6,d0 ; 


cmp.w 

#15,dO 


bge 

mainl 


add.w 

#2,d6 ; 


bra 

main2 

mainl: 

move.w 

d4,d0 ; 


sub.w 

d6,d0 ; 


divu 

#15,dO 


add.w 

#1 ,d0 


add.w 

d0,d6 

main2: 

move.w 

d4,d0 ; 


add.w 

#2,d0 


cmp.w 

d0,d6 ; 


ble 

main4 


move.1 

vport,aO 


lea 

ssprite,al 


lea 

image2,a2 ; 


jsr 

ChangeSprite(a6) 


move.w 

d6,d0 


sub.w 

d4,d0 ; 


cmp.w 

#15,dO 


bge 

main3 ; 


sub.w 

#2,d6 


bra 

main4 

main3: 

move.w 

d6,d0 ; 


sub.w 

d4,d0 ; 


divu 

#15,dO 


add.w 

#l,dO 


sub.w 

d0,d6 

main4: 

move.w 

d5,d0 


sub.w 

#2,d0 


cmp.w 

d0,d7 


bge 

main6 


moveq 

#2,d0 

jsr 

FreeSprite(a6) 

move.1 

intbase,a6 


Image 'Pacman rechts' 

; Spriteaussehen ändern 

Wenn d4 minus d6 größer oder 
gleich 15 ist, springe zu 
mainl 


Erhöhe x-Koordinate um 2 


Erhöhe x-Koordinate um 

(d4 minus d6) durch 15 plus 1 


Wenn d6 kleiner oder gleich 
d4 plus 2 ist, springe zu 
main4 


Image 'Pacman links' 

; Spriteaussehen ändern 

Differenz zwischen Sprite- und 
Mausposition größer gleich 15? 

Wenn ja, zu main3 

Maus-x minus 2 


Erniedrige Maus-x um (Sprite-x 
minus Maus-x) durch 15 plus 1 
(damit sich der Sprite schneller 
bewegt, je weiter die Maus von 
ihm weg ist) 

Dieselben Tests der Maus- und Sprite- 
Positionen, diesmal für die y- 
Koordinaten (siehe oben) 


Sprite 2 freigeben 


350 




Die Graphics-Library 


* Datenbereich 


ssprite: 


imagel: 


image2: 


dc.l imagel 

dc.w 16 

dc.w 0,0,0 

section "",data_c 

dc.w 0,0 

dc.w *0001111111111000,%0001111111111000 

dc.w *0011111111111100,*0010000000000100 

dc.w *0111111100111110,*0100000011000010 

dc.w *1111111100111111,*1000000011000011 

dc.w *1111111111111100,*1000000000001100 

dc.w *1111111111110000,*1000000000110000 

dc.w *1111111111000000,*1000000011000000 

dc.w *1111111100000000,*1000000100000000 

dc.w *1111111111000000,*1000000011000000 

dc.w *1111111111111000,*1000000000111000 

dc.w *1111111111111111,*1000000000000111 

dc.w *1111111111111111,*1000000000000001 

dc.w *0111111111111110,*0100000000000010 

dc.w *0011111111111100,*0010000000000100 

dc.w %0001111111111000,*0001111111111000 

dc.w 0,0 

dc.w 0,0 

dc.w *0001111111111000,*0001111111111000 

dc.w *0011111111111100,*0010000000000100 

dc.w *0111110011111110,*0100001100000010 

dc.w *1111110011111111,*1100001100000001 

dc.w *0011111111111111,*0011000000000001 

dc.w *0000111111111111,*0000110000000001 

dc.w *0000001111111111,*0000001100000001 

dc.w *0000000011111111,*0000000010000001 

dc.w *0000001111111111,*0000001100000001 

dc.w *0001111111111111,*0001110000000001 

dc.w *1111111111111111,*1110000000000001 

dc.w *1111111111111111,*1000000000000001 

dc.w *0111111111111110,*0100000000000010 

dc.w *0011111111111100,*0010000000000100 

dc.w *0001111111111000,*0001111111111000 

dc.w 0,0 


Programm 7.15 (Auszug) 


Die "Verfolgungsjagd", die der Sprite ausführt, wird so be¬ 
werkstelligt: Die Position des Sprites wird mit den Mausko¬ 
ordinaten, die aus der Intuition-Base-Struktur ermittelt 
werden, verglichen. Wenn sich der Sprite links von der Maus 
befindet, muß er nach rechts bewegt werden, ansonsten nach 
rechts (oder gar nicht, wenn er sich genau über der Maus be- 
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findet). Damit der Sprite nicht "zittert", wenn er genau 
über der Maus ist, setzen wir eine Toleranz von 2 Pixeln 
beim Test an. Die Abfrage der y-Position erfolgt analog. 

Exemplarisch nun die Bearbeitung der x-Koordinaten: Wenn 
sich der Sprite höchstens 15 Pixel von der Maus entfernt be¬ 
findet, wird die Position immer um zwei Pixel verändert. 
Sollte er weiter entfernt sein, wird die Positionsdifferenz 
durch 15 geteilt und die Mausposition um diesen Wert verän¬ 
dert. Das bewirkt, daß der Sprite umso schneller bewegt 
wird, je weiter er von der Maus entfernt ist (größere Diffe¬ 
renz - größere Koordinatenänderung). 

Die Änderung der y-Koordinaten läuft analog ab. Der Rest des 
Programms dürfte klar sein. 


Attached-Sprites 

Da die Beschränkung auf 3 Farben plus eine durchsichtige für 
manche Zwecke nicht ausreicht, stellt das System die 
Möglichkeit zur Verfügung, zwei "benachbarte" Sprites (mit 
aufeinanderfolgenden Nummern) zu einem Sprite zusammenzufü¬ 
gen. Ein solcher Doppelsprite nennt sich "Attached-Sprite". 
Zwei Sprites haben zusammen 4 Bitplanes, woraus sich eine 
Farbanzahl von 2 4 = 16 ergibt. Für diese 16 Farben werden 
die Farbregister 16-31, also alle normalen Spritefarben, ge¬ 
nutzt. Auch hier gibt es eine transparente Farbe: Die Stel¬ 
len, an denen die Bits in beiden Planes beider Sprites auf 0 
stehen, erscheinen durchsichtig. Die Farbe 16, die von der 
Nummern-Berechnung her für diese Farbe eigentlich benutzt 
würde, braucht also nicht belegt zu werden. 

Es können nur jeweils die zwei Sprites zu einem Attached- 
Paar kombiniert werden, die sich im Normalmodus einen 
Farbregistersatz teilen, also die Sprites 0 und 1, 2 und 3, 
usw. Die Reihenfolge der Bitplanes ist folgende: Die beiden 
Planes des Sprites mit der niedrigeren Nummer gelten als 
Planes 1 und 2 des Attached-Sprites, die des anderen als 
Planes 3 und 4. 

Um aus einem Sprite-Paar einen Attached-Sprite zu machen, 
muß beim Sprite mit der ungeraden Nummer (also den zweiten 
der beiden Sprites) in das zweite Wort der Grafikdaten 
(Positions-Kontrolle des Systems), in das normalerweise eine 
0 geschrieben wird, eine 128 eingetragen werden. Dadurch 
wird das 7. Bit (von 0 an gezählt) im Wort gesetzt. Dieses 
Bit dient als Attached-Flag. Wichtig ist, daß die beiden 
Sprites, die das Attached-Paar bilden, immer an der gleichen 
Position stehen müssen, da sich sonst falsche Farben 
ergeben. Hier die Tabelle der Sprite-Planes mit den 
zugehörigen Farbregister-Nummern (die Sprites und Planes 
wieder in umgekehrter Reihenfolge): 
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Ungerader Sprite Gerader Sprite 

Plane 2 Plane 1 Plane 2 Plane 1 Farbe 


0 

0 

0 


0 

durchsichtig 


0 

0 

0 


1 

Register 

17 


0 

0 

1 


0 

Register 

18 


0 

0 

1 


1 

Register 

19 


0 

1 

0 


0 

Register 

20 


0 

1 

0 


1 

Register 

21 


0 

1 

1 


0 

Register 

22 


0 

1 

1 


1 

Register 

23 


1 

0 

0 


0 

Register 

24 


1 

0 

0 


1 

Register 

25 


1 

0 

1 


0 

Register 

26 


1 

0 

1 


1 

Register 

27 


1 

1 

0 


0 

Register 

28 


1 

1 

0 


1 

Register 

29 


1 

1 

1 


0 

Register 

30 


1 

1 

1 


1 

Register 

31 


Weil die Attached- 

-Sprites 

SO 

schön bunt aussehen, schauen 

wir uns zu 

diesem 

Thema auch 

ein 

Beispielprogramm an. 

wir 

ändern das 

letzte 

Programm 

einfach 

dahingehend ab, daß 

wir 


zwei SimpleSprite-Strukturen einrichten und in der Haupt¬ 
schleife beide Sprites an die selbe Position bringen. Vom 
Aussehen her sollen die Sprites diesmal aus zwei Farbverläu- 
fen bestehen. 


* Programm 7.16 (Auszug): SimpleSprites als Attached-Sprites 


move.1 

vport,aO 

; 32 Farben des neuen Screei 

lea 

cols,al 

; per LoadRGB4 einstellen 

moveg 

#32,dO 


jsr 

LoadRGB4(a6) 


lea 

sspritel,aO 

; Reserviere ersten Sprite 

moveq 

#2,d0 


jsr 

GetSprite(a6) 


lea 

ssprite2,a0 

; Reserviere zweiten Sprite 

moveq 

#3,d0 


jsr 

GetSprite(a6) 


clr.w 

d6 

; Wieder die x- und y- 

clr .w 

d7 

; Koordinaten 

main: move.1 

gfxbase,a6 

; Warte auf Strahlrücklauf 

jsr 

WaitT0F(a6) 


move.1 

vport,aO 

; Versetze Sprite 1 an die 

lea 

sspritel,al 

; neue Position 
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move.w d6,d0 

move.w d7,dl 

jsr MoveSprite(a6) 

move.l vport,aO ; Sprite 2 an neue Position 

lea ssprite2,al 

move.w d6,d0 

move.w d7,dl 

jsr MoveSprite(a6) 


* Datenbereich 


sspritel: dc.l imagel 

dc.w 16 

dc.w 0,0,0 

ssprite2: dc.l image2 

dc.w 16 

dc.w 0,0,0 

cols: dc.w 0 ,$ccc,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

dc.w $200,$400,$600,$800,$a00,$c00,$e00,$f00 

dc.w $f0,$e0,$c0,$a0,$80,$60,$40,$20 

section "",data_c 

imagel: dc.w 128,128 

dc.w 40000000000000000,40000000000000000 

dc.w 41111111111111111,40000000000000000 

dc.w %0000000000000000,%1111111111111111 

dc.w %1111111111111111,%l111111111111111 

dc.w 40000000000000000,40000000000000000 

dc.w %1111111111111111,40000000000000000 

dc.w 40000000000000000,%1111111111111111 

dc.w 41111111111111111,41111111111111111 

dc.w 40000000000000000,40000000000000000 

dc.w 41111111111111111,40000000000000000 

dc.w 40000000000000000,41111111111111111 

dc.w 41111111111111111,41111111111111111 

dc.w 40000000000000000,40000000000000000 

dc.w 41111111111111111,40000000000000000 

dc.w 40000000000000000,41111111111111111 

dc.w 41111111111111111,41111111111111111 

dc.w 0,0 

image2: dc.w 128,128 

dc.w 40000000000000000,40000000000000000 

dc.w 40000000000000000,40000000000000000 

dc.w 40000000000000000,40000000000000000 

dc.w 40000000000000000,40000000000000000 

dc.w 41111111111111111,40000000000000000 

dc.w 41111111111111111,40000000000000000 
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dc.w %1111111111111111,*0000000000000000 
dc.w %1111111111111111,%0000000000000000 
dc.w %0000000000000000,%llllllllimilll 
dc.w %0000000000000000,%1111111111111111 
dc.w %0000000000000000,%1111111111111111 
dc.w %0000000000000000,%1111111111111111 
dc.w %1111111111111111,%1111111111111111 
dc.w %llllllllllllllll, %1111111111111111 
dc.w %1111111111111111 ,%1111111111111111 
dc.w %1111 lll 11 lll lll 1 ,%lll llllllll Ulli 
dc.w 0,0 


Programm 7.16 (Auszug) 


Das Programm dürfte, da es größtenteils dem vorigen ent¬ 
spricht, gut verständlich sein. Die zwei Spritemuster sind 
so gewählt, daß jede der 16 Farben (16-31), die bei einem 
Attached-Sprite möglich sind, Vorkommen (die korrespondie¬ 
renden Zeilen und Bitplanes der beiden Sprites sind 
"übereinanderzulegen"). 


7.8.2 Die virtuellen Sprites (VSprites) 

Eine weitere, unter Umständen ärgerliche Beschränkung der 
Sprites ist die Tatsache, daß nur B verschiedene Sprites 
zur Verfügung stehen, oft benötigt man jedoch mehr. Aufgrund 
der Hardware-Architektur des Amiga ist es möglich, ein und 
den selben Sprite mehrfach darzustellen, jedoch nur in 
vertikaler Richtung. Ein Sprite kann also z.B. ein paar 
Zeilen unter seiner Endkoordinate noch einmal angezeigt 
werden, sogar mit einem anderen Aussehen, jedoch nicht 
mehrfach im gleichen Zeilenbereich (also nebeneinander). 
Mindestens eine Zeile Abstand muß vom Ende der ersten 
Darstellung zum Anfang der zweiten eingehalten werden. 

Die Berechnung, der zur mehrfachen Anzeige eines Sprites nö¬ 
tigen Steuerstrukturen (das sind die schon erwähnten Copper¬ 
listen), wäre eine recht komplizierte Sache, aber es gibt 
zum Glück eine Einrichtung in der Graphics-Library, die uns 
diese Arbeit abnimmt: die virtuellen (scheinbaren) Sprites, 
abgekürzt VSprites. Von diesen Sprites können mit gewissen 
Einschränkungen beliebig viele gleichzeitig auf dem Bild¬ 
schirm zu sehen sein. Sogar eigene Farben kann jeder dieser 
virtuellen Sprites haben. Die Einschränkung betrifft die An¬ 
zahl Sprites pro Zeile (bzw. pro Zeilenbereich): Hier gilt 
wieder die Grenze 8. Das Grafiksystem sucht sich bei der 
Darstellung der VSprites selbst die günstigste Kombination 
der Hardware-Sprites aus. 

Die VSprites sind sicherlich eine feine Sache, aber zur ih¬ 
rer Benutzung müssen wir diesmal etwas mehr an Vorarbeit 
leisten. Wir müssen uns mit diversen Strukturen her¬ 
umschlagen. Die erste, genannt Geisinfo, wurde bei der Be- 
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sprechung der Rastport-Struktur schon einmal kurz erwähnt. 
Sie dient, ähnlich wie die View-Struktur, als Haupt-Verwal¬ 
tungsstruktur aller darzustellenden Gels (wozu auch die 
VSprites zählen), die ihrerseits untereinander verkettet 
sind. 


Die Gelslnfo-Struktur 


00 

dc.b 

gi sprRsrvd 

Zu benutzende Hardware-Sprites 

01 

dc.b 

gi Flags 


02 

dc.l 

*gi gelHead 

Erstes Gel 

06 

dc.l 

*gi gelTail 

Letztes Gel 

10 

dc.l 

*gi nextLine 

System-Zeiger 

14 

dc.l 

*gi lastColor 

System-Zeiger 

18 

dc.l 

*gi collHandler 
gi leftmost 

Zeiger auf Sprungtabelle für Koll 

22 

dc.w 

Linker Rand 

24 

dc.w 

gi rightmost 

Rechter Rand 

26 

dc.w 

gi topmost 

Oberer Rand 

28 

dc.w 

gi bottommost 

Unterer Rand 

30 

dc.l 

*gi firstBlissObj 


34 

38 

dc.l 

*gi lastBlissObj 
gi SIZEOF 



gi_sprRsrvd 

Dieses Byte gibt an, welche der 8 Hardware-Sprites für die 
Darstellung der VSprites genutzt werden sollen. Jedem Sprite 
wird die entsprechende Bitnummer zugeordnet. Sollen alle 
Sprites benutzt werden, muß hier eine 255 (alle Bits ge¬ 
setzt) stehen. 

*gi_gelHead, *gi_gelTail 

Diese Zeiger weisen auf den Beginn bzw. das Ende der Gel-Li¬ 
ste. Die einzelnen Gels werden in VSprite-Strukturen verwal¬ 
tet. Auf solche Strukturen zeigen auch gelHead und gelTail. 
Sie enthalten das erste bzw. letzte Gel in der Liste. Als 
User müssen wir lediglich genügend leeren Speicher für die 
beiden Strukturen reservieren. 

*gi_nextLine, *gi_lastColor 

Hierbei handelt es sich um zwei System-Zeiger. Als braver 
Benutzer brauchen Sie diese nur auf ausreichend reservierte, 
leere Speicherbereiche zu stellen. NextLine benötigt 16 
Bytes und LastColor 32. 

*gi_collHandler 

Zeigt auf eine Tabelle aus 16 Routineneinsprüngen, die bei 
bestimmten Kollisionen angesprungen werden (kommt noch). 

gi_leftmost - gi_bottommost 

Hier müssen die Grenzkoordinaten angegeben werden, innerhalb 
denen die VSprites angezeigt werden. Eine Überschreitung 
dieser Grenzen kann über eine Kollisionsroutine behandelt 
werden. 
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Für diese Struktur gibt es eine Initialisierungsroutine, 
aber Sie schreiben diese am besten trotzdem über 'dc'- 
Befehle in Ihr Programm, da einige Werte wie die nextLine- 
und lastColor-Zeiger und die Grenzkoordinaten sowieso "von 
Hand" eingetragen werden müssen. Die Routine InitGels 
übernimmt dann die restliche Einrichtungsarbeit: 


InitGels = -120 (Graphics-Library) 


♦gelHead 

a0 

< Dummy-Zeiger auf leere VSprite-Struktur 

♦gelTail 

al 

< Siehe al 

♦gelslnfo 

a2 

< Zeiger auf zu initialisierende Gelslnfo- 
Struktur 

Erklärung 


Richtet die angegebene Gelslnfo-Struktur 
ein und trägt unter anderem die Zeiger 
gelHead und gelTail darin ein. 


Eine Beispiel-Gelslnfo-Struktur könnte so aussehen: 


gelsinfo: 

dc.b 

255 


dc.b 

0 


dc.l 

0,0 


dc.l 

nline 


dc.l 

lcolor 


dc.l 

0 


dc.w 

0,640,0,256 

nline: 

ds.b 

16 

lcolor: 

ds.b 

32 


Alle Hardware-Sprites benutzen 

Interne Flags 

Head und Tail 

Platz für NextLine 

Platz für LastColor 

Reine Kollisionstabelle 

Begrenzungs-Koordinaten 


Bild 7.5: Beispiel für eine Gelslnfo-Struktur 


Auf die so eingerichtete Gelslnfo-Struktur muß nun noch ein 
Zeiger in den Rastport, in dem die Gels erscheinen sollen, 
geschrieben werden, und zwar in den Eintrag rp_GelsInfo, 
Offset 20. 

Jeder VSprite wird in einer gleichnamigen Struktur verwal¬ 
tet. Neben den VSprites gibt es noch einen weiteren Gel-Typ, 
die Bobs, zu denen wir später kommen werden. Zur Verwaltung 
der Bobs wird die gleiche Struktur, wie für die VSprites 
benutzt, weshalb einige Einträge für VSprites unwichtig sind 
(durch '-' markiert). Hier die Struktur: 

Die VSprite-Struktur (für VSprites) 


00 

dc.l 

*vs NextVSprite 

; Zeiger auf den nächsten VSprite 

04 

dc.l 

*vs PrevVSprite 

; Zeiger auf den letzten VSprite 

08 

dc.l 

*vs DrawPath 

♦ 

12 

dc.l 

*vs ClearPath 

♦ 

16 

dc.w 

vs Oldy 

/ 
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18 

dc.w 

vs Oldx 

— 


20 

dc.w 

vs VSFlags 

VSprite-Flags 

22 

dc.w 

vs Y 

y-Koordinate 

24 

dc.w 

vs_X 

x-Koordinate 

26 

dc.w 

vs Height 

Höhe in Pixeln 

28 

dc.w 

vs Width 

Breite 

in Words (immer 1) 

30 

dc.w 

vs Depth 

Tiefe 

immer 2) 

32 

dc.w 

vs MeMask 

Kollisionsmaske 1 

34 

dc.w 

vs HitMask 

Kollisionsmaske 2 

36 

dc.l 

*vs ImageData 

Zeiger 

auf Grafikdaten 

40 

de. 1 

*vs BorderLine 

Zeiger 

auf BorderLine-Wort 

44 

dc.l 

*vs CollMask 

Zeiger 

auf CollMask-Plane 

48 

dc.l 

*vs SprColors 

Zeiger 

auf Wortfeld für Farben 

52 

dc.l 

*vs_Bob 

— 


56 

dc.b 

vs PlanePick 

— 


57 

dc.b 

vs PlaneOnOff 

— 


58 


vs_SIZE0F 



*vs 

NextVSprite, *vs_PrevVSprite 



Diese Zeiger dienen der Verkettung der einzelnen VSprites. 
Sie werden (zum Glück) vom System automatisch verwaltet, 
d.h. die Strukturen werden gemäß der y- und x-Koordinaten 
aufsteigend sortiert. 

vs Flags 

FoXgende Flags sind möglich: 

VSprite-Flag Wert Bedeutung 


VSF_VSPRITE 
VSF_MUSTDRAW 
VSF_GELGONE 
VSF OVERFLOW 


$001 Gesetzt für VSprite, gelöscht für Bob 

$008 VSprite muß gezeichnet werden 

$400 VSprite ragt über Begrenzung hinaus 

$800 Zu viele VSprites in einer Zeile 


VSFVSPRITE 

VSF MUSTDRAW 


VSF GELGONE 


VSF OVERFLOW 


Dieses Bit gibt an, ob in der VSprite-Struktur 
ein VSprite oder ein Bob beschrieben wird. Für 
einen VSprite muß es gesetzt sein. 

Falls zu viele VSprites in einer Zeile stehen 
(Flag VSFOVERFLOW gesetzt), können nicht alle 
dargestellt werden. Es werden dann vornehmlich 
die VSprites, bei denen das VSF_MUSTDRAW-Flag 
gesetzt ist, gezeichnet. 

Dieses Flag wird nur vom System gesetzt (der 
User sollte es nicht verändern), und zwar dann, 
wenn ein VSprite über die Begrenzungen (in der 
Gelslnfo-Struktur angegeben) hinausragt. 

Ein weiteres System-Flag, das gesetzt wird, wenn 
sich zu viele VSprites in einer Zeile befinden. 


vs_Y, vsX 

Die Koordinaten eines VSprite werden nicht über eine Gra- 
phics-Routine gesetzt, sondern durch Änderung dieser beiden 
Einträge in der VSprite-Struktur. 
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vsJHeight 

Die Höhe des VSprite in Pixeln. 

vs_Width, vs_Depth 

Diese Einträge sind nur bei Bobs variabel. Bei VSprites muß 
hier eine 1 (für Wort-Breite) bzw. eine 2 (Tiefe = 2 Planes) 
stehen. 

vsMeMask, vsHitMask 

Diese Einträge sind für die Kollisionsabfrage zwischen Gels 
interessant. Wir werden uns im entsprechenden Abschnitt nä¬ 
her damit beschäftigen. Falls Sie keine Kollisionen regi¬ 
strieren wollen, tragen Sie hier zwei Nullen ein. 

*vs_ImageData 

Hier steht ein Zeiger auf die Grafik-Daten des VSprites. 
Diese sind fast genauso aufgebaut wie die Daten eines Sim- 
pleSprite. Es fehlen lediglich die Null-Worte für die Posi¬ 
tionskontrolle (vor den Grafikdaten) und die Ende-Kennung 
(hinter den Daten). 

*vs_BorderLine, *vs_CollMask 

Siehe vs_MeMask, vs_HitMask 

*vs_SpriteColors 

Dieser Zeiger weist auf ein Feld aus vier Worten, die die 
Farben des VSprites angeben, wobei die erste Farbe unwich¬ 
tig, weil transparent ist. Hier gilt nicht die Einschränkung 
der SimpleSprites, daß sich je zwei Sprites einen Farbsatz 
teilen. 


Nun ein Beispiel für eine VSprite-Struktur. Wir verwenden 
wieder die Pacman-Grafik aus dem vorletzten Demoprogramm: 


vsprite: 


sprdata: 


dc.l 

0,0 

Verkettungszeiger 

dc.l 

0,0 

Nur für Bobs 

dc.w 

0,0 

Ebenfalls 

dc.w 

1 

Flags: VSPRITE, MUSTDRAW 

dc.w 

20,20 

Start-Koordinaten 

dc.w 

15,1,2 

Höhe, Breite, Tiefe 

dc.w 

0,0 

Kollisionsmasken 

dc.l 

sprdata 

Zeiger auf Grafikdaten 

dc.l 

0,0 

BorderLine und CollMask 

dc.l 

sprcol 

Zeiger auf Farbfeld 

dc.l 

0 

Kein Bob-Zeiger 

dc.b 

0,0 

Nur für Bobs 


section "",data_c ; Folgende Daten ins Chip-RAM 

dc.w %0001111111111000,%0001111111111000 

dc.W $0011111111111100,$0010000000000100 

dc.w $0111111100111110, $0100000011000010 

dc.w $1111111100111111,$1000000011000011 

dc.w $ 1111111111111100 ,$1000000000001100 
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sprcol: 


dc.w *1111111111110000,%1000000000110000 
dc.w %1111111111000000,%1000000011000000 
dc.w %1111111100000000,%1000000100000000 
dc.w %1111111111000000,%1000000011000000 
dc.w %1111111111111000 ( %1000000000111000 
dc.w %iiiiniiiuiiiii,%iooooooooooooin 

dc.w %1111111111111111,*1000000000000001 
dc.w %0111111111111110,%0100000000000010 
dc.w %ooiiimiiiinoo,%ooiooooooooooioo 

dc.w %0001111111111000, %0001U1111111000 

dc.w 0,$fff,0,$ccc ; Farben: Weiß, Schwarz, Grau 


Bild 7.6: Beispiel für eine VSprite-Struktur 


Anzeigen, Bewegen und Entfernen von VSprites 


Hat man die VSprite-Struktur fertig aufgebaut, kann man den 
VSprite mit folgender Routine in die Gels-Liste einhängen: 


AddVSprite 

= -102 (Graphics-Library) 

*VSprite aO 

*rastPort al 

< Zeiger auf Struktur des einzubindenden 
VSprites 

< Zeiger auf Rastport, in den der VSprite 
eingebunden werden soll 

Erklärung 

Bindet einen VSprite in die Gels-Liste 
eines Rastports ein. 

Wie bei den SimpleSprites gilt auch hier, daß ein VSprite 
nach Aufruf von AddVSprite noch nicht sofort auf dem Bild¬ 
schirm zu sehen ist. Vorher müssen noch ein paar Routinen 
aufgerufen werden: 

SortGList 

= -150 (Graphics-Library) 


♦rastPort al < Zeiger auf Rastport, dessen Gels-Liste 
sortiert werden soll 

Erklärung Sortiert die VSprite-Verkettungen anhand 

der eventuell geänderten x- und y-Koor- 
dinaten. 
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DrawGList 

= 

-114 (Graphics-Library) 


♦viewPort 

aO 

*rastPort 

al 

Erklärung 



< Zeiger auf Viewport, in dem die Gels er¬ 
scheinen sollen 

< Zeiger auf Rastport, aus dem die Gels 
stammen 

Erstellt die zur Darstellung der Gels 
notwendige Copperliste im angegebenen 
Viewport (Viewport-Eintrag vp_Spr!ns). 


Nun müssen noch die beiden aus dem Viewport-Abschnitt schon 
bekannten Routinen MrgCop und Loadview aufgerufen werden, 
daraufhin sind die VSprites am Bildschirm zu sehen. Durch 
MrgCop wird die neu erstellte Sprite-Copperliste, zu finden 
im Eintrag vp_Sprlns des Viewports, in die Gesamtcopperliste 
des View übernommen. VSprites sind daher View- und nicht 
Viewport-abhängig. Das macht sich dadurch bemerkbar, daß sie 
ihre Position nicht verändern, wenn man den Screen herunter¬ 
zieht . 

Die Positionsänderung von VSprites geschieht durch Änderung 
der Einträge vs_Y und vs_X in der VSprite-Struktur und an¬ 
schließendem erneutem Aufruf der gerade beschriebenen vier 
Routinen. 

Man kann einen VSprite mit folgender Routine vom 
Bildscchnirm und aus der Gels-Liste entfernen: 


RemVSprite 


-138 (Graphics-Library) 


*vSprite aO < Zeiger auf Struktur des zu entfernenden 
VSprites 

Erklärung Entfernt den angegebenen VSprite vom 

Bildschirm und aus der Gels-Liste des 
Rastports. 


Das Beispielprogramm zu diesem Thema verwendet wieder die 
schon bekannte Pacman-Grafik. Es läßt zwei solche VSprites 
über den Bildschirm ziehen, einen waagerecht, einen senk¬ 
recht. Dabei werden die Positionen abgefragt und die Bewe¬ 
gungsrichtung umgekehrt, wenn die Sprites den Bildschirmrand 
erreichen. 


* Programm 7.17 (Auszug): Demo VSprites 
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* Geisinfo und VSprites einrichten 



lea 

ghead,aO 

Dummy-Listenkopf 


lea 

gtail,al 

Dummy-Listenende 


lea 

ginfo,a2 

Zeiger auf Geisinfo 


jsr 

InitGels(a6) 

Geisinfo einrichten 


lea 

ginfo,aO 

Gelslnfo-Zeiger in 


move.1 

a0,20{a4) 

Rastport eintragen 


lea 

vsprl,aO 

Bearbeite VSprite #1 


move.w 

#9,20(a0) 

Flags 


move.w 

# 15,2 6(aO) 

Höhe 


move.w 

#128,22(aO) 

x-Startposition 


move.w 

#0,24(30) 

y-Startposition 


move.w 

#l,28(a0) 

Breite in Worten 


move.w 

#2,30(a0) 

Anzahl Planes 


move.1 

#image,36(a0) 

Zeiger auf Grafikdaten 


move.1 

#coll,48(a0) 

Zeiger auf Farben 


move.1 

a4,al 

AddVSprite(a6) 

Zeiger auf Rastport 


jsr 

VSprite einbinden 


lea 

vspr2,a0 

Die selbe Prozedur für VSprite #2 


move.w 

#9,20(a0) 



move.w 

#15,26(a0) 



move.w 

#0,22(30) 

x-Start 


move.w 

#160,24(a0) 

y-Start 


move.w 

#1,28(aO) 



move.w 

#2,30{aO) 



move.1 

#image,36(a0) 



move.1 

#coll,48(a0) 



move.1 

a4,al 



jsr 

AddVSprite(a6) 


* Hauptschleife: 

VSprites bewegen 

main2: 

move.1 

gfxbase,a6 



jsr 

WaitT0F(a6) 

; Auf Strahlrücklauf warten 


lea 

move.w 

add.w 

cmp.w 

vsprl,a0 

dirl,d0 

d0,24(a0) 

#320,24(aO) 

; Bearbeite VSprite 1 
; Addiere 'dirl' zur x-Pos. 


; x-Pos. größer als 320? 


bgt 

main3 

; Wenn ja 


cmp.w 

#0,24(a0) 

; Oder kleiner als 0? 


blt 

main3 

; Wenn ja 


bra 

main4 


main3: 

neg.w 

dirl 

; Bewegungsrichtung umkehren 

main4: 

lea 

vspr2,a0 

; Bearbeite VSprite 2 


move.w 

dir2,d0 

; Addiere 'dir2' zur y-Pos. 


add.w 

dO,22(aO) 
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emp.w 

#255,22(a0) 


bgt 

main5 


emp.w 

#0,22(a0) 


blt 

main5 


bra 

main6 

main5: 

neg.w 

dir2 

main6: 

move.1 

a4,al 


jsr 

SortGList(a6) 


move.1 

vport,a0 


move.1 

a4,al 


jsr 

DrawGList(a6) 


move.1 

view,al 


jsr 

MrgCop(a6) 


move.1 

view,al 


jsr 

Loadview(a6) 


* Datenbereich 


; y-Pos. größer als 255? 

; Oder kleiner als 0? 

; Bewegungsrichtung umkehren 
; Gels-Liste sortieren 
; Copperlisten berechnen 

; Copperlisten zusammenfügen 
; Copperlisten neu darstellen 


ginfo: dc.b 255 

dc.b 0 

de.1 0,0 

dc.l nline 

dc.l lcol 

de.1 ctab 

dc.w 0,320,0,256 

dc.l 0,0 

ghead: deb.b 58,0 

gtail: deb.b 58,0 

ctab: deb.b 64,0 

vsprl: deb.b 58,0 

vspr2: deb.b 58,0 

dirl: dc.w 3 

dir2 dc.w 3 

coli: dc.w Sfff,$000,$ccc 

section "",data_c 

nline: deb.b 16,0 

lcol: deb.b 32,0 

image: dc.w %0001111111111000,%0001111111111000 


Programm 7.17 (Auszug) 
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7.8.3 Die Bobs (Blitter Objects) 

Die SimpleSprites und VSprites wurden von einer speziellen 
Hardware-Einrichtung, unabhängig von der eigentlichen Bild¬ 
schirmgrafik, dargestellt oder in die sonstige Grafik 
eingemischt. Der Gel-Typ, mit dem wir uns jetzt beschäftigen 
wollen, wird auf eine ganz andere Weise erzeugt. 

Die Abkürzung 'Bob' steht für 'Blitter Object', woraus man 
schon ersehen kann, daß der Coprozessor Blitter für sie ver¬ 
antwortlich ist. Dieser Coprozessor ist uns schon einmal im 
Zusammenhang mit den Grafik-Kopierroutinen begegnet. Wir ha¬ 
ben erfahren, daß er in der Lage ist, sehr schnell rechtec- 
kig-orientierte Speicherbereiche (sprich Grafiken) zu ver¬ 
schieben. Diese Tatsache nutzt die Graphics-Library aus und 
stellt uns Gels zur Verfügung, die nicht unabhängig von der 
Bitmap-Grafik laufen, sondern vom Blitter in sie hineinko¬ 
piert werden. 

Diese Verfahrensweise hat sowohl Vor- als auch Nachteile 
(wobei die Vorteile aber überwiegen). Erstens fällt die von 
den Sprites her bekannte Beschränkung in der Breite (16 Pi¬ 
xel) und der Tiefe (3 Farben plus eine durchsichtige) weg. 
Da die Bobs direkt in die Bitmap-Grafik einkopiert werden, 
ergibt sich ihre maximale Größe und Farbanzahl aus den Daten 
der Bitmap, in der sie erscheinen. 

Der Nachteil besteht darin, daß die Bitmap-Grafik an der 
Stelle, an der der Bob erscheint, vorher gesichert werden 
muß, da Bobs die Grafik (im Gegensatz zu Sprites) wirklich 
überschreiben. Nach einem bißchen Vorarbeit übernimmt das 
allerdings das System für uns. Außerdem sind Bobs, vor al¬ 
lem, wenn sie besonders groß und/oder vielfarbig sind, lang¬ 
samer in der Darstellung als Sprites. 

Das Zeichnen eines Bobs besteht im wesentlichen aus zwei 
Teilen: dem Löschen des Bobs an der alten Position durch Zu¬ 
rückkopieren der gesicherten Grafik und dem Zeichnen an der 
neuen Position. Eingeleitet wird das Zeichnen mit den schon 
bekannten Routinen SortGList und DrawGList. 

Zur Benutzung von Bobs muß, wie schon bei den VSprites, die 
Gelslnfo-Struktur initialisiert und der Zeiger auf sie in 
rp Geisinfo eingetragen sein. Die Bobs selbst werden mit der 
gleichen Struktur verwaltet wie die VSprites, obwohl sie 
ganz anderer Natur sind. Ein paar Einträge, die bei VSprites 
keine Bedeutung hatten, werden jetzt allerdings benötigt, 
während andere nicht mehr verwendet werden. Nun die VSprite- 
Struktur für Bobs. Die Felder, die hier nicht kommentiert 
sind, haben für Bobs die selbe Bedeutung wie für VSprites. 


Die VSprite-Struktur (für Bobs) 


00 

dc.l 

*vs NextVSprite 

; Zeiger auf den nächsten Bob 

04 

dc.l 

*vs PrevVSprite 

; Zeiger auf den letzten Bob 

08 

dc.l 

*vs DrawPath 

; Reihenfolge beim Zeichnen 
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12 

dc.l 

*vs ClearPath 

16 

dc.w 

vs Oldy 

16 

dc.w 

vs Oldx 

20 

dc.w 

vs VSFlags 

22 

dc.w 

vs Y 

24 

dc.w 

VS_X 

26 

dc.w 

vs Height 

28 

dc.w 

vs Width 

30 

dc.w 

vs Depth 

32 

dc.w 

vs MeMask 

34 

dc.w 

vs HitMask 

36 

dc.l 

*vs ImageData 

40 

dc.l 

*vs BorderLine 

44 

dc.l 

*vs_CollMask 

48 

dc.l 

*vs SprColors 

52 

dc.l 

*vs Bob 

56 

dc.b 

vs PlanePick 

57 

dc.b 

vs PlaneOnOff 

58 


vs SIZEOF 


Reihenfolge beim Löschen 

Vorige y-Koordinate 

Vorige x-Koordinate 

VSprite-Flags 

y-Koordinate 

x-Koordinate 

Höhe in Pixeln 

Breite in Words 

Tiefe 

Kollisionsmaske 1 
Kollisionsmaske 2 
Zeiger auf Grafikdaten 
Zeiger auf BorderLine-Wort 
Zeiger auf CollMask-Plane 

Zeiger auf Bob-Struktur 
Maske für benutze Planes 
Plane-Maske zum Ein/Ausschalten 


*vs_DrawPath, *vs_ClearPath 

Diese Zeiger dienen dem System zum Merken der Reihenfolge 
in der die Bobs gezeichnet bzw. gelöscht werden müssen. 


vs_Flags 

Folgende Flags sind für Bobs möglich: 
Bob-Flag Wert Bedeutung 


VSF_VSPRITE 

VSF_SAVEBACK 

VSF_OVERLAY 

VSF_BACKSAVED 

VSF_BOBDPDATE 

VSF GELGONE 


$001 Gesetzt für VSprite, gelöscht für Bob 

$002 Bitmap unter Bob sichern 

$004 Bob-Pixel in Farbe 0 durchsichtig 

$100 Bitmap unter Bob wurde gesichert 

$200 System-intern 

$400 VSprite ragt über Begrenzung hinaus 


VSFVSPRITE 

VSF SAVEBACK 


VSF OVERLAY 


VSF BACKSAVED 


Im Falle eines Bobs darf dieses Flag nicht ge¬ 
setzt sein (keine 1 auf den Flag-Wert aufaddie¬ 
ren) . 

Wenn dieses Flag gesetzt ist, sichert das System 
die Grafik, die vorher an den Bob-Koordinaten zu 
sehen war, und schreibt sie bei Bob-Bewegungen 
wieder zurück. 

Dieses Flag besagt, daß die Punkte des Bobs, die 
die Farbe 0 haben (Bits in allen Planes ge¬ 
löscht), durchsichtig erscheinen sollen (also so 
wie die Sprites). Ist das Flag gelöscht, werden 
die O-Farb-Punkte des Bobs wirklich in der Hin¬ 
tergrundfarbe gezeichnet. 

Dieses Flag wird, wie auch die folgenden, nur 
vom System gesetzt (der User sollte es nicht 
verändern), und zwar dann, wenn die Grafik unter 
einem Bob gesichert wurde. Das Flag dient zur 
Verhinderung einer Grafikrestauration, wenn der 
Bob zum ersten Mal dargestellt wird, und es so¬ 
mit noch gar keine Grafik zu restaurieren gibt. 
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VSF_GBLGONE Dieses Flag wird gesetzt, wenn ein Bob über die 

Begrenzungen (Gelslnfo-Struktur) hinausragt. 


vs_Width, vs_Depth 

Diese Einträge sind bei Bobs variabel. Die Breite wird in 
Worten angegeben, ein Bob muß also immer eine Breite haben, 
die ein Vielfaches von 16 ist. Die Tiefe kann maximal so 
groß sein wie die der Zielbitmap. 


*vs_ImageData 

Hier steht ein Zeiger auf die Grafik-Daten des Bob. Mit ih¬ 
nen werden wir uns gleich beschäftigen. 


*vs_BorderLine, *vs_CollMask 

Bei Bobs müssen diese beiden Zeiger auch dann initialisiert 
werden, wenn man nicht mit Kollisionsabfragen arbeiten will, 
da die CollMask hier quasi als "Schatten-Plane" des Bobs be¬ 
nutzt wird. Im Anschluß an diese Struktur werden wir uns da¬ 
mit beschäftigen. 


*vs_Bob 

Ein Zeiger auf eine Bob-Struktur, die fitere Informationen 
über den Bob enthält (kommt im Anschlüßen diese Struktur). 

v’/ 

vs_PlanePick, vs_PlaneOnOff 

Dienen der Angabe, welche Plane \>r Bitmap in den Bob-Daten 
vorhanden sind und wie die übrigen behandelt werden sollen. 
Kommt auch gleich. 

Bevor wir den Auf’ a^' der Bob-Grafikdaten behandeln, 
erläutern wir Ihnen > achst die Bob-Struktur, auf die ein 
Zeiger in der VSpritq-Struktur erwartet wird: 


Die 

Bob-Strukturi 


00 

dc.w 

bob BobFlags 

; Bob-Flags 

02 

dc.l 

•bob SaveBuffer 

; Speicher zur Bitmap-Sicherung 

06 

dc.l 

•bob imageShadow ; Zeigt auf die CollMask 

10 

dc.l 

*bob Before 

; Für Zeichenreihenfolge 

14 

dc.l 

*bob After 

; Für Zeichenreihenfolge 

18 

dc.l 

•bob VSprite 

; Zeiger zurück zu VSprite 

22 

dc.l 

*bob BobComp 

; Zeiger auf AnimComp-Struktur 

26 

dc.l 

•bob DBuffer 

; Zeiger für double-buffering 

30 


bob_SIZEOF 


bob 

BobFlags 


Folgende 1 

Flags, die teilweise system-intern sind, sind 

lieh: 



Bob-Flag 

Wert 

Bedeutung 

BF SAVEBOB 

$0001 

Hintergrund nicht restaurieren 


BF_BOBISCOMP 
BF BWAITING 


$0002 

$0100 


Bob gehört zu einer Animation 
Intern 
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BF BDRAWN 

$0200 

Intern 

BF BOBSAWAY 

$0400 

Bob beim nächsten Zeichnen entfernen 

BF BOBNIX 

$0800 

Bob wurde entfernt 

BF SAVEPRESERVE 

$1000 

Intern 

BF_OUTSTEP 

$2000 

Intern 

BF_SAVEBOB 

Dieses Flag kann gesetzt werden, wenn die 


BFBOBISCOMP 

BF_BOBSAWAY 

BF BOBNIX 


tergrundrestaurierung vorübergehend außer Kraft 
gesetzt werden soll. Der Hintergrund wird dann 
zwar weiterhin gesichert, aber nicht mehr zu¬ 
rückgeschrieben. Der Bob wird somit neu gezeich¬ 
net, an der alten Position aber nicht mehr ge¬ 
löscht, was den Brush-Effekt diverser Malpro¬ 
gramme ergibt. Falls die Restaurierung generell 
unterbunden werden soll, sollten Sie statt die¬ 
ses Flags VSF_SAVEBACK benutzen, d.h. selbiges 
Flag löschen. 

Dieses Flag gibt an, daß der Bob zu einer Anima¬ 
tions-Struktur gehört. 

Wenn dieses Flag gesetzt ist, wird der Bob beim 
nächsten Zeichnen mit DrawGList aus der Gels-Li¬ 
ste entfernt. 

Dieses Flag wird vom System als Quittung von 
BF_BOBSAWAY gesetzt, wenn der Bob entfernt 
wurde. 


*bob_SaveBuffer 

Dieser Zeiger weist auf einen Speicherbereich im Chip-RAM, 
der groß genug sein muß, um die komplette Grafik, die vorher 
an den Bob-Koordinaten zu sehen war, aufzunehmen. Die Größe 
in Byte berechnet sich aus Wortbreite * 2 * Höhe * Planes 
(der Bitmap-Grafik). Der Zeiger muß nur eingerichtet werden, 
wenn der Bobhintergrund auch gesichert werden soll (Flag 
VSF_SAVEBACK gesetzt). 

*bob ImageShadow 

Hier kann der Zeiger auf den gleichen Speicherbereich wie 
für vs_CollMask eingetragen werden. 

*bob_Before, *bob_After 

Falls Sie eine Zeichenreihenfolge für Ihre Bobs festlegen 
möchten, können Sie in diese beiden Zeiger die Struktur¬ 
adressen der Bobs eintragen, die vor bzw. nach dem aktuellen 
Bob gezeichnet werden sollen. Ansonsten tragen Sie einfach 
Nullen ein. 

*bob_VSprite 

Dieser Eintrag zeigt zurück zur VSprite-Struktur, von der 
aus auf die Bob-Struktur verwiesen wird (doppelte Verknüp¬ 
fung der Strukturen). 

‘bobComp, *bob_DBuffer 

Diese beiden Zeiger werden nur für die Spezialfunktionen 
Bob-Animation bzw. Double-Buffering benötigt und sind für 
uns weniger interessant. 
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Nach dieser Struktur sollen nun all die Dinge geklärt wer¬ 
den, von denen es hieß 'kommt gleich'. Als erstes zum Aufbau 
der Bob-Grafikdaten. 


Aufbau der Bob-Grafikdaten und -Masken 

Sie erinnern sich vielleicht noch an den Abschnitt über die 
Image-Struktur im Intuition-Kapitel. Wenn ja, werden Ihnen 
die Begriffe PlanePick und PlaneOnOff sicherlich bekannt 
Vorkommen. Bis auf die Tatsache, daß die Breite eines Bobs 
in Worten und nicht in Pixeln angegeben wird und sie daher 
immer ein Vielfaches von 16 betragen muß, sind die Bob-Gra¬ 
fikdaten identisch aufgebaut wie die Image-Grafikdaten. 

Zur Erinnerung: Eine Amiga-Grafik ist in Bitplanes aufge¬ 
baut, die Farbtabeliennummer jedes Punktes ergibt sich aus 
dem "Übereinanderlegen" der zusammengehörigen Bits aus allen 
Bitplanes. Im Gegensatz zu den Sprite-Grafikdaten werden bei 
den Bobs nicht die Bitplanes zeilenweise aufgeführt (Zeile 1 
Plane 1, Zeile 1 Plane 2, Zeile 2 Plane 1, Zeile 2 Plane 2 
usw.), sondern zuerst kommen alle Zeilen der ersten Plane, 
dann alle der zweiten Plane usw. Im PlanePick-Eintrag muß 
angegeben werden, welche Planes der Bob-Zielgrafik in den 
Bob-Grafikdaten vorhanden sind, also in die Zielgrafik ko¬ 
piert werden sollen. 

Setzt man z.B. die Bits 1, 3 und 5 im PlanePick-Byte 
(Zählung ab Bit o), so bestehen die Bob-Grafikdaten nur aus 
3 Planes. Die erste dieser Planes (Nr. 0) wird in die erste 
Plane, deren Bit im PlanePick-Byte gesetzt ist, kopiert. In 
unserem Fall also Plane 1. Die zweite Bob-Plane kommt in die 
Grafik-Plane 3, die dritte in Plane 5. Noch ein Beispiel: 
Bei Setzen der PlanePick-Bits 0, 1 und 2 werden die Bob-Pla¬ 
nes 0, 1 und 2 auch in die Grafik-Planes 0, 1 und 2 kopiert. 

Das PlaneOnOff-Byte bestimmt nun, was mit den Grafik-Planes, 
die nicht im PlanePick-Byte erfaßt sind (deren Bits also auf 
0 stehen), geschehen soll. Ist ein PlaneOnOff-Bit gesetzt, 
so werden die Bits in der zugehörigen Plane auch auf 1 bzw. 
auf den Zustand des entsprechenden Bits in der Bob-Schatten¬ 
maske (kommt gleich) gesetzt. Bei gelöschtem PlaneOnOff-Bit 
wird das Plane-Bit immer entfernt. 

Nun zu den Rand- und Schattenmasken. Wie schon erwähnt, wer¬ 
den sie gewöhnlich nur für die Kollisionserkennung benötigt, 
bei den Bobs aber hat die Schattenmaske noch einen anderen 
Zweck: Sie wird in all die Grafik-Planes kopiert, deren 
PlanePick-Bit gelöscht und deren PlaneOnOff-Bit gesetzt ist. 

Für die Randmaske muß soviel Speicher im Chip-RAM bereitste¬ 
hen, daß eine Zeile des Bobs hineinpaßt. Berechnet wird die 
Randmaske (das gilt auch für die Sprites), indem alle Zeilen 
aller Planes des Bobs OR-Verknüpft werden. Ein Punkt in der 
Randmaske ist also dann gesetzt, wenn in irgendeiner Bob- 
Zeile (oder auch in mehreren) an der entsprechenden Stelle 
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ein gesetzter Punkt ist. Mit der Schattenmaske verhält es 
sich ähnlich: Sie hat die Größe eines Bob-Planes, in Bytes 
also Breite * 2 * Höhe. Sie entsteht durch OR-Verknüpfung 
aller Bob-Planes. 

Glücklicherweise muß die Berechnung der Masken nicht von 
Hand durchgeführt werden. Es gibt dafür eine Graphics-Rou- 
tine. Sie müssen lediglich den Speicher (im Chip-RAM!) be¬ 
reitstellen und die Zeiger vsBorderLine und vs_CollMask 
setzen. 


InitMasks = -126 (Graphics-Library) 


♦VSprite aO < Zeiger auf VSprite (bzw. Bob), dessen 
Masken initialisiert werden sollen. 

Erklärung Berechnet die BorderLine- und CollMask- 

Masken eines VSprites bzw. Bobs. Die 
entsprechenden Zeiger in der VSprite- 
Struktur müssen gesetzt sein. 


Anzeigen, Bewegen und Entfernen von Bobs 

Nachdem die VSprite- und Bob-Struktur auf diese Weise vorbe¬ 
reitet sind, können wir den Bob auf den Bildschirm bringen. 
Dazu muß er zunächst einmal in die Bob-Kette des gewünschten 
Rastports "eingehängt" werden, was die Routine AddBob erle¬ 
digt: 


AddBob = -96 (Graphics-Library) 


*bob aO < Zeiger auf Bob-Struktur (nicht VSprite!) 

des einzuhängenden Bob 

♦rastPort al < Zeiger auf Rastport, in dem der Bob er¬ 

scheinen soll 

Erklärung Hängt einen Bob in die Gelslnfo-Liste 

eines Rastports ein. 


Wichtig ist, daß hier in aO ein Zeiger auf die Bob-Struktur 
und nicht auf die VSprite-Struktur erwartet wird. VSprite- 
und Bob-Struktur sind durch gegenseitige Zeiger verbunden 
(vs_Bob bzw. bob_VSprite). 

Zur endgültigen Darstellung am Bildschirm sind Aufrufe der 
schon von den VSprites her bekannten Routinen SortGList und 
DrawGList nötig. Im Gegensatz zu den VSprites reichen diese 
beiden Routinen aber schon aus, MrgCop und Loadview sind 
nicht nötig (klar, Bobs kommen direkt in die Bitmap-Grafik 
und brauchen daher keine Copperlisten, zu deren Berechnung 
MrgCop dient). 
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Für das Bewegen der Bobs gilt ebenfalls dasselbe wie für die 
VSprites: Man ändert die Einträge vs_Y und vs x in der 
VSprite-Struktur und ruft SortGList und DrawGLrst erneut 
auf. 

Entfernen kann man einen Bob auf zwei Arten. Die erste be¬ 
ruht auf der Routine RemIBob: 


RemIBob 


-132 (Graphics-Library) 


*bob 

aO 

< 

Zeiger auf den zu 
Struktur 

entfernende 

Bob- 

♦rastPort 

al 

< 

Zeiger auf Rastport, 
entfernt werden soll 

, von dem der 

Bob 

*viewPort 

a2 

< 

Zeiger auf Viewport, 
vorher zu sehen war 

, auf dem der 

Bob 

Erklärung 



Entfernt einen Bob 

aus der Gels-Liste 


des angegebenen Rastports und gleichzei¬ 
tig vom Bildschirm, d.h. vom angegebenen 
Viewport. 


Das 'I' in RemIBob steht für 1 immediately 1 , (sofort). Der 
Bob wird also nicht nur aus der Gels-Liste, sondern auch so¬ 
fort vom Bildschirm entfernt. 

Die zweite Methode läuft folgendermaßen: Man setze das 
BF_BOBSAWAY-Flag im Eintrag bob_BobFlags, und beim nächsten 
SortGList-DrawGList-Aufruf verschwindet der Bob vom Schirm 
und aus der Gels-Liste. Als "Quittung" hierfür wird das Flag 
BF_BOBNIX gesetzt. Welche Methode Sie wählen, bleibt Ihnen 
überlassen; die Methode mit dem Flag ist besonders dann 
sinnvoll, wenn Sie viele Bobs auf einmal entfernen wollen 
(Flags setzen und dann eine Library-Routine aufrufen geht 
schneller, als für jeden Bob eine Routine aufzurufen). 

Das Demoprogramm läuft fast genauso ab wie das vorige. Nur 
verwenden wir diesmal - natürlich - anstatt zweier VSprites 
zwei Bobs, die recht "breit" sind, damit der Demonstrations¬ 
effekt (Aufhebung der Breiten-Begrenzung) auch zum Tragen 
kommt. 


* Programm 7.18 (Auszug): Demo Bobs 


lea 

vsprl,aü 

jsr 

InitMasks(a6) 

lea 

bobl,aO 

move.1 

a4,al 

jsr 

AddBob(a6) 


; Masken für Bob 1 berechnen 
; Bob zu Rastport hinzufügen 
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lea vspr2,a0 ; Selbiges für Bob 2 

jsr InitMasks(a6) 

lea bob2,a0 

move.l a4,al 

jsr AddBob(a6) 


main6: move.1 
jsr 

move.1 
move.1 
jsr 


a4,al 

SortGList(a6) 

vport,aO 

a4,al 

DrawGList(a6) 


; Bobs an neuer Position zeichnen 
; (MrgCop und LoadView sind hier 
; nicht nötig) 


* Datenbereich 


vsprl: 


bobl: 


vspr2: 


bob2: 


image: 


dc.l 0,0,0,0 

dc.w 0,0 

dc.w 6,128,0,20,2,1 

dc.w 0,0 

de.1 image 

dc.l bline 

de.1 cmask 

dc.l 0 

dc.l bobl 

de.b 1,0 

dc.w 0 

dc.l sbuffl,cmask,0,0 

dc.l vsprl,0,0 

dc.l 0,0,0,0 

dc.w 0,0 

dc.w 6,0,160,20,2,1 

dc.w 0,0 

de.1 image 

dc.l bline 

de.1 cmask 

dc.l 0 

de.1 bob2 

dc.b 1,0 

dc.w 0 

dc.l sbuff2,cmask,0,0 

dc.l vspr2,0,0 

section "",data_c 

dc.l %11111111111111111111111111111111 

dc.l %11000000000000000000000000000011 

dc.l %10100000000000000000000000000101 

dc.l 110011111111111111111111111111001 

dc.l *10010000000000011000000000001001 

dc.l *10010000000000011000000000001001 
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dc.l 410010000000000011000000000001001 
dc.l %10010000000000011000000000001001 
dc.l 410010000000001111110000000001001 
dc.l 410011111111111111111111111111001 
dc.l 410011111111111111111111111111001 
dc.l 410010000000001111110000000001001 
dc.l 410010000000000011000000000001001 
dc.l 410010000000000011000000000001001 
dc.l 410010000000000011000000000001001 
dc.l 410010000000000011000000000001001 
dc.l 410011111111111111111111111111001 
dc.l 410100000000000000000000000000101 
dc.l 411000000000000000000000000000011 
dc.l 411111111111111111111111111111111 


sbuffl: dcb.b 160,0 

sbuff2: dcb.b 160,0 


Programm 7.18 (Auszug) 


7.8.4 Abfrage von Gel-Kollisionen 

Das Amiga-System kennt zwei grundlegende Arten von Gel-Kol¬ 
lisionen: Berührungen von Gels untereinander und Berührungen 
von Gels mit der Bitmap-Grafik. Bei den VSprites und Bobs 
kommt noch die Möglichkeit hinzu, ein überschreiten der in 
der Gelslnfo-Struktur angegebenen Grenzkoordinaten als Kol¬ 
lision zu registrieren. 


Kollisionsabfrage bei SimpleSprites 

In Bezug auf die Kollisionsabfrage machen die SimpleSprites 
ihrem Namen wieder alle Ehre: Die Abfrage ist recht primitiv 
und einfach zu realisieren, läßt aber keine so komfortable 
Auswahl der abzufragenden Objekte zu wie die VSprites und 
Bobs. 

Die Graphics-Library stellt keine Routinen zur Abfrage von 
SimpleSprite-Kollisionen zur Verfügung (im Gegensatz zu den 
VSprites und Bobs), wir müssen daher auf zwei Hardware-Regi¬ 
ster zurückgreifen. Die beiden Register CLXCON und CLXDAT, 
die als Wort-Adressen angesprochen werden können, dienen der 
Einstellung (CLXCON) bzw. Abfrage (CLXDAT) der Kollisionspa¬ 
rameter . 

CLXCON ist an der Adresse SDFF098 zu finden und bestimmt, 
welche Ereignisse als Kollisionen registriert werden sollen. 
Es können Berührungen eines Sprites mit einem Sprite aus ei¬ 
nem anderen Paar, nicht aber Kollisionen zweier Sprites ei¬ 
nes Paares untereinander, registriert werden, ferner Berüh¬ 
rungen eines Sprites mit der Bitmap-Grafik. Die einzelnen 
Bits des CLXCON-Registers legen die erlaubten Ereignisse 
fest: 
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Belegung des CLXCON-Registers (SDFF098) 

Bit Melde bei gelöschtem Bit Melde bei gesetztem Bit 

Kollisionen von bzw. mit Kollisionen von bzw. mit 


15 

14 

13 

12 

11 

10 

9 

8 

7 

6 

5 

4 

3 

2 

1 

0 


Sprites 6 und 7 
Sprites 4 und 5 
Sprites 2 und 3 
Sprites 0 und 1 


Gelöschtem 

Gelöschtem 

Gelöschtem 

Gelöschtem 

Gelöschtem 

Gelöschtem 


Plane-Bit 6 
Plane-Bit 5 
Plane-Bit 4 
Plane-Bit 3 
Plane-Bit 2 
Plane-Bit 1 


Nur Sprite 6 
Nur Sprite 4 
Nur Sprite 3 
Nur Sprite 0 
Bitplane 6 
Bitplane 5 
Bitplane 4 
Bitplane 3 
Bitplane 2 
Bitplane 1 

Gesetztem Plane-Bit 6 
Gesetztem Plane-Bit 5 
Gesetztem Plane-Bit 4 
Gesetztem Plane-Bit 3 
Gesetztem Plane-Bit 2 
Gesetztem Plane-Bit 1 


Wie wir sehen, werden Kollisionen der Sprites mit geraden 
Nummern immer registriert, für die Erkennung von Kollisionen 
ungerader Sprites müssen die entsprechenden Bits gesetzt 
werden. Die Bits 11-6 bestimmten, ob Kollisionen mit der 
entsprechenden Bitplane gemeldet werden sollen (Bit ge¬ 
setzt). Die Bits 5-0 geben schließlich an, ob ein gesetztes 
oder gelöschtes Plane-Bit in den zu registrierenden Planes 
die Kollision auslösen soll. 

Dieses und auch das CLXDAT-Register sind immer wort-weise 
anzusprechen ('move.w' oder ähnliche Befehle). Beachten Sie, 
daß das CLXCON-Register aufgrund der Hardware-Architektur 
nur geschrieben und CLXDAT nur gelesen werden kann! 

Die eigentliche Abfrage der Kollisionen erfolgt über das Re¬ 
gister CLXDAT (an Adresse SDFFOOE). Jedes Bit steht für ein 
bestimmtes Kollisionsereignis: 

Die Belegung des CLXDAT-Registers ($DFF00E) 

Bit Meldet Kollision von 


15 

14 

13 

12 

11 

10 

9 

8 

7 

6 

5 


- (unbenutzt) 

Sprite 4 (oder 5 
Sprite 2 (oder 3 
Sprite 2 (oder 3 
Sprite 0 (oder 1 
Sprite 0 (oder 1 
Sprite 0 (oder 1 
Bitplane (gerade 
Bitplane (gerade 
Bitplane (gerade 
Bitplane (gerade 


) mit Sprite 
) mit Sprite 
) mit Sprite 
) mit Sprite 
) mit Sprite 
) mit Sprite 
Nummer) mit 
Nummer) mit 
Nummer) mit 
Nummer) mit 


6 (oder 7) 

6 (oder 7) 

4 (oder 5) 

6 (oder 7) 

4 (oder 5) 

2 (oder 3) 
Sprite 6 (oder 
Sprite 4 (oder 
Sprite 2 (oder 
Sprite 0 (oder 


7) 

5) 

3) 

1) 
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4 Bitplane (ungerade Nummer) mit Sprite 6 (oder 7) 

3 Bitplane (ungerade Nummer) mit Sprite 4 (oder 5) 

2 Bitplane (ungerade Nummer) mit Sprite 2 (oder 3) 

1 Bitplane (ungerade Nummer) mit Sprite 0 (oder 1) 

0 Bitplane (gerade Nummer) mit Bitplane (unger. Nummer) 


Die Spritenummern in Klammern bei den Bits 14-9 sind gültig, 
wenn die entsprechende Spritenummer im CLXCON-Register zur 
Kollisionserkennung freigegeben ist. Wichtig ist, daß das 
CLXDAT-Register nach jedem Zugriff automatisch gelöscht 
wird; falls Sie seinen Inhalt also mehrfach auswerten möch¬ 
ten, sollten Sie diesen Zwischenspeichern. 

Die Kollisionserkennung ist bei den SimpleSprites wirklich 
nicht sehr komfortabel, weshalb wir uns nicht näher damit 
beschäftigen wollen, sondern gleich zur Kollisionsabfrage 
bei VSprites und Bobs kommen. 


Kollisionsabfrage bei VSprites und Bobs 

Hier läuft die Kollisionserkennung über die VSprite-Struktur 
ab, und da VSprite und Bob gemeinsam diese Struktur benut¬ 
zen, ist auch die Kollisionserkennung gleich. (Wenn wir im 
folgenden von Gel-Kollisionen sprechen, sind VSprites oder 
Bobs gemeint.) 

Der erste wichtige Eintrag zum Thema Kollisionserkennung ist 
*gi_collHandler in der Gelslnfo-Struktur. Hier tragen Sie 
einen Zeiger auf eine Tabelle ein, die aus 16 Langworten be¬ 
steht. Diese Langworte weisen ihrerseits auf Einsprünge in 
Ihrem Programm, an denen die Routinen zur Kollisionsbehand¬ 
lung stehen. Sie können also 16 verschiedene Routinen (für 
16 Kollisionsereignisse) vorsehen. Die Routinen müssen mit 
RTS enden, da sie, wie wir gleich sehen, über eine Library- 
Routine aufgerufen werden. 

Damit die Kollisionserkennung funktioniert, müssen auf jeden 
Fall die beiden Einträge vs BorderLine und vs CollMask über 
die InitMasks-Routine eingerichtet werden. DFese Einträge, 
die schon im Zusammenhang mit den Bobs besprochen wurden, 
dienen in erster Linie der Kollisionsabfrage, müssen aber 
bei Bobs generell belegt werden. Wie die Belegung vor sich 
geht, entnehmen Sie bitte dem Abschnitt über die Bobs. 

Welche Gels welche Kollisionsroutine aufrufen, legen Sie in 
zwei weiteren Einträgen fest: vs_MeMask und vs_HitMask in 
der VSprite-Struktur. Jedes Bit dieser Wort-Einträge ent¬ 
spricht einer der 16 Kollisions-Routinen (der mit der selben 
Bitnummer). Kollidieren zwei Gels, werden die Masken der 
beiden verglichen, und wenn irgendein Bit in beiden Masken 
gesetzt ist, wird die entsprechende Routine angesprungen. 
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Wenn Sie z.B. wünschen, daß Gel X und Gel Y bei Kollision 
die Routine Nr. 4 auf rufen, setzen Sie bei beiden Gels das 
Bit 4 in der Me- und HitMask. 

Die Unterscheidung der beiden Masken beeinflußt die Reihen¬ 
folge der Gels auf dem Bildschirm: Vom Gel, das sich weiter 
oben auf dem Bildschirm befindet, wird die HitMask zur Er¬ 
kennung herangezogen, vom weiter unten befindlichen die 
MeMask. Man kann so verschiedene Routinen anspringen. Diese 
Funktion wird aber nur recht selten gebraucht; in der Regel 
stimmen HitMask und MeMask überein. 

Eine besondere Rolle spielt die Kollisionsroutine Nr. 0. Sie 
wird angesprungen, wenn das betreffende Gel, die in der 
Gelslnfo-Struktur festgelegten Randkoordinaten über¬ 
schreitet . 

Bei der Initialisierung der Gelslnfo-Struktur brauchen Sie 
im gi_collHandler-Eintrag lediglich einen Zeiger auf einen 
64 Byte großen, leeren Speicherbereich einzutragen. Das Set¬ 
zen der einzelnen Kollisionsroutinen übernimmt eine Gra- 
phics-Routine: 


SetCollision = -144 (Graphics-Library) 


»routine 

aO 

< Zeiger auf Einsprungadresse der einzu¬ 
tragenden Kollisionsroutine 

»gelslnfo 

al 

< Zeiger auf Gelslnfo-Struktur, in deren 
Kollisionstabelle die Routine eingetra¬ 
gen werden soll 

type 

Erklärung 

dO 

< Nummer (0-15) der einzutragenden Routine 

Trägt die Startadresse einer Kollisions- 


routine in die Gelslnfo-Struktur eines 
Rastports ein. 


Nun zum Anspringen der Kollisionsroutinen. Es gibt eine Gra- 
phics-Routine, die prüft, ob seit dem letzten Aufruf eine 
Kollision stattgefunden hat. Wenn dem so ist, wird in die 
betreffenden Routinen aus der CollHandler-Tabelle gesprun¬ 
gen. Es ist also nicht der Fall, daß nach Einrichtung der 
Tabelle mit SetCollision die Routinen automatisch bei 
Kollisionen angesprungen werden, sondern nur dann, wenn 
DoCollision aufgerufen wird. Hat keine Kollision 
stattgefunden, kehrt DoCollision ohne Aufruf zurück. 


DoCollision = -108 (Graphics-Library) 


*rastPort al < Zeiger auf Rastport, der auf Kollisionen 
geprüft werden soll 

Erklärung Stellt fest, ob seit dem letzten Aufruf 

eine Gel-Kollision stattgefunden hat und 
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springt eventuell in die entsprechende, 
in der CollHandler-Tabelle eingetragene, 
Kollisionsroutine. 


Denken Sie daran, daß die Kollisionsroutinen mit RTS enden 
müssen. Vor dem Aufruf der Routine wird der Stack mit eini¬ 
gen Werten belegt. An der Stelle 0(sp), also da, wo der 
Stackpointer hinzeigt, steht wie gewöhnlich die Rück¬ 
sprungadresse (damit das RTS funktioniert). Bei 4(sp) steht 
ein Zeiger auf die VSprite-Struktur des Gels, welches die 
Kollision ausgelöst hat. Bei 8(sp) steht entweder die 
Adresse der VSprite-Struktur des Sprite, mit dem der erste 
zusammengestoßen ist, oder (im Falle der Grenzkoordinaten¬ 
überschreitung) ein Wort, daß folgende Flags enthält: 

Hit-Flag Wert Bedeutung 


TopHit 

BottomHit 

LeftHit 

RightHit 


1 Obere Begrenzung überschritten 

2 Untere Begrenzung überschritten 

4 Linke Begrenzung überschritten 

8 Rechte Begrenzung überschritten 


Die Werte können auch aufaddiert im Flagwort stehen. Aus den 
Angaben auf dem Stack kann die Kollisionsroutine feststellen 
(falls sie es nicht aufgrund der HitMask-Bits schon sowieso 
weiß), welche Gels womit kollidiert sind. 

Zur Demonstration greifen wir das vorige Programm noch ein¬ 
mal auf. Wieder wandern die beiden Bobs über den Bildschirm. 
Ihre Bewegungsrichtungen werden jetzt aber nicht nur dann 
umgekehrt, wenn sie den Bildschirmrand erreichen, sondern 
auch, wenn sie Zusammenstößen. 


* Programm 7.19 (Auszug): Demo Kollisionserkennung (Beispiel Bobs) 


main2: 


lea 

collprg,aO ; 

Einsprungstelle Kollisionsroutine 

lea 

ginfo,al ; 

Zeiger auf Geisinfo 

moveq 

#2,dfl ; 

Kollisionsroutine Nr. 2 

jsr 

SetCollision(a6) 

; Kollisionsroutine setzen 

move.1 

gfxbase,a6 


jsr 

WaitT0F(a6) 


move.1 

a4,al ; 

Abfrage, ob Kollision stattgefunden 

jsr 

DoCollision(a6) 

; hat (wenn ja, wird die 


; entsprechende Routine automatisch 
; angesprungen) 
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collprg: 

neg.w dirl ; Kollisionsroutine: Bewegungs- 

neg.w dir2 ; richtungen umkehren 

rts 


Programm 7.19 (Auszug) 


7.9 Das IFF-Grafikforraat 

Die Abkürzung IFF steht für "Interchange File Format" 
(Austausch-Dateiformat). Das IFF-Format stellt also einheit¬ 
liche Vorschriften zum Ablegen von Datendateien dar, die so¬ 
mit leicht von verschiedenen Programmen bzw. auch von ver¬ 
schiedenen Computersystemen gelesen werden können. 

Eine IFF-Datei ist aus sog. "Chunks" (Datenblöcken) aufge¬ 
baut. Im allgemeinen IFF-Format, das für verschiedenste 
Zwecke benutzt werden kann, gibt es diverse Chunk-Typen mit 
teilweise recht komplexem Aufbau. Um sie wollen wir uns hier 
nicht kümmern (sie werden auf dem Amiga z.Zt. auch noch kaum 
verwendet), wir interessieren uns nur für den Aufbau einer 
IFF-Grafikdatei. 

Neben den IFF-Grafikdateien, genannt ILBM-Dateien 
(Interleaved Bitmap) gibt es auf dem Amiga noch Typen für 
Text (FTXT, Formatted Text), Musikstücke (SMUS, Simple Musi¬ 
cal Score) und Soundeffekte (8SVX, 8-Bit Sampled Voice). 


7.9.1 IFF-Struktur- und Daten-Chunks 

Das IFF-Format kennt vier sog. "Struktur-Chunks", die den 
Aufbau der Datei beschreiben und organisieren. In einer IFF- 
ILBM-Datei wird nur der einfachste der vier Typen verwendet, 
der FORM-Chunk. Man kann sagen, ein IFF-Bild besteht nur aus 
einem Form-Chunk. Jeder Struktur-Chunk beginnt mit folgenden 
drei Langworten: 

Der IFF-Strukturchunk-Header 


00 

de. 1 

ckID 

; Kennung des Chunks 

04 

de. 1 

cksize 

; Länge des Chunks in Bytes 

08 

de. 1 

grpSubID 

; Kennung des Chunk-Typs 

12 

ds.b 


; Beliebige Datenchunks 

ckID 

Hier 

steht 

die Kennung des 

Chunks als ASCII-Zeichen-Lang' 

wort. 

Beim 

FORM-Chunk findet 

sich das Langwort $464F524D. 
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cksize 

Die Länge des kompletten Chunks in Bytes. Die vier Header- 
Langworte werden nicht mitgerechnet. Im Prinzip steht hier 
also die Länge der Datei minus 12. Hinweis: Sollte der Chunk 
eine ungerade Bytelänge haben, wird ein Füllbyte am Ende an¬ 
gefügt, welches jedoch nicht in der Size-Angabe vermerkt 
wird. Das gleiche gilt auch für die Längen aller 
untergeordneten Chunks. 

grpSubID 

Bei Grafikdateien, mit denen wir uns ausschließlich beschäf¬ 
tigen, steht hier die Kennung ILBM (als Langwort $494C424D). 


Nach diesen drei Einleitungs-Langworten, die gewöhnlich zum 
Test, ob es sich bei einer Datei um eine IFF-Grafikdatei 
handelt, benutzt werden, folgen die sog. "Daten-Chunks" der 
Grafik. Es gibt derer 8, die aber nicht unbedingt alle in 
einer Grafikdatei vorhanden sein müssen. Folgende Chunks, 
die in der hier aufgeführten Reihenfolge stehen sollten, 
sind bekannt: 

BMHD Bitmap Header. Enthält grundlegende Informatio¬ 

nen über Größe, Position, Farbanzahl usw. der 
Grafik. Dieser Chunk muß vorhanden sein. 

CMAP Colormap. Enthält die Farbtabelle der Grafik. 

Dieser Chunk ist nicht unbedingt notwendig, ge¬ 
wöhnlich aber immer vorhanden. 

GRAB Enthält die Koordinaten des "Hot Spots" 

(sensiblen Punktes) eines Maussprites; findet 
sich nur in Spezialfällen in einer Grafikdatei. 
DEST Destination. Informiert das lesende Programm 

über die Zielposition der Grafik und über die 
Behandlung der einzelnen Planes (PlanePick und 
PlaneOnOff). 

SPRT Sprite. Enthält die Priorität eines eventuellen 

Sprites (sehr selten benutzt). 

CAMG Vereinfacht die Einstellung der speziellen 

Amiga-Grafikmodi HAM, Dual-Playfield und Extra- 
Halfbright. 

CRNG Color Range. Wird von diversen Malprogrammen 

(wie DPaint) benutzt, um die eingestellten Co- 
lor-Cycling-Bereiche mit der Grafik abzuspei¬ 
chern. Je nach DPaint-Version finden sich 4 (bis 
DPaint 2) oder 6 (ab DPaint 3) CRNG-Chunks in 
einer Datei. 

BODY Enthält die eigentlichen Grafikdaten. 


Nach diesem Kurzüberblick wollen wir nun die einzelnen 
Chunks ausführlich besprechen. Jeder Daten-Chunk beginnt, 
wie der FORM-Struktur-Chunk, mit einem Header, der folgen¬ 
dermaßen aussieht: 
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Der IFF-Datenchunk-Header 

00 dc.l ckID ; Kennung des Chunks 

04 dc.l cksize ; Länge in Bytes 

08 ds.b ... ; Daten des Chunks 

ckID 

Hier steht wieder das ASCII-Langwort der Chunk-Kennung. Bei 
BHMD Z.B. ist es S424D4844. 

cksize 

Die Länge des Datenchunks in Byte. Bei ungerader Bytelänge 
wird, wie beim FORM-Chunk, ein nicht vermerktes Füllbyte 
nach dem Chunk eingeschoben. 


Auf diese zwei Langworte folgen die eigentlichen Daten des 
Chunks, die sich von Typ zu Typ unterscheiden. Wir gehen nun 
auf die einzelnen Chunk-Typen ein. 

7.9.2 Die Daten-Chunks im Detail 
Der BMHD-Chunk 

Nach dem Header findet sich folgender Aufbau: 


00 

dc.w 

w 

; Breite der Grafik 

02 

dc.w 

h 

; Höhe der Grafik 

04 

dc.w 

X 

; x-Startkoordinate 

06 

dc.w 

y 

; y-Startkoordinate 

08 

dc.b 

nPlanes 

; Anzahl der Bitplanes (Farben) 

09 

dc.b 

masking 

; Maskierungsverfahren 

10 

dc.b 

compression 

; Komprimierungsverfahren 

11 

dc.b 

padl 

; Füll-Byte 

12 

dc.w 

transparentColor 

; Bitmuster der transparenten Farbe 

14 

dc.b 

xAspect 

; Breite eines Pixels 

15 

dc.b 

yAspect 

; Höhe eines Pixels 

16 

dc.w 

pageWidth 

; Seitenbreite 

18 

dc.w 

pageHeight 

; Seitenhöhe 

20 


SIZEOF 


w, h 

, x, y 


Startkoordinate der Grafik. Falls 

Die 

Größe 

(in Pixeln) und 

die 

Größe 

kein Vielfaches 

von 16 beträgt, müssen die über- 


zähligen Pixel in ein zusätzlichen Wort geschrieben werden. 
nPlanes 

Die Anzahl der Bitplanes in der Grafik. Die Farbzahl ent¬ 
spricht 2 planes . Falls hier eine 0 steht, enthält die IFF- 
Datei keine Grafik. Das ist nützlich, wenn nur die Farbin¬ 
formation eines Bildschirms gespeichert werden soll. 

masking 

Hier wird die Kenn-Nummer des verwendeten Maskierungsverfah¬ 
rens eingetragen. Es gelten folgende Zuordnungen: 
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Maskierung 

Wert 

Bedeutung 

mskNone 

0 

Keine Maskierung 

mskHasMask 

1 

Maske in Grafik integriert 

mskHasTC 

2 

Transparente Farbe verwenden 

mskLasso 

3 

Füllen bis zum transparenten Rand 

mskNone 


Es wird kein Maskierungsverfahren verwendet. Die 
Grafik soll 1:1 in die Zielbitmap kopiert wer¬ 
den. 

mskHasMask 


Die Maske ist in die Grafik integriert und muß 
verwendet werden. Dieses Maskierungsverfahren 
kommt nur äußerst selten zur Anwendung. 

mskHasTC 


TC steht als Abkürzung für 'Transparent Color'. 
Grafikpunkte mit dem Bitmuster, das im Eintrag 


transparentColor angegeben ist, sollen nicht in 
der entsprechenden Farbe dargestellt werden, 
sondern die vorherige Grafik in der Zielbitmap 
soll an diesen Stellen erhalten bleiben. Dieses 
Verfahren, daß neben mskNone am häufigsten ver¬ 
wendet wird (Beispiel DPaint), dient zum Einle¬ 
sen von Grafiken, die keine strenge Rechteckform 
haben. 

mskLasso Die Grafik ist von einem ein Pixel breiten Rand 

in der transparentColor-Farbe umgeben. Die Gra¬ 
fik soll nach dem Einladen vom Rand aus in der 
transparenten Farbe ausgefüllt werden, wobei der 
ein-Pixel-Rand um die eigentliche Grafik als 
Füllbegrenzung dient. Alle dann eingefärbten Pi¬ 
xel gelten als transparent. Auch dieses Maskie¬ 
rungsverfahren wird nur sehr selten angewandt. 


compression 

Hier wird das verwendete Komprimierungs-Verfahren verzeich¬ 
net. Eine Null (cmpNone) steht für eine unkomprimierte Gra¬ 
fik, die (fast) direkt in die Bitmap eingelesen werden kann. 
Eine Eins an dieser Stelle besagt, daß die Grafik mit dem 
einzigen zur Zeit verwendeten Komprimierungsverfahren 
'ByteRun' komprimiert wurde (cmpByteRun). Wie dieses 
Verfahren arbeitet, werden wir gleich sehen. 

padl 

Ein Füll-Byte, um die Struktur auf eine gerade Adresse 
"umzubiegen". 

transparentColor 

Das Bitmuster der transparenten Farbe (muß nicht vorhanden 
sein). Es wird nicht direkt ein Farbregister angegeben, da 
die IFF-Grafik eventuell weniger Bitplanes enthält als die 
Ziel-Bitmap (siehe planePick und planeOnOff im DEST-Chunk), 
sondern das Bitmuster in der eigentlichen IFF-Grafik. Sollte 
die Grafik die gleiche Anzahl Bitplanes haben wie die Ziel¬ 
bitmap, kann man das Bitmuster als Farbregisternummer anse- 
hen. 
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xAspect, yAspect 

Hier wird das Verhältnis Höhe-Breite der Grafik angegeben. 
Bei "normalen" Grafiken steht im x-Eintrag eine 10 und im y- 
Eintrag eine 11, ein Pixel hat also in x-Richtung 10/11 der 
Größe in y-Richtung. Auf dem Monitor ist ein Lores-Pixel 
also etwas höher als breit. Diese Werte sind nützlich, wenn 
man die Grafik vergrößern und das Verhältnis beibehalten 
will. 

pageWidth, pageHeight 

Diese Einträge geben die Bildschirmauflösung der Grafik, un¬ 
abhängig von der wirklichen Höhe und Breite, an. Bei einem 
Lores-PAL-Bild stehen hier also die Werte 320 bzw. 256. 


Nun ein Beispiel-BMHD-Chunk einer möglichen Grafikdatei: 


bmhd: 

dc.l 

"BMHD" 

Chunk-Kennung 


dc.l 

20 

Länge: 20 Bytes 


dc.w 

320,200 

Breite und Höhe 


dc.w 

0,0 

Startkoordinaten 


dc.b 

5 

5 Planes = 32 Farben 


dc.b 

2 

Masierung mskHasTC 


dc.b 

1 

Grafik per ByteRun gepackt 


dc.b 

0 

Füllbyte 


dc.w 

0 

Transparente Farbe: Nummer 0 


dc.b 

10,11 

Verhältnis Breite-Höhe 


dc.w 

320,200 

Bildschirm-Auflösung: Lores NTSC 


Bild 7.7: Beispiel für einen BMHD-Datenchunk 


Noch ein Hinweis: PAL bzw. NTSC beziehen sich auf zwei Moni¬ 
tor-Typen. NTSC-Monitore, wie sie in Amerika üblich sind, 
können maximal 200 Pixel in vertikaler Richtung darstellen, 
PAL-Monitore, die wir in Deutschland verwenden, 256 Pixel. 
Daher bezeichnet man die y-Größe 200 auch als NTSC- und 256 
als PAL-Auflösung. 


Der CMAP-Chunk 

Zunächst wieder der Aufbau: 


00 

dc.b 

redO 

01 

dc.b 

greenO 

02 

dc.b 

blueO 

03 

dc.b 

redl 

04 

dc.b 

greenl 

05 

dc.b 

bluel 


Rotanteil Farbe 0 
Grünanteil Farbe 0 
Blauanteil Farbe 0 
Rotanteil Farbe 1 
Grünanteil Farbe 1 
Blauanteil Farbe 1 


Grafik verwendete Farbe finden sich drei 
für den Rot-, Grün- und Blauanteil der 


Für jede in der 
Bytes, je eines 
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Farbe. Die Länge der Struktur ist, aufgrund der unbestimmten 
Farbanzahl, variabel. Die maximale Länge beträgt 32 Farben * 
3 Bytes =96 Bytes. 

Eine Schwierigkeit ergibt sich: Aufgrund der Tatsache, daß 
im Chunk für jede Farbe drei Bytes vorhanden sind, die 
Farben aber normalerweise in einem Wort (ein Nibble pro ein 
Farbanteil plus ein unbenutztes Nibble) angegeben werden, 
muß das lesende Programm die Farbdaten etwas umrechnen. 
Zudem werden die Intensitäten der einzelnen Anteile auch 
nicht, wie üblich von 0 bis 15 gezählt, sondern sie reichen 
in diesem Chunk von 0 bis 255, wobei beim Amiga nur jeder 
16. Wert benutzt wird. Man erreicht den Amiga- 


Intensitätswert 

teilt. 

also, indem man 

den 

Chunk-Wert 

durch 

16 

Das ganze hat 

aber einen Sinn: 

Das 

IFF-Format 

soll 

für 


verschiedene Computersysteme einheitlich sein, damit die Da¬ 
teien übertragen werden können. Nun kann es Computersysteme 
geben, die mehr als 16 Intensitätsstufen pro Farbanteil ver¬ 
arbeiten. Die Aufteilung der Farbanteile auf drei Bytes ist 
die beste Lösung, um allen Systemen gerecht zu werden. 

Nachdem die drei Byte-Werte auf den Bereich 0 bis 15 umge¬ 
rechnet wurden, müssen sie noch zu den drei Nibbles des 
Farbwortes "zusammengeklebt" werden. Das geschieht, indem 
man den Rotwert um zwei Nibbles (oder 8 Bits) nach links 
schiebt (aus $e würde also $e00), den Grünwert um ein Nibble 
(vier Bit, aus $a würde $a0) und dann die beiden verscho¬ 
benen Werte mit dem Blauwert (Beispiel: $5) OR-verknüpft. 
Das ergibt $e00 OR $a0 OR $5 = $ea5, also genau die Darstel¬ 
lung, die wir auf dem Amiga brauchen. Im Programm sieht das 
Ganze so aus (do bis d2 enthalten die drei Farbanteile aus 
dem CMAP-Chunk): 


asr .b 

#4,d0 

; Schieben um 4 = Division durch 16 

asr .b 

#4,dl 


asr .b 

#4,d2 


asl .w 

18,do 

; Rotwert zwei Nibbles nach links 

asl.w 

#4,dl 

; Grünwert ein Nibble 

clr .w 

d3 

; Ergebnisfarbe löschen 

move.w 

d0,d3 

; Rotanteil nach d3 

or .w 

dl,d3 

; Grünanteil dazuORen 

or .w 

d2,d3 

; Blauanteil dazu, fertig 


Bild 7.8: Umrechnung IFF-Farben in Amiga-Farben 


Der GRAB-Chunk 

Dieser Chunk, der nur in Spezialfällen in einer IFF-Grafik 
vorkommt, besteht aus zwei Einträgen: 
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00 de.w x ; x-Koordinate des Hotspots 
02 dc.w y ; y-Koordinate des Hotspots 
04 SIZEOF 


Das x/y-Koordinatenpaar bezeichnet den Anklickpunkt 
(Hotspot) einer Maussprite-Grafik relativ zur linken oberen 
Ecke der Grafik. 


Der DEST-Chunk 

In diesem Chunk, der wahlweise vorhanden sein kann, sind In¬ 
formationen über die in der Grafik vorhandenen Bitplanes und 
darüber, wie die nicht vorhandenen Bitplanes behandelt wer¬ 
den sollen, abgelegt. 


00 

dc.b 

depth ; 

Anzahl der Grafikplanes 


01 

dc.b 

padl ; 

Füllbyte 


02 

dc.w 

planePick ; 

Zu kopierende Planes 


04 

dc.w 

planeOnOff ; 

Behandlung der übrigen Planes 


06 

dc.w 

planeMask ; 

Verwendete Ziel-Bitplanes 


08 


SIZEOF 



depth 

Die 

IFF-Grafik kann weniger 

Bitplanes umfassen als 

die 

Bitmap, in 

die sie einkopiert 

werden soll. Hier steht 

die 


Anzahl der Planes in der IFF-Grafik. 

planePick, planeOnOff 

Diese beiden Einträge sind schon aus dem Abschnitt über den 
Grafikaufbau der Bobs (7.8.3) und aus dem Intuition-Kapitel 
(Image-Struktur) bekannt. Auch bei IFF-Grafiken gibt es die 
Möglichkeit, nur bestimmte Planes der Zielgrafik in der IFF- 
Datei abzulegen. Die Planes, die im planePick-Wort einge¬ 
schaltet sind, werden aus der IFF-Grafik in die Zielbitmap 
kopiert. Die übrigen werden, je nach Zustand des entspre¬ 
chenden planeOnOff-Bits, komplett mit Eins- bzw. Nullbits 
gefüllt. (Weitere Informationen siehe vorhin erwähnte Ab¬ 
schnitte.) Sinnvoll ist dies z.B., wenn eine Plane komplett 
aus 1-Bits besteht. Das planePick-Bit wird gelöscht, das 
planeOnOff-Bit gesetzt, und schon hat man eine ausgefüllte 
Bitplane, ohne ein einziges Grafikbyte speichern zu müssen. 

planeMask 

Hier ist noch einmal angegeben, welche Bitplanes der Ziel¬ 
bitmap vom Kopier- bzw. Füllvorgang betroffen sein sollen. 


Noch ein Hinweis: In einer normalen, d.h. DPaint-IFF-Grafik 
findet sich dieser Chunk nicht. 
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Der SPRT-Chunk 

Dieser Chunk ist sehr einfach. Er wird fast nie benutzt und 
besteht nur aus einem Eintrag: 

00 dc.w SpritePrecedence ; Priorität des Sprites 

02 SIZEOF 


Falls die IFF-Grafik einen Sprite darstellt, kann in diesem 
Chunk seine Darstellungspriorität angegeben werden. 


Der CAMG-Chunk 

Dieser Chunk umfaßt auch nur einen Eintrag, ist aber durch¬ 
aus nützlich: 

00 dc.l ViewModes ; Verwendeter Grafimodus 

04 SIZEOF 


In diesem Chunk kann der verwendete Grafikmodus eingetragen 
werden. Die Belegung des ViewModes-Eintrages entspricht den 
ViewModes in der NewScreen- bzw. ViewPort-Struktur (siehe 
dort). Der Chunk wird für die Grafikmodi Hires, Extra-Halfb- 
right, Dual-Playfield und HAM eingesetzt, gewöhnlich aber 
nicht für Interlace. Ob dieser Modus nötig ist, muß das le¬ 
sende Programm durch Abfrage der Grafikhöhe feststellen (ab 
400 Pixel Interlace-Modus). Die Verwendung der ViewModes 
SPRITES, VP_HIDE und GENLOCK_VlDEO in diesem Chunk ist nicht 
erlaubt. 


Der CRNG-Chunk 

Dieser Chunk wird nur von DPaint benutzt. Das Programm spei¬ 
chert darin die eingestellten Color-Cycling-Bereiche direkt 
mit der Grafik ab. Sein Aufbau ist folgender: 


00 

dc.w 

padl 

; Reserviert für Erweiterungen 

02 

dc.w 

rate 

; Cycle-Rate 

04 

dc.w 

flags 

; Cycle-Flags 

06 

dc.b 

low 

; Erste Cycle-Farbe 

07 

dc.b 

high 

; Letzte Cycle-Farbe 

08 


SIZEOF 


padl 





Dieser Eintrag ist für zukünftige Erweiterungen reserviert. 
Derzeit steht hier nur eine 0. 

rate 

Der Wert, der hier eingetragen werden muß, berechnet sich 
aus der Anzahl der Farbrotationen pro Sekunde nach folgender 
Formel: Rate = rps / 60 * 16384 (RPS für Rotations Per Se- 
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cond). Für 30 Rotationen pro Sekunde ergibt sich also: Rate 
= 30 / 60 * 16384 = 8192. 

f lags 

Folgende Flags sind möglich: 

Cycle-Flag Wert Bedeutung 


RNG_ACTIVE 1 Cycle war beim Speichern eingeschaltet 

RNG REVERSE 2 Farben werden rückwärts rotiert 


low, high 

Geben die erste bzw. letzte Farbe aus der Palette an, die 
rotiert werden sollen. 


Der BODY-Chunk 

Nun haben wir die eigentlichen Grafikdaten erreicht. Für den 
BODY-Chunk gibt es keine Struktur, der Chunk beginnt sofort 
mit den Grafikbytes. 

Die Grafik ist in einer IFF-Datei auf eine etwas ungewöhnli¬ 
che Weise abgelegt. Normalerweise erwartet man ja, daß die 
Grafik bitplaneweise vorliegt, also zuerst alle Bytes der 
ersten Plane, dann alle der zweiten usw. (wie bei der Intui- 
tion-Image-Struktur). Eine IFF-Grafik aber wird zeilenweise 
abgelegt, also genauso wie die Daten eines SimpleSprite 
(Zeile 1 Plane 1, Zeile 1 Plane 2, Zeile 2 Plane 1, Zeile 2 
Plane 2 usw.). Das Ladeprogramm kann die Grafikbytes nicht 
einfach "am Stück" in den Bitmap-Speicher einiesen, sondern 
muß sie zeilenweise auf die Bitplanes aufteilen. 

Dieses Speicherverfahren wird wahrscheinlich aus Gründen der 
Einheitlichkeit (Stichwort Übertragung auf andere Systeme) 
angewandt; für den Amiga ist es eigentlich recht unprak¬ 
tisch. 


7.9.3 Packen und Entpacken von IFF-Grafiken 

Bei der Besprechung des BMHD-Chunks sind wir auf einen Ein¬ 
trag namens 1 compression' gestoßen, der angibt, ob die Gra¬ 
fik komprimiert vorliegt oder nicht. Wenn im Compression- 
Byte eine Null steht, ist die Grafik nicht komprimiert und 
kann direkt (unter Beachtung der zeilenweisen Speicherung) 
in die Bitmap übernommen werden. Ansonsten muß vor der Kopie 
in die Bitmap "entpackt" werden. 

Ein Komprimierungs-Verfahren basiert immer auf der Zusammen¬ 
fassung gleicher Bytefolgen zu einem "Kürzel". Ein Beispiel: 
Anstatt 100 aufeinanderfolgender gleicher Bytes (z.B. 0-By- 
tes) könnte auch einfach die Anzahl und der Wert abgelegt 
werden (in unserem Beispiel 100 und 0). So werden 100 Bytes 
zu 2 Bytes komprimiert. 
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Die Effizienz einer solchen Komprimierung hängt natürlich 
von der Anzahl gleicher Bytes ab. Bei Grafikdateien ist die 
Effizienz meist recht hoch, da gewöhnlich eine Menge glei¬ 
cher Bytes (z.B. Nullen) nacheinander auftreten. 

Das IFF-Packverfahren ByteRun arbeitet folgendermaßen: Am 
Anfang jeder Byte-Gruppe steht ein Byte, das angibt, wieviel 
gepackte bzw. ungepackte Bytes folgen. Bei n ungepackten 
Bytes wird dabei der Wert n-1 in das Byte geschrieben. Bei n 
gepackten Bytes ist es der Wert 1-n, also eine negative Zahl 
(die im Zweierkomplement-Format abgelegt wird). Die maximale 
Anzahl Bytes in einer Gruppe liegt, da ein Bit schon belegt 
ist, bei 128. 

Wichtig ist, daß das Zeilenende beim Packen nie überschrit¬ 
ten wird, sondern die Bytes in diesem Fall auf zwei Blöcke 
aufgeteilt werden. Bei gepackten Bytes wird nur die Anzahl 
und der Wert der Bytes abgelegt. Daher ist das Packen erst 
ab einer Folge von mindestens zwei gleichen Bytes sinnvoll. 
Nun die exakte Vorgehensweise beim Packen einer IFF-Grafik: 

1. Ausgehend vom aktuellen Byte wird die Anzahl aufeinander¬ 
folgender gleicher Bytes ermittelt. Liegt sie bei zwei 
oder höher, wird bei Punkt 3 fortgefahren. Ansonsten wird 
die Länge der Folge ungleicher Bytes ermittelt (suche, 
bis wieder gleiche Bytes kommen) und bei Punkt 2 fortge¬ 
fahren . 

2. Die n ungleichen Bytes werden folgendermaßen abgelegt: 
Ins erste Byte kommt die Anzahl als n-1, ab dem zweiten 
folgen die ungepackten Bytes. Fortsetzung bei Punkt 4. 

3. Die n gleichen Bytes werden folgendermaßen abgelegt: Im 
ersten Byte wird die Anzahl als 1-n verzeichnet, im zwei¬ 
ten der Wert der gepackten Bytes. 

4. Falls das Grafikende noch nicht erreicht wurde, zurück zu 
Punkt 1. 

Wie schon erwähnt, müssen die Bytes auf mehrer Gruppen 
aufgeteilt werden, sobald das Zeilenende überschritten wird 
bzw. bei Folgen, die länger als 128 Bytes sind. 

Nun die Vorgehensweise beim Entpacken: 

1. Ein Byte wird gelesen und sein Vorzeichenbit wird ge¬ 
prüft. Ist das Byte (n) positiv, geht es zu Punkt 2, an¬ 
sonsten zu 3. 

2. Es folgen n+1 ungepackte Bytes, die direkt übernommen 
werden können. Weiter bei 4. 

3. Es folgen -n+1 gepackte Bytes, deren Wert aus dem näch¬ 
sten Byte ersichtlich ist (bei der Negation Zweierkomple¬ 
ment beachten!). 

4. Wenn das Grafikende noch nicht erreicht ist, zurück zu 
Punkt 1. 

Wichtig: Im Längenbyte der gepackten Grafik hat ein Wert von 
-128 (= $80) keine Bedeutung und muß überlesen werden. 
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Als Beispiel wollen wir und nun eine (Hex-)Bytefolge unge- 
packt und gepackt ansehen: 

Ungepackte, originale Bytefolge: 

00 00 00 01 02 03 04 00 00 00 02 02 02 01 01 00 00 00 04 03 02 00 00 00 
Daraus entsteht die gepackte Folge: 

FE 00 03 01 02 03 04 FE 00 FE 02 FF 01 FE 00 02 04 03 02 FE 00 

I 1 1 1—I n+1 (=4) ungepackte Bytes 

—-n+1 (=3) gepackte Null-Bytes (FE steht für -2) 

Das sind bei dieser kurzen Folge immerhin schon drei Bytes 
Ersparnis. Meistens sind die Folgen gleicher Bytes (vor al¬ 
lem Nullen) in einer Grafik noch viel länger. Durchschnitt¬ 
lich kann man mit dem ByteRun-Verfahren eine Grafik um 30- 
40% komprimieren. 

Die programmtechnische Realisierung des Packverfahrens kön¬ 
nen Sie dem Schluß-Demoprogramm dieses Abschnitts entnehmen. 


7.9.4 Beispiel einer kompletten IFF-Datei 

Bis jetzt haben wir die einzelnen Chunks getrennt be¬ 
trachtet. In einer IFF-Datei stehen sie aber alle fein säu¬ 
berlich hintereinander. Als Beispiel wollen wir uns nun die 
Struktur einer kompletten IFF-Grafikdatei, wie sie von 
DPaint erstellt wurde, ansehen (wobei wir die eigentlichen 
Grafikdaten natürlich weglassen, sonst wären die nächsten 20 
Seiten mit Grafikbytes voll). 

Die verwendete Grafik hat eine Auflösung von 640x200 Punk¬ 
ten, liegt also im Hires-NTSC-Format vor. Es werden 3 
Bitplanes, entspricht 8 Farben, verwendet. Außerdem sind, da 
die Grafik mit DPaint 2 gespeichert wurde, 4 Color-Cycling- 
Bereiche eingestellt. 


iffgraphic: dc.l 

"FORM" 

; Kennung Struktur-Chunk 

de. 1 

15488 

; Gesamtlänge des Chunks 

dc.l 

"ILBM" 

,- Chunk-Typ 

dc.l 

"BMHD" 

; Daten-Chunk Bitmap-Header 

dc.l 

20 

; Länge 20 Bytes 

dc.w 

640,200 

; Größe 

dc.w 

0,0 

; Startposition 

dc.b 

3,2,1 

; Planes, Masking, Compression 

dc.b 

0 

; Füllbyte 

dc.w 

0 

; Transparente Farbe 

dc.b 

10,11 

; Größenverhältnisse 

dc.w 

640,200 

; Bildschirmauflösung 
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dc.l 

"CMAP" 

Daten-Chunk Colormap 

dc.l 

24 

Länge 24 Bytes 


dc.b 

0,0,0 

Farbe 0 (Umrechnung s.o 

dc.b 

240,240,240 

Farbe 1 


dc.b 

48,48,32 



dc.b 

0,48,64 



dc.b 

0,64,80 



dc.b 

32,80,80 



dc.b 

16,80,80 



dc.b 

16,80,64 

Farbe 7 


dc.l 

"CAMG" 

Daten-Chunk CAMG 


dc.l 

4 

Länge 4 Bytes 


dc.l 

4 

Viewmode Hires 


dc.l 

"CRNG" 

Daten-Chunk CRNG 


dc.l 

8 

Länge 8 Bytes 


dc.w 

0 

Reserviert 


dc.w 

24 

Geschwindigkeit 


dc.w 

1 

Flag Active 


dc.b 

23,31 

Erste und letzte 

Farbe 

dc.l 

"CRNG" 

Daten-Chunk CRNG 


dc.l 

8 

Länge 8 Bytes 


dc.w 

0 

Reserviert 


dc.w 

2560 

Geschwindigkeit 


dc.w 

1 

Flag Active 


dc.b 

23,31 

Erste und letzte 

Farbe 

dc.l 

"CRNG" 

Daten-Chunk CRNG 


dc.l 

8 

Länge 8 Bytes 


dc.w 

0 

Reserviert 


dc.w 

2560 

Geschwindigkeit 


dc.w 

1 

Flag Active 


dc.b 

0,0 

Erste und letzte 

Farbe 

dc.l 

"CRNG" 

; Daten-Chunk CRNG 


dc.l 

8 

; Länge 8 Bytes 


dc.w 

0 

; Reserviert 


dc.w 

2560 

; Geschwindigkeit 


dc.w 

1 

; Flag Active 


dc.b 

23,31 

; Erste und letzte 

Farbe 

dc.l 

"BODY" 

; Daten-Chunk Body 


de. 1 

15167 

; Länge 


dc.b 

... 

; Grafikbytes ... 



Bild 7.9: Beispiel für eine komplette IFF-Datei 
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7.9.5 Einladen und Anzeigen einer IFF-Grafik 

Erschrecken Sie bitte nicht, wenn Sie das nächste Demo- 
progranun sehen: es ist ca. 7 1/2 Seiten lang. Wir denken 
aber, daß das Thema IFF-Grafiken so interessant und auch 
wichtig ist, daß es sich lohnt, das Programm komplett abzu¬ 
drucken . 

Das Programm erwartet als Parameter in der Kommandozeile den 
Namen der IFF-Grafikdatei. Diese wird geöffnet und eingele¬ 
sen. Falls dabei nichts schief gelaufen ist, wird die Grafik 
angezeigt. Durch Druck der linken Maustaste kann sie wieder 
entfernt werden. 

Bevor wir zum Programm kommen, muß noch kurz eine Library- 
Routine vorgestellt werden, die wir uns quasi bei der Exec- 
Library "ausleihen": Die CopyMemQuick-Routine zum Kopieren 
von Speicherbereichen. 


CopyMemQuick = -630 (Exec-Library) 


Source 

aO 

< 

Start des Quell-Adreßbereichs (muß durch 
4 teilbar sein). 

Dest 

al 

< 

Start des Ziel-Adreßbereichs (muß durch 
4 teilbar sein). 

Size 

dO 

< 

Länge des Bereichs, der kopiert werden 
soll (in Bytes, muß durch 4 teilbar 
sein). 

Erklärung 



CopyMemQuick ist eine verbesserte Ver- 


sion des CopyMem-Befehls und dient, wie 
man aus dem Namen unschwer erkennen 
kann, zum Kopieren von Speicherberei¬ 
chen. Wenn sich der Quell- und Zielbe¬ 
reich überschneiden, kann nur nach unten 
kopiert werden (al < aO). 


* Programm 7.20: Anzeigen einer IFF-Grafik 


ExecBase 

= 

4 

OpenLib 

= 

-552 

CloseLib 

= 

-414 

Open 

- 

-30 

Close 

= 

-36 

Read 

= 

-42 

Write 

= 

-48 

Seek 

= 

-66 

Output 

= 

-60 

OpenScreen 

= 

-198 

CloseScreen 

= 

-66 

LoadRGB4 

= 

-192 
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WaitTOF 

-270 


AllocMem = 

-198 


FreeMem = 

-210 


CopyMemQuick = 

-630 


move.1 

ExecBase,a6 


movem.l 

a0/d0,-(sp) 

; Kommandozeile sichern 

lea 

dosname,al 

; Libs öffnen 

clr.l 

do 


jsr 

OpenLib(a6) 


move.1 

do,dosbase 


lea 

intname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

dO,intbase 


lea 

gfxname,al 


clr.l 

dO 


jsr 

OpenLib(a6) 


move.1 

dO,gfxbase 


move.1 

dosbase,a6 


jsr 

Output(a6) 

; Standard-Output ermitteln 

move.1 

d0,d4 


movem.l 

(sp)+,a0/d0 

; Kommandozeile zurück 

move.b 

#0,-l(a0,d0) 

; Schluß-Return durch 0 ersetzen 

move.1 

a0,dl 


move.1 

#1005,d2 

; Öffnungs-Modus 

jsr 

Open(a6) 

; Datei öffnen 

tst.l 

dO 

; Fehler? 

bne 

chkl 

; Wenn nein 

lea 

txtl,a0 

; Text 'Datei nicht gefunden' 

bsr 

print 

; ausgeben 

bra 

ende 

; Zum Ende 

chkl: move.l 

d0,d5 

; Filehandle sichern 

bsr 

readlong 

; Erstes Langwort lesen 

cmp. 1 

#"FORM", buff 

; Ist es "FORM"? 

beq 

chk2 

; Wenn ja 

chk3: move.1 

d5,dl 

; Datei schließen 

jsr 

Close(a6) 


lea 

txt2,a0 

; Text 'Keine IFF-Grafikdatei' 

bsr 

print 

; ausgeben 

bra 

ende 


chk2: moveq 

#4,d2 

; Ein Langwort (Chunklänge) 

bsr 

skip 

; überspringen 
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bsr 

readlong 

; Nächstes Langwort lesen 

cmp.l 

#"ILBM",buff 

; Ist es "ILBM"? 

bne 

chk3 

; Wenn nein 

* Hauptschleife: 

Daten-Chunks 

lesen 

mainl: bsr 

readlong 

; Langwort Chunk-Kennung lesen 

tst.l 

dO 

; Anzahl gelesener Bytes 0? 

beq 

main2 

; Wenn ja, Dateiende 

cmp.l 

#"BMHD",buff 

; BMHD-Chunk? 

beq 

bmhd 


cmp.l 

#"CMAP\buff 

; Oder CMAP? 

beq 

cmap 

; Vielleicht ist es "CAMG"? 

cmp.l 

#"CAMG",buff 

beq 

camg 

; Dann aber "BODY"!? 

cmp.l 

|"BODY",buff 

beq 

body 



* Unbekannten Chunk überspringen 


bsr 

readlong 

; Längen-Langwort einiesen 

move.1 

buff,d2 

; Länge nach d2 

bsr 

skip 

; 'Länge' Bytes überspringen 

bra 

mainl 

; Zur Hauptschleife 

main2: move.l 

d5,dl 

; Datei schließen 

jsr 

Close(a6) 


* Grafik darstellen 




cmp.b 

#3,chunks 


bge 

main3 


lea 

txt3,a0 


bsr 

print 


bra 

ende 

main3: 

tst.b 

compr 


beq 

main5 


bsr 

decrunch 

main5: 

move.1 

intbase,a6 


lea 

screen,aO 


jsr 

OpenScreen(a6) 


move.1 

d0,scr 


move.1 

gfxbase,a6 


move.1 

scr,a0 


add.l 

#44,aO 


lea 

cols,al 


clr.l 

dO 


clr.l 

dl 


moveq 

#l,d0 


Wurden die drei Hauptchunks 
gelesen? 

Wenn nein, Text ausgeben 


Ist die Grafik gepackt? 
Wenn nein 

Entpack-Routine anspringen 


Screen öffnen 


Zeiger auf Screen nach aO 

Bei Screen+44 liegt der Viewport 

Zeiger auf Farbtabelle 


Eins-Bit nach dO 
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move.b splanes,dl ; Anzahl Planes nach dl 

asl.l dl,dO ; Entspricht 'dO=2‘Planes 1 

jsr LoadRGB4(a6) ; Farben einstellen 

bsr convert ; Konviertierungs-Routine 

main4: jsr WaitTOF(a6) ; Warte auf Strahlrücklauf 

btst #6,$bfe001 ; Linke Maustaste gedrückt? 

bne main4 ; Wenn nein 

move.l intbase,a6 

move.l scr,aO ; Screen schließen 

jsr CloseScreen(a6) 

move.l ExecBase,a6 

move.l grafmem,al ; Speicher freigeben 

move.l grafsize,dO 

jsr FreeMem(a6) 

tst.b compr 

beq ende 

move.1 grafmem2,al 

move.l grafsize2,d0 

jsr FreeMem(a6) 

ende: move.l ExecBase,a6 

move.l dosbase,al ; Libs schließen und Ende 

jsr CloseLib(a6) 

move.l intbase,al 

jsr CloseLib(a6) 

move.l gfxbase,al 

jsr CloseLib(a6) 


bmhd: add.b #i,chunks ; Erster Hauptchunk gelesen 

moveq #4,d2 ; Längen-Langwort überspringen 

bsr skip 

moveq #20,d3 ; BMHD-Chunk (Länge 20 Bytes) 

bsr readbyte ; einiesen 

move.w buff,swidth ; Daten aus Chunk in NewScreen- 
move.w buff+2,sheight ; Struktur übertragen 
move.b buff+8,splanes 

move.b buff+10,compr 

clr.l dO ; Diverse Daten berechnen: 

move.w swidth,d0 ; Pixelbreite 

asr.l #3,d0 ; geteilt durch 8 

move.w d0,lsize ; ergibt Breite in Bytes 

clr.l dl 

move.w sheight,dl ; Bytebreite mal Höhe 

mulu dl,d0 

move.w d0,psize ; Ergibt Planelänge (Bytes) 
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clr.l 

dl 


move.b 

splanes,dl 


mulu 

dl,d0 


move.1 

d0,grafsize2 


clr .w 

dO 


cmp.w 

#640,buff+16 


blt 

bmhdl 


or .w 

#$8000,dO 

bmhdl: 

cmp.w 

#512,buff+18 


blt 

bmhd2 


or .w 

#4,d0 

bmhd2: 

move.w 

d0,sview 


bra 

mainl 

cmap: 

add.b 

#l,chunks 


bsr 

readlong 


move.1 

buff,d3 


bsr 

readbyte 


clr.l 

d6 


move.b 

splanes,dO 


move.b 

#l,d6 


asl.w 

d0,d6 


subg 

#l,d6 


lea 

buff,a0 


lea 

cols,al 

* Berechnung der Farbtabelle 

cmapl: 

clr.w 

dO 


clr.w 

dl 


clr.w 

d2 


move.b 

(a0)+,d0 


move.b 

(a0)+,dl 


move.b 

(a0)+,d2 


asr .w 

#4,d0 


asr.w 

#4,dl 


asr .w 

#4,d2 


asl.w 

#8,d0 


asl.w 

#4,dl 


move.w 

d0,d3 


or ,w 

dl,d3 


or.w 

d2,d3 


move.w 

d3,(al)+ 


dbra 

d6,cmapl 


bra 

mainl 

camg: 

moveg 

#4,d2 


bsr 

skip 


bsr 

readlong 


move.1 

buff,d0 


or.w 

dO,sview 


bra 

mainl 


; Planelänge mal Planeanzahl 
; Ergibt Gesamtlänge 
; View-Modus 

; Grafik 640 Pixel breit? 

; Wenn nein 

; Modus 'Hires' einschalten 
; Grafik 512 Pixel hoch? 

; Wenn nein 

; 'Interlace' dazuschalten 
; Viewmodus eintragen 


Zweiter Hauptchunk gelesen 
Längen-Langwort einiesen 
und nach d3 schreiben 
Chunk einiesen 
Farbanzahl nach d6 
(per 'd6=2'Planes) 


; Minus 1 wegen dbra 


; Rotwert 
; Grünwert 
; Blauwert 

; Werte durch 16 teilen 


; Rotwert zwei Nibbles nach links 
; Grünwert ein Nibble nach links 
; Werte OR-verknüpfen 


; und in Farbtabelle eintragen 
; Schleife 


; Längen-Langwort überlesen 

; Viewmode-Langwort einiesen 
; und wort-weise mit dem Viewmode- 
; Eintrag von NewScreen verknüpfen 
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body: 

add.b 

bsr 

move.1 

#l,chunks ; 
readlong ; 
buff,grafsize ; 

Dritter Hauptchunk gelesen 
Längen-Langwort 

Größe der Ladegrafik 


move.1 

ExecBase,a6 



move. 1 
clr .1 
jsr 

move.1 

grafsize,dO ; 

dl 

AllocMem(a6) 

dO,grafmem 

Speicher für Ladegrafik belegen 


tst.b 

bne 

move. 1 
bra 

compr ; 
bodyl ; 
grafmem,grafmem2 
body 2 

Grafik gepackt? 

Wenn ja 

; Kopiergrafik=Ladegrafik 

bodyl: 

move. 1 

clr.l 

jsr 

move. 1 

grafsize2,d0 ; 

dl 

AllocMem(a6) 

d0,grafmem2 

Speicher für Kopiergrafik belegen 

body2: 

move. 1 

dosbase,a6 



move. 1 
move. 1 
move. 1 
jsr 
bra 

d5,dl 

grafmem,d2 

grafsize,d3 

Read(a6) 

mainl 

Grafik-Chunk einiesen 

decrunch: 

move.1 
move. 1 
move. 1 

grafmem,a2 ; 
grafmem2,a3 ; 
grafsize2,d3 ; 

Zeiger auf Quellgrafik 

Zeiger auf Zielgrafik 

Bytelänge der Zielgrafik 

decrl: 

clr.l 
clr.l 
move.b 
cmp. 1 
beq 
blt 

d2 

do 

(a2),d0 
#$ao,dO 
decr5 
decr3 

Hauptschleife 

Ein Byte aus gepackter Grafik 

Ist es gleich $80? 

Wenn ja, überspringen 

Wenn kleiner als $80 


move.w 
sub.w 
move.b 

1256,dl 
dO,dl 

1(a2),d0 

Anzahl gepackter Bytes aus 
Kennbyte berechnen 

Byte, das wiederholt wird 

decr2: 

move.b 
addq.1 
dbra 

dO,(a3)+ 

#l,d2 ; 

dl,decr2 

Gepacktes Byte in Zielgrafik 
d2 dient als Zielbytes-Zähler 


add.l 

bra 

#2,a2 ; 

decr6 

Quellzeiger um zwei erhöhen 

decr3: 
decr4: 

add.l 
move.b 
addq.1 

#1 ,a2 

(a2)+,(a3)+ 
#l,d2 

Quellzeiger erhöhen 

Schleife: Ungepackte Bytes 
in Zielgrafik übernehmen 
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dbra 

d0,decr4 


bra 

decr6 

decr5: 

add.l 

#l,a2 

decr6: 

cmp.l 

d3,d2 


blt 

decrl 


rts 


convert 

move.1 

ExecBase,a6 


move.1 

scr,a5 


lea 

192(a5),a5 


move.1 

grafmem2,a4 


clr.l 

d2 ; 

conv2: 

clr.l 

d3 

convl: 

move.1 

a5,al 


move.1 

d3,dl 


asl. 1 

#2,dl 


add.l 
move.1 

dl,al 

(al),al 


move.1 

d2,dl 


mulu 

lsize,dl 


add.l 

dl,al 


move.1 

a4,a0 ; 


clr.l 

dO 


move.w 

lsize,dO ; 


jsr 

CopyMemQuick(a6) 


add.w 

lsize,a4 ; 


addq 

#l,d3 


cmp.b 

splanes,d3 


blt 

convl 


addq 

#l,d2 


cmp.w 

sheight,d2 


blt 

conv2 


move. 1 
rts 

gfxbase,a6 

print: 

movem.l 

dl-d3,-(sp) 


move. 1 

a0,d2 


clr.l 

d3 

prl: 

addq 

#1 ,d3 


tst.b 

(a0) + 


bne 

prl 


subq 

#l,d3 


move.1 

d4,dl 


jsr 

Write(a6) 


movem.l 

rts 

(sp)+,dl-d3 


Quellzeiger erhöhen 

Bytelänge der Zielgrafik erreicht? 

Wenn nein 


Ersten Bitplane-Zeiger aus 
Screen-Struktur nach a5 
Zeiger auf Kopier-Grafik 

d2: Derzeitige Zeile 
d3: Derzeitige Bitplane 

Erster Bitplane-Zeiger 

Bitplane-Nummer 

mal 4 

Äuf Zeiger aufaddieren 

Bitplane-Beginn auslesen 

Zeilen-Nummer 

mal Zeilenbreite 

Auf Zeiger aufaddieren 

Kopierguelle nach aO 

Bytezahl: Zeilenbreite 
; Kopieren 

Grafikzeiger erhöhen 

Planenummer plus 1 
Alle Planes kopiert? 

Wenn nein 

Zeilennummer plus 1 
Alle Zeilen kopiert? 

Wenn nein 


SUB Textausgabe für DOS-Write 
*a0 < Zeiger auf Text (O-terminiert) 
d4 < Handle der Ausgabedatei 
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readbyte: 

move.1 

. d5, 

r dl ; Bytes aus Datei lesen 

move.1 

#buff,d2 ; (Anzahl in d3) 

jsr 

Read(a6) 

rts 

readlong: 

moveq 

#4,d3 ; Ein Langwort aus Datei lesen 

bsr 

readbyte 

rts 

skip: move.] 

d5, 

,dl ; Bytes überspringen 

clr.l 

d3 

; (Anzahl in d2) 

jsr 

Seek(a6) 

rts 

dosname: 

dc.b 

"dos.library",0 

intname: 

even 

dc.b 

"intuition.library",0 

gfxname: 

even 

dc.b 

"graphics.library",0 

dosbase: 

even 

dc.l 

0 

intbase: 

dc.l 

0 

gfxbase: 

dc.l 

0 

buff: 

ds.b 

300 

chunks: 

dc.b 

0 

compr: 

dc.b 

0 

lsize: 

dc.w 

0 

psize: 

dc.w 

0 

grafsize: 

dc.l 

0 

grafsize2: 

dc.l 

0 

grafmem: 

dc.l 

0 

grafmem2: 

de. 1 

0 

screen: 

dc.w 

0,0 

swidth: 

dc.w 

0 

sheight: 

dc.w 

0 


dc.b 

0 

splanes: 

dc.b 

0 


dc.b 

0,1 

sview: 

dc.w 

0 


dc.w 

15 


dc.l 

0,0,0,0 

scr: 

dc.l 

0 

cols: 

ds.b 

64 

txtl: 

dc.b 

"Datei nicht gefunden!",10,0 

txt2: 

dc.b 

"Datei ist kein IFF-Bild!",10,0 

txt3: 

dc.b 

"Wichtige IFF-Chunks fehlen!",10,0 


Programm 7.20: Anzeigen einer IFF-Grafik 
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Wir denken, daß das Programm aufgrund der vorangegangenen 
ausführlichen Besprechung des IFF-Formats und der Kommentare 
im Listing gut verständlich ist. 


7.10 Die Basisstruktur der Graphics-Library 


Ruch die Graphics-Library beinhaltet ein paar interessante 
Einträge in ihrer Basis-Struktur, die wir uns nun ansehen 
wollen. Wie in jeder Library sind sie an den positiven Off¬ 
sets, ausgehend von der Basisadresse zu finden (bei den 
negativen Offsets befindet sich Sprungtabelle für die 
Library-Routinen). 

Neben den, für uns interessanten, Einträgen gibt es 
allerdings auch eine Menge Daten, die nur systemintern von 
Bedeutung sind. Auf sie wollen wir nicht näher eingehen. 


Die GraphicsBase-Struktur 


000 

ds.b 

gb LibNode,34 

034 

dc.l 

*gb RctiView 

038 

dc.l 

*gb copinit 

042 

dc.l 

*gb cia 

046 

dc.l 

*gb blitter 

050 

dc.l 

*gb LOFlist 

054 

dc.l 

*gb SHFlist 

058 

dc.l 

*gb blthd 

062 

dc.l 

*gb blttl 

066 

dc.l 

*gb bsblthd 

070 

dc.l 

*gb bsblttl 

074 

ds.b 

gb vbsrv,22 

096 

ds.b 

gb timsrv,22 

118 

ds.b 

gb bltsrv,22 

140 

ds.b 

gb TextFonts,14 

154 

dc.l 

*gb DefaultFont 

158 

dc.w 

gb Modes 

160 

dc.b 

gb VBlank 

161 

dc.b 

gb Debug 

162 

dc.w 

gb BeamSync 

164 

dc.w 

gb system bplconO 

166 

dc.b 

gb SpriteReserved 

167 

dc.b 

gb bytereserved 

168 

dc.w 

gb Flags 

170 

dc.w 

gb BlitLock 

172 

dc.w 

gb BlitNest 

174 

ds.b 

gb BlitWaitQ,l4 

188 

dc.l 

*gb BlitOwner 

192 

ds.b 

gb TOF_WaitQ,14 

206 

dc.w 

gb DisplayFlags 

208 

dc.l 

*gb SimpleSprites 

212 

dc.w 

gb MaxDisplayRow 

214 

dc.w 

gb MaxDisplayColumn 

216 

dc.w 

gb NormalDisplayRow 


Library-Struktur 

Zeiger auf aktuellen View 

Zeiger auf Copper-Startup-Liste 

intern 

intern 

Zeiger auf LOF-Copperliste 

Zeiger auf SHF-Copperliste 

intern 

intern 

intern 

intern 

Interrupt-Server für Vert. Blank 

Interrupt-Server für Timer 

Interrupt-Server für Blitter 

Listenkopf der Textfont-Liste 

Zeiger auf Standard-Font 

intern 

intern 

intern 

intern 

intern 

intern 

Füllbyte 

Library-interne Flags 

intern 

intern 

Interner Listenkopf 
Zeiger auf Blitter-Besitzertask 
Interner Listenkopf 
Darstellungsmodus 
Zeiger auf SimpleSprites 
Maximalzahl Bildschirmzeilen 
Maximalzahl Bildschirmspalten 
Standardwert Bildschirmzeilen 
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218 

dc.w 

gb NormalDisplayCol 

; Standardwert Bildschirmspalten 

220 

dc.w 

gb NormalDPMX 

; intern 

222 

dc.w 

gb NormalDPMY 

; intern 

224 

dc.l 

*gb LastChanceMemory 

; Zeiger auf "Notfall-Speicher" 

228 

dc.l 

*gb LCMptr 

; intern 

232 

dc.w 

gb MicrosPerLine 

; intern 

234 

ds.b 

gb reserved,8 

; Für zukünftige Erweiterungen 

242 


gb_SIZE0F 



Die Bedeutung einiger Einträge, z.B. Interrupt-Server oder 
Listenköpfe, werden im Exec-Kapitel noch genauer erklärt. 
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Kapitel 8 


In diesem Kapitel soll es um die Aufgaben der Exec-Library 
gehen und die Funktionen, die sie dem Programmierer anbie¬ 
tet. Exec (Amiga's Multitasking Executive) ist der Kern, auf 
dem das Betriebssystem aufgebaut ist. Die Komplexität dieser 
Library ist bedingt durch die hohe Flexibilität der Verwal¬ 
tung, die bei einem Multitasking-System erforderlich ist. Im 
Gegensatz zu anderen Betriebssystemen, die auf Grund ihrer 
statischen Form nur schwer erweitert werden können, sind bei 
Exec fast keine Grenzen gesetzt. 

Alle wichtigen Bereiche werden direkt von Exec beherrscht, 
wie z.B. die Verwaltung der Tasks, Messages, Devices, Re¬ 
sources, Libraries und anderes. Als Programmierer ist man, 
wenn man nicht direkt die Hardware programmieren will, auf 
die Funktionen der Exec-Library angewiesen. Ich erinnere nur 
an die Funktion OpenLibrary, die wir ständig benutzen. Man 
kann sagen, daß Exec für Programmierer den Schlüssel zum 
Amiga darstellt. 

Wie wir schon von den anderen Libraries wissen, braucht man 
die Basisadresse, um auf ihre Funktionen zugreifen zu kön¬ 
nen. Da Exec die wichtigste Library ist und auch, wie schon 
erwähnt, die OpenLibrary-Funktion enthält, muß ihre Basis¬ 
adresse an einer festen Stelle abgelegt werden, damit alle 
Programme auf sie zugreifen können. Diese feste Stelle ist 
die Adresse 4. 


move.l 4,a6 ; Basisadresse von Exec 

Hat man die Adresse der ExecBase ausgelesen, kann man die 
Library wie jede andere benutzen. 


8.1 Listen 

Ein Multitasking-System, welches beim Amiga implementiert 
wurde, setzt natürlich eine dynamische Verwaltung der Daten 
voraus. Um den Anforderungen gerecht zu werden, muß ein ge¬ 
naues Buchhaltungs-System aufgebaut werden. Dies geschieht 
mit sogenannten Listen. 


8.1.1 Die Node-Struktur 

Das Grundelement einer Liste (oder auch Kette) sind die 
Node-Strukturen (Knoten-Strukturen), die die Verbindung zwi¬ 
schen den einzelnen Kettengliedern hersteilen. Fast jede Da¬ 
tenstruktur, die Exec benutzt, beginnt mit einer solchen 
Node-Struktur, damit sie in eine Liste aufgenommen werden 
kann. Die von Exec benutzten Listen sind sogenannte doppelt 
verkettete Listen, da sie, neben dem Typ, der Priorität und 
dem Namen, je einen Zeiger auf den nachfolgenden und den 
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vorangegangenen Knoten enthalten. Dadurch ist es möglich, 
die Liste vorwärts und rückwärts zu durchlaufen. Die Node- 
Struktur hat folgendes Aussehen: 

Die Node-Struktur: 


00 

dc.l 

*ln Succ 

; Zeiger auf Nachfolger 

04 

dc.l 

*ln Pred 

; Zeiger auf Vorgänger 

08 

dc.b 

ln Type 

; Knotentyp 

09 

dc.b 

ln Pri 

; Priorität des Eintrags 

10 

dc.w 

*ln Name 

; Zeiger auf den Namen 


12 ln_SIZE0F 

*ln_Succ 

Der Eintrag ln_Successor (Nachfolger) enthält einen Zeiger 
auf die nächste Knoten-Struktur. Durch diesen und den näch¬ 
sten Zeiger sind die Node-Strukturen miteinander verbunden. 

*ln_Pred 

Da es sich um eine doppelt verkettete Liste handelt, wird 
auch ein Zeiger auf den Vorgänger (Predecessor) benötigt. 

ln_Type 

Der Typ der Daten, die mit diesem Knoten verwaltet werden, 
wird in dem Eintrag ln_Type abgelegt. Dazu steht eine ganze 
Anzahl verschiedener Kennungen zur Auswahl. 

Typ Wert Bedeutung 


nt Unknown 

00 

nt Task 

01 

nt Interrupt 

02 

nt Device 

03 

nt MsgPort 

04 

nt Message 

05 

nt FreeMsg 

06 

nt ReplyMsg 

07 

nt Resource 

08 

nt Library 

09 

nt Memory 

10 

nt Softint 

11 

nt Font 

12 

nt Process 

13 

nt Semaphore 

14 

nt SignalSem 

15 


Unbekannter Knoten 

Programm-Knoten 

Interrupt-Knoten 

Device (Gerätetreiber)-Knoten 

Message-Port-Knoten 

Message-Knoten 

Free-Message-Knoten 

Reply-Message-Knoten 

Resource-Knoten 

Library-Knoten 

Memory-Knoten 

Sof t-1nterrupt-Knoten 

Font-Knoten 

Process-Knoten 

Semaphore-Knoten 

Signal-Semaphore-Knoten 


Die Struktur der Daten, dessen Typ im Knoten angegeben wer¬ 
den muß, lernen wir im Laufe dieses Kapitels kennen. 


lnPri 

Der Eintrag ln_Priority bestimmt die Priorität des Knotens 
und somit die Position in der Liste. Im Normalfall wird der 
Eintrag, der zwischen -128 und +127 liegen kann, mit Null 
initialisiert. Bei speziellen Listen spielt die Priorität 
der Knoten eine zentrale Rolle, wie z.B. bei der Task-Liste. 
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Je höher die Priorität eines Tasks eingestellt worden ist, 
desto mehr Rechenzeit bekommt er vom Prozessor. 

*ln_Name 

Der letzte Eintrag der Node-Struktur enthält einen Zeiger 
auf eine Zeichenkette, die mit einem Null-Byte abgeschlossen 
ist. Sie enthält den Namen des Knotens und dient zur Identi¬ 
fikation der Daten. 


8.1.2 Die List-Struktur 

Mit der Node-Struktur haben wir die Glieder der Kette ken¬ 
nengelernt. Nun fehlt uns nur noch der Anfang bzw. das Ende. 
Hierzu benutzt man die List-Struktur, die aus der Node- 
Struktur entstanden ist. Sie repräsentiert den Anfang als 
auch das Ende einer Liste. Im Unterschied zu der Node-Struk¬ 
tur enthält sie keine Daten und dient lediglich Verwaltungs¬ 
zwecken . 


Die List-Struktur: 


00 

dc.l 

*lh Head 

; Zeiger auf ersten Knoten 

04 

dc.l 

*lh_Tail 

; immer 0 

08 

dc.l 

*lh TailPred 

; Zeiger auf letzten Knoten 

12 

dc.b 

lh Type 

; Typ der Liste 

13 

dc.b 

lh Pad 

; Füllbyte 

14 


lh SIZEOF 



*lh_Head 

Der erste Eintrag der List-Struktur ist ein Zeiger auf das 
erste Glied (den ersten Knoten) der Liste. Wenn die Kette 
leer ist, also keine Nodes enthält, muß hier ein Zeiger auf 
den Eintrag *lh_Tail stehen. Damit ist die Liste als leere 
Liste gekennzeichnet. 

*lh_Tail 

Der Wert für *lh_Tail ist auf Null festgelegt, und 
kennzeichnet den Anfang bzw. das Ende einer Liste. 

*lh_TailPred 

Da es sich um eine doppelt verkettete Liste handelt, muß na¬ 
türlich auch im Listenkopf ein Zeiger auf den Vorgänger ein¬ 
getragen sein. Bei einem Listenkopf ist der Vorgänger der 
letzte Eintrag der Liste. Steht hier ein Zeiger auf 
*lh_Head, so handelt es sich um eine leere Liste. 

lhType 

Der vorletzte Eintrag bestimmt den Typ der Daten, die in 
dieser Liste organisiert werden. Die möglichen Einstellungen 
sind identisch mit denen des ln_Type-Eintrages der Node- 
Struktur. 
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lhPad 

Der Eintrag lh_Pad hat keinen speziellen Sinn. Er dient le¬ 
diglich als Füllbyte, da der PC (Programm Counter) nach dem 
letzten Daten-Byte auf einer ungeraden Adresse steht. 


Das Verständnis des Listenprinzips ist unbedingt notwendig, 
um die nächsten Kapitel zu begreifen. Deshalb sollen die 
folgenden beiden Skizzen die Anwendung verdeutlichen. 


Eine Liste kann beliebig viele Einträge enthalten. Die ein¬ 
zelnen Einträge sind, obwohl sie verstreut im Speicher lie¬ 
gen können, hintereinander wie auf einer Perlenkette aufge¬ 
reiht. Mit Hilfe der Zeiger *ln_Succ und *ln_Pred kann 


*lh_Head —>— 

■> lh_Tail = 0 

*lh_TailPred ->— 
lh_Type 
lh Pad 


*ln_Pred 
lh_Type 
lh_Pri 
*lh Name 


Daten 


*ln_Succ 
*ln_Pred 
lh_Type 
lh_Pri 
*lh Name 


*ln Succ 

—:>— 

<J 

*ln Pred 

—>— 

— 

lh Type 



lh_Pri 



*lh Name 



Daten 






*ln Succ 

>1 <~ 

h 


Daten 


man sich von Eintrag zu Eintrag 
hangeln. Dabei bildet die List- 
Struktur den Anfang und das Ende. 
Ihr erster Eintrag zeigt auf den 
ersten Knoten der Liste. Dessen 
erster Eintrag zeigt auf den 
nächsten Knoten usw. Um das Ende 
der Liste zu kennzeichnen, zeigt 
der *ln_Succ Eintrag der letzten 
Node-Struktur der Liste auf den 
zweiten Eintrag des Listenkopfes 
(lh_Tail=0). Wie *ln_Succ die 
Adresse des Nachfolgers enthält, 
so ist *ln_Pred mit der Adresse 
des Vorgängers belegt. Dabei ent¬ 
hält der erste Ketteneintrag an 
dieser Stelle einen Zeiger auf 
den Listenkopf. Versucht man 
jetzt, den Zeiger auf den nach¬ 
folgenden Eintrag zu bekommen, 
erhält man wiederum einen Null- 
Wert, der das Ende der Kette 
kennzeichnet. 

Wie man erkennt liegt die Flexi¬ 
bilität einer Kette in den ver¬ 
wendeten Zeigern begründet. Erst 
sie erlauben es, ohne großen Auf¬ 
wand einzelne Glieder aus der 
Kette zu entfernen oder einzufü¬ 
gen. Doch genau in diesem Punkt 
ist auch der Nachteil einer Kette 
zu finden. Um einen bestimmten 
Eintrag zu erreichen, muß man sie 
seguenziell durchlaufen, da die 
einzelnen Daten nicht hinterein¬ 
ander im Speicher liegen und ihre 
Position nicht errechnet werden 
kann. 
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Eine leere Kette besteht nur aus der List-Struktur, dessen 


erster 


Eintrag 


c 


*lh_Head 
lh_Tail = 0 
*lh_TailPred 
lh_Type 
lh Pad 


(*lh_Head) auf 
zeigt. 


3 


den zweiten *lh_Tail 
Außerdem enthält 

*lh_TailPred die Adresse von 
*lh_Head, da es keinen Vorgänger 
gibt. Um zu testen ob es sich um 
eine leere Kette handelt, über¬ 
prüft man entweder, ob der Ein¬ 
trag *lh_Head auf einen Null-Wert 
zeigt, oder ob in *lh_TailPred 
die Adresse des Listenkopfes ent¬ 
halten ist. 


8.1.3 Exec-Routinen zur Listenverwaltung 

Um die Verwaltung dieser Listen zu vereinfachen bietet uns 
Exec ein reichhaltiges Angebot an Funktionen, die zur Mani¬ 
pulation von Ketten geeingnet sind, an. 


AddHead = -240 (Exec-Library) 


*List 

a0 

*Node 

al 

Erklärung 



< Zeiger auf die Liste, in die der Knoten 
eingebunden werden soll. 

< Zeiger auf die Node-Struktur, die in die 
Liste aufgenommen werden soll. 

Wie der Name der Funktion schon verrät 
wird die angegebene Node-Struktur am An¬ 
fang der angegebenen List-Struktur ein¬ 
getragen. 


AddTail 


-246 (Exec-Library) 


♦List 

a0 

*Node 

al 

Erklärung 



< Zeiger auf die Liste, in die die Knoten- 
Struktur aufgenommen werden soll. 

< Zeiger auf den Knoten, der in die Liste 
aufgenommen werden soll. 

Mit der Funktion AddTail kann man eine 
Node-Struktur an das Ende einer Liste 
anfügen. Dies geht auch wenn man bei In¬ 
sert als Predecessor den Eintrag 
lh_TailPred des Kopfes der Liste angibt. 


Enqueue 


-270 (Exec-Library) 


♦List 

a0 < 

♦Node 

al < 
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Erklärung Die Funktion Enqueue trägt die angege¬ 

bene Node-Struktur in eine Liste ein. 
Die Position ist dabei abhängig von der 
Priorität, die der Knoten hat. Der erste 
Knoten der Kette besitzt die höchste 
Priorität. 


FindName 




= -276 (Exec-Library) 

♦List 

aO 

< 

Zeiger auf die Liste, in der nach dem 




Knoten mit einem bestimmten Namen ge- 




sucht werden soll. 

♦Name 

al 

< 

Zeiger auf den Namen, der mit einem 




Null 

-Byte enden muß. 

♦Entry 

do 

> 

Nachdem die Funktion aufgerufen worden 




ist, 

erhält man in do einen Zeiger auf 




die 

Node-Struktur mit dem gesuchten Na- 




men 

oder eine Null, wenn kein Eintrag 




mit 

dem angegebenen Namen gefunden wor- 




den 

ist. 

Erklärung 



Die 

Funktion FindName sucht in einer Li- 




ste 

nach einem Knoten mit dem angegebe- 




nen 

Namen. 

Insert 




= -234 (Exec-Library) 


*List aO < Zeiger auf die Liste, in die der Knoten 

eingefügt werden soll. 

*Node al < Zeiger auf den Knoten, der in die Liste 

aufgenommen werden soll. 

♦Predecessor a2 < Wird kein Zeiger auf ein Predecessor 
übergeben (Null), dann wird der Knoten 
direkt nach dem Listenkopf (Header) ein¬ 
gefügt, andernfalls wird er nach dem 
hier angegebenen Knoten eingebunden. Der 
Eintrag in aO (Liste) ist dann nicht 
notwendig. 

Erklärung Der Knoten wird in die angegebene Liste 

bzw. nach dem definierten Knoten 
eingefügt. 
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RemHead 

= -258 (Exec-Library) 

♦List aO 

< Zeiger auf die Liste, aus der die erste 
Node-Struktur entfernt werden soll. 

Erklärung 

RemHead entfernt den ersten Knoten aus 
der angegebenen Liste. 

Remove 

= -252 (Exec-Library) 

♦Node al 

< Zeiger auf eine Node-Struktur, die ent¬ 
fernt werden soll. 

Erklärung 

Durch Remove kann man einen Knoten aus 
einer Liste entfernen. Durch das Prinzip 
der doppelt verketteten Listen muß nur 
ein Zeiger auf den zu entfernenden Kno¬ 
ten angegeben werden. 

RemTail 

= -258 (Exec-Library) 


*List aO < Zeiger auf die Liste, dessen letzter 

Eintrag entfernt werden soll. 

Erklärung Parallel zur Funktion AddTail kann man 

natürlich auch den letzten Knoten einer 
Liste entnehmen. 


Zum Schluß möchte ich nochmal betonen, daß die Listen eine 
grundlegende Struktur von Exec sind. Das Verständnis und der 
problemlose Umgang mit ihnen ist sehr wichtig ! 


8.2 Speicherverwaltung 

Die Speicherverwaltung ist einer der wichtigsten Bestand¬ 
teile eines Multitasking-Betriebssystems. Im Gegensatz zu 
Monotasking-Systemen, die ihren ganzen Speicher einem Pro¬ 
gramm zur Verfügung stellen müssen/können, muß die Verwal¬ 
tung bei Multitasking-Systemen wesentlich flexibler sein. 
Das Problem liegt darin, daß mehrere Programme gleichzeitig 
(bzw. schnell hintereinander) bearbeitet werden und alle 
einen Teil des Speichers benutzen. Wenn ein Task (Programm) 
Speicher braucht, um Daten abzulegen, wendet er sich an 
Exec, welches ihm einen Bereich zuweist, der noch frei ist. 
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Der Arbeitsspeicher den der Amiga zur Verfügung stellt, 
teilt sich in zwei verschiede Bereiche auf. Diese Bereiche 
heißen CHIP- und FAST-RAM. 

CHIP-RAM Jeder Amiga besitzt in seiner Grundausstattung 
einen Bereich CHIP-RAM, der je nach Modell ver¬ 
schieden groß ausfällt. Läßt man den A1000 au¬ 
ßer Acht, kann man von einer Größe von minimal 
512KB ausgehen. Neuere Versionen besitzen bis 
zu 2MB. Das Besondere an diesem Bereich ist, 
daß er nicht nur vom Hauptprozessor (MC68000), 
sondern auch von den Spezialchips, angesprochen 
werden kann. Diese Chips sind für die Grafik- 
und Tonausgabe, sowie für die Diskettenzugriffe 
verantwortlich. Daten für diese Chips müssen in 
diesem Speicher abgelegt werden. 

FAST-RAM Neben dem CHIP-RAM steht uns das FAST-RAM zur 
Verfügung (In der Grundausstattung des A500 ist 
dieser Speicherbereich allerdings nicht 
enthalten). Der Unterschied zum CHIP-RAM 
besteht darin, daß ausschließlich der Prozessor 
auf das FAST-RAM zugreifen kann. Das hat den 
Vorteil, daß dieses RAM schneller ist. Jedoch 
sollten Grafik-, Ton- oder andere Daten, auf 
welche die Customchips zugreifen, nicht in 
diesem Bereich abgelegt werden. 


8.2.1 Speicherverwaltung mit der MemHeader-Struktur 

Diese beiden Bereiche werden von Exec getrennt in zwei soge¬ 
nannten Memory Region Header (MRH) verwaltet. Je nachdem, ob 
das System über FAST-RAM verfügt oder nicht, werden eine 
oder zwei MRH-Strukturen angelegt. Die erste dieser Struktu¬ 
ren steht direkt im Anschluß an die Exec-Base-Struktur. 

Schon jetzt treffen wir wieder auf die Node-Struktur. Sie 
ist, wie bei den meisten anderen Datenstrukturen auch, in 
der MH-Struktur enthalten und dient zur Verwaltung. 

MemHeader-Struktur: 


00 

dc.l 

*mh Succ 


04 

de. 1 

*mh Pred ; 


08 

dc.b 

mh Type ; 

Node-Struktur 

09 

dc.b 

mh Pri ; 


10 

dc.l 

*mh Name ;• 


14 

dc.w 

mh Attributes ; 

Typ des Speichers 

16 

dc.l 

*mh First ; 

Zeiger auf freien Block 

20 

dc.l 

*mh Lower ; 

Zeiger auf den Anfang 

24 

dc.l 

*mh Upper ; 

Zeiger auf das Ende 

28 

dc.l 

mh Free ; 

Größe des Speichers 

32 


mh SIZEOF 
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*mh Succ 

Zeiger auf die nachfolgende MH-Struktur. 

*mh_Pred 

Zeiger auf die vorangegangene MH-Struktur. 
mh_Type 

Typ der Daten, die dieser Knoten verwaltet. Hier muß sinnge¬ 
mäß der Wert von nt_Memory (siehe ln_Type) also 10 eingetra¬ 
gen werden. 

mh_Pri 

Die Priorität wird unterschiedlich zwischen FAST- und CHIP- 
RAM gewählt. FAST hat einen Prioritätswert von 0 und CHIP 
von -10. 

*mh_Name 

Hier wird der Zeiger auf eine Zeichenkette eingetragen, die 
den Namen des Knoten enthält. 

mh_Attributes 

Unter dem Eintrag mh_Attributes versteht man die Angaben, 
die den Speichertyp bestimmen. Hier stehen zwei verschiedene 
Typen zur Auswahl. 

MEMF_CHIP 02 
MEMF FAST 04 


*mh_First 

Der nächste Eintrag ist ein Zeiger auf eine weitere Struk¬ 
tur, die sogenannte Chunk-Struktur. Ihr Aufbau wird im An¬ 
schluß erklärt. 

*mh_Lower, *mh_Upper 

Die Einträge *mh_Lower und *mh_Upper enthalten den Anfang 
sowie das Ende des zu verwaltenden Speichers. 

mh_Free 

Der Eintrag mh_Free enthält die Anzahl der Bytes, die insge¬ 
samt noch frei sind. 


Nun wollen wir die angesprochene Chunk-Struktur untersuchen. 
Sie besteht lediglich aus zwei Einträgen und wird direkt in 
die freien Bereiche des Speichers geschrieben. Auch diese 
Struktur wird in einer Liste organisiert. Es handelt sich 
hierbei jedoch um eine einfach verkettete Liste, d.h. die 
Elemente der Kette sind nur mit einem Zeiger auf den 
nächsten Eintrag ausgestattet. 
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MemChunk-Struktur: 

00 dc.l *mc_Next ; nächste Struktur 

04 dc.l mc_Bytes ; länge des Chunks 

*mc_Next 

Der Zeiger *mc_Next zeigt auf die nächste MemChunk-Struktur, 
die den nächsten freien Bereich verwaltet. Liegt keine wei¬ 
tere Struktur vor, steht hier eine Null. 

mc Bytes 

Die Größe des Bereichs, der von der MemChunk-Struktur ver¬ 
waltet wird, ist in mc_Bytes angegeben. 


Die folgende Skizze soll zeigen, wie Exec den Speicher ver¬ 
waltet. 


mh_Succ 
mh_Pred 
mh_Type 
mh_Pri 
mh Name 


mh_Attributes 
*mh_First 
*mh_Lower 
*mh_Upper 
mh Free 


L > *mc_Next 
mc_Bytes 


leerer Speicher 


belegter Speicher 


MemHeader-Struktur 


(Node-Struktur um die MemHea- 
der-Strukturen in eine Liste 
aufzunehmen) 

Angabe über den Speichertyp. 
Zeiger auf ersten MemChunk. 
Unterste Speichergrenze. 
Oberste Speichergrenze. 
Anzahl der freien Bytes. 


MemChunk-Struktur 
Zeiger auf nächste Struktur. 
Anzahl freier Bytes. 

(freier Speicher) 


(belegter Speicher) 


*mc_Next = 0 
mc_Bytes 


leerer Speicher 


MemChunk-Struktur 
Null => keine weitere Struktur. 
Anzahl freier Bytes. 

(freier Speicher) 


<—i 


Natürlich kann auch vom Programmierer eine MemHeader-Struk¬ 
tur benutzt werden, um einen eigenen Speicherbereich zu ver- 
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walten. Unterstützt wird er dabei von zwei Funktionen die 
von Exec bereitgestellt werden. 


Allocate 



= -186 (Exec-Library) 


*MemHeader 

aO 

< 

Zeiger auf eine MemHeader-Struktur, 
deren verwaltetem Speicher ein Teil 
legt werden soll. 

aus 

be- 

ByteSize 

do 

< 

Größe des zu belegenden Speichers. 


*MemPtr 

dO 

> 

Nach dem Aufruf der Funktion erhält 

man 


einen Zeiger auf den belegten Speicher 
oder eine Null, falls ein Fehler aufge¬ 
treten sein sollte, zurück. 


Erklärung Durch Allocate kann ein Speicherbereich 

mit angegebener Größe im Bereich der an¬ 
gegebenen MemHeader-Struktur belegt wer¬ 
den . 


Deallocate 


-192 (Exec-Library) 


*MemHeader 

aO 

< Zeiger auf die MemHeader-Struktur. 

♦MemPtr 

al 

< Zeiger auf den Speicherbereich, der 
freigegeben werden soll. 

ByteSize 

do 

< Größe des Speichers, der freigegeben 
werden soll. 

Erklärung 


Der durch die Funktion Allocate belegte 
Speicher kann hiermit wieder freigegeben 
werden. 


8.2.2 Speicherbelegung mit AllocMem und FreeMem 

Nachdem wir die Strukturen und die Funktionen kennengelernt 
haben, mit denen Exec den Speicher verwaltet, wenden wir uns 
nun den Möglichkeiten zu, die dem Programmierer angeboten 
werden, um Speicher zu belegen. Sicherlich kann man auch mit 
den Funktionen Allocate und Deallocate arbeiten, wenn man 
die Adresse der MemHeader-Struktur kennt. Jedoch gibt es 
einen bequemeren Weg, mit dem man Speicher einer bestimmten 
Größe vom System anfordern und wieder freigeben kann. Neben 
der Größe des Speichers können Sie zusätzlich den 
Speichertyp definieren. Hierbei stehen fünf Flags zur 
Auswahl. 

MEMF_PUBLIC Durch dieses Flag wird dem System mitgeteilt, 
~ daß die Daten dieses Speicherbereichs nicht 

verschoben werden dürfen. Zur Zeit ist die 
Funktion, daß Exec eigenhändig Daten ver- 
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schiebt, nicht implementiert. Deshalb kann man 
dieses Flag außer Acht lassen. 

MEMF_CHIP Durch MEMF_CHIP wird ein Bereich des CHlP-RAMs 
angefordert. Das ist wichtig, wenn man Grafik¬ 
daten oder andere von den Coprozessoren be¬ 
nutzte Daten laden will. 

MEMFFAST Wenn man Speicher aus dem FAST-RAM-Bereich zu¬ 
gewiesen haben will, muß man dies durch das 
Flag MEMF_FAST angeben. Wird weder MEMF_CHIP 
noch MEMF FAST definiert, hat Exec freie Aus¬ 
wahl. Lediglich die Priorität des Speichers 
gibt an, welcher Bereich benutzt wird. Norma¬ 
lerweise besitzt das FAST-RAM eine Priorität 
von 0 und das CHIP-RAM von -10. So wird 
zunächst das Fast- und dann erst das Chip-RAM 
benutzt. 

MEMF_CLEAR Wenn der Speicherbereich, den man angefordert 
hat, gelöscht (mit Nullen gefüllt) werden soll, 
kann man das mit MEMF CLEAR veranlassen. Anson¬ 
sten kann es sein, daß der Speicher noch mit 
Daten belegt ist (z.B. mit einer MemChunk- 
Struktur, die den freien Bereich verwaltet 
hat) . 

MEMFLARGEST Durch das Flag MEMF_LARGEST wird der Speicher¬ 
bereich aus dem größten, zusammenhängenden Be¬ 
reich genommen. 

Wie bei allen Flags kann man auch die MEM-Flags kombinieren, 
indem man die Werte addiert. 

Name Wert Bedeutung 

MEMF_PUBLIC $00001 Speicher fest (nicht unterstützt) 

MEMF_CHIP $00002 Speicher aus dem CHIP-RAM 

MEMF_FAST $00004 Speicher aus dem FAST-RAM 

MEMFCLEAR $10000 Speicher soll gelöscht werden 

MEMF^LARGEST $20000 Speicher aus längsten Block belegen 

Die Funktion zum Allokieren bzw. zum Deallokieren haben fol¬ 
gende Parameter. 

AllocMem = -198 (Exec-Library) 

byteSize do < Größe des Speicherbereichs, der benötigt 
wird. 

Requirements dl < Art des Speichers, den das System be¬ 
reitstellen soll. 
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*MemPtr do > Zeiger auf den Speicherbereich, der von 

Exec zur Verfügung gestellt wurde oder 
eine Null, falls kein Speicher der ange¬ 
gebenen Art zur Verfügung steht. 

Erklärung Reserviert einen Speicherbereich mit an¬ 

gegebener Größe vom festgelegten Typ. 


FreeMem 


-210 (Exec-Library) 


*MemPtr al < Zeiger auf den Bereich, der wieder frei¬ 

gegeben werde soll. 

byteSize do < Größe des Speicherbereichs, der freige¬ 

geben werden soll. 

Erklärung Gibt den angegebenen Speicherbereich mit 

den übergebenen Länge wieder frei. 


Man kann durch einen kleinen Trick die Anwendung dieser 
Funktionen noch komfortabler gestalten. Dazu muß man zwei 
kleine Routinen schreiben, die das Allokieren und das Deal- 
lokieren übernehmen. 

Der Trick liegt darin, daß man den angeforderten Bereich um 
ein Langwort ergänzt, in welches man dann die Länge des 
gesamten Speicherblocks 
einträgt. Soll der Spei¬ 
cher nachher wieder frei¬ 
gegeben werden, so benö¬ 
tigt man lediglich die 
Adresse des Speichers, 
aus der man die Länge 
auslesen kann. Durch die¬ 
sen Trick erspart man 
sich die Angabe der Länge 
beim Freigeben des Spei¬ 
chers . 


byteSize+4 - Größe des Block 


freier 

Speicher 


Speicherblock der 
dem Programm zur 
Verfügung steht. 


Hier nun die beiden Routinen, die den Speicher belegen und 
freigeben: 


* 

* ObtainMem 

4 

* do < Größe des zu belegenden Bereichs in Byte 

* dl < Typ des Speicherbereichs 

* do > Adresse des belegten Speicherbereichs 

* 


ObtainMem: 

movem.l d6/a6,-(a7) ; PUSH 
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addq. 1 

#4,d0 

Size += 4 


move. 1 

d0,d6 

Größe speichern 


move. 1 

ExecBase,a6 



jsr 

AllocMem(a6) ; 

Bereich belegen 


move. 1 

dO,aO ; 

Fehler aufgetreten? 


beq 

OMError ; 

Ja, dann beenden! 


move. 1 

d6,(a0)+ ; 

Sonst Länge in Speicher ablegen 


move. 1 

aO,dO ; 

Adresse zurückgeben 


OMError: 




movem.l 

(a7)+/d6/a6 ; 

POP 


rts 

* 




* ReleaseMem 




* aO < Zeiger auf Speicherbereich, 

* 

, der freigegeben werden soll 


ReleaseMem: 




movem.l 

a6,-(a7) ; 

PUSH 


lea 

-4(a0),a0 ; 

Adresse der Länge holen 


move.1 

(aO),d0 ; 

Länge auslesen 


move.1 

aO,al ; 

Adresse nach al 


move.1 

ExecBase,a6 



jsr 

FreeMem(a6) ; 

Speicher freigeben 


movem.l 

(a7)+,a6 ; 

POP 


rts 




Bild 8.1: ObtainMem und ReleaseMem 


8.2.3 Speicherreservieren an festen Adressen 


Mit den schon 

beschriebenen 

Methoden kann man zwar relativ 

einfach Speicher von Exec bekommen, jedoch ist 

die 

Definition einer festen 

Speicherbelegungs-Adresse 

nicht 

möglich. Vielleicht denken 

Sie jetzt, daß m einem so 

flexiblen System adressabhängige Speicherbelegung 

nicht 

unterstützt wird, doch auch 

diese Möglichkeit hält uns 

Exec 

offen. 




AllocAbs 

= 

-204 (Exec-Library) 



♦Position 

al 

< 

Zeiger auf die Adresse an der der 
eher belegt werden soll. 

Spei¬ 

byteSize 

do 

< 

Größe des Speichers, der belegt 
soll. 

werden 

♦MemPtr 

do 

> 

Nachdem die Funktion aufgerufen wurde, 
erhält man in do entweder die Adresse, 


die in al übergeben worden ist, oder 
eine Null, wenn der gewünschte Bereich 
nicht zur Verfügung steht. 
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Erklärung Durch AllocAbs kann man einen bestimmten 

Adressbereich belegen. Dies kann jedoch 
nur funktionieren, wenn der Bereich noch 
vollständig unbelegt ist. 


8.2.4 Zusatzfunktionen der Speicherverwaltung 

Besprechen wir nun noch die drei Funktionen, AvailMem, 
TypeOfMem und AddMemList. Die erste gibt die Größe des 
angegebenen Speichertyps zurück und die zweite die Attribute 
des angegebenen Speicherbereichs. AddMemList kann hingegen 
benutzt werden, um einen neuen, bisher nicht konfigurierten 
Speicherbereich der MemList (Speicherverwaltungsliste von 
Exec) hinzuzufügen. Das ist z.B. bei manchen, nicht selbst¬ 
konfigurierenden Speichererweiterungen nötig. 


AvailMem = -216 (Exec-Library) 


Requirements dl 


< Typ des Speichers, dessen Größe ermit¬ 
telt werden soll. 


Size 


dO > Größe des freien Speichers. 


Erklärung 


Größe des verfügbaren Bereichs des ange¬ 
gebenen Speichertyps ermitteln. 


TypeOfMem 


-534 (Exec-Library) 


Address al < Adresse des Speicherbereichs, dessen At¬ 

tribute ermittelt werden sollen. 

Attributes dO > Speichertyp des angegebenen Bereichs, 

der aus der MemHeader-Struktur ausgele¬ 
sen wurde. 


Erklärung 


Durch TypeOfMem wird der Speichertyp des 
angegebenen Bereichs ermittelt. 


AddMemList 


-618 (Exec-Library) 


Base 

aO 

< 

Enthält die Basisadresse des neuen 
Speicherbereichs. 

♦Name 

al 

< 

Zeiger auf eine mit einem Null-Byte ab¬ 
geschlossene Namensbezeichnung des neuen 
Speicherbereiches. 

Size 

dO 

< 

Größe des Speicherbereichs in Byte 

Attributes 

dl 

< 

Attribute des Speicherbereichs 

Pri 

d2 

< 

Priorität des Speicherbereichs 
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Error do > Nach dem Aufruf kann hier eine Fehler¬ 

nummer oder eine Null als Kennzeichen 
für fehlerloses Ausführen stehen. 

Erklärung Fügt der Speicherverwaltungsliste von 

Exec (MemList) einen neuen Speicherbe¬ 
reich mit den angegebenen Attributen 
hinzu. 


8.2.5 Speicherverwaltung mit AllocEntry 

Noch eine weitere Möglichkeit, Speicher von Exec anzufor¬ 
dern, bietet die AllocEntry-Funktion. Dabei liegt der Vor¬ 
teil darin, daß man mehrere Blöcke verschiedenen Typs und 
verschiedener Größen gleichzeitig anfordern kann. Die Be¬ 
stimmung der Länge und des Typs werden in einer Struktur ab¬ 
gelegt. Bei dieser Struktur handelt es genaugenommen um 
zwei, die MemList- und die MemEntry-Struktur. Die erste 
setzt sich wie folgt zusammen: 

MemList-Struktur: 


00 

dc.l 

*ml Succ 


04 

dc.l 

*ml Pred ; 

Node-Struktur für 

08 

dc.b 

ml Type ; 

Organisationszwecke 

09 

dc.b 

ml Pri ; 


10 

dc.l 

*ml_Name 


14 

dc.w 

ml NumEntries ; 

Anzahl der folgenden 
EntryStrukturen bzw. die 
Anzahl der Speicherblöcke 


; Im Anschluß muß die in ml_NumEntries 
; festgelegte Anzahl an MemEntry-Strukturen 
; folgen. 

*ml_Succ, *ml Pred, ml_Type, mlPri, *ml_Name 
Wie - jede Verwaltungs-Struktur von Exec beginnt auch die Mem¬ 
List-Struktur mit einem Knoten. Diese Einträge müssen jedoch 
nicht vom Programmierer gesetzt werden. 

ml_NumEntries 

Der Wert ml_NumEntries enthält die Anzahl der 
Speicherblöcke, die angefordert werden. Für jeden Block muß 
eine MemEntry-Struktur angelegt werden, die unmittelbar nach 
der MemList-Struktur folgen muß. 


Die MemEntry-Struktur, welche die Größe und den Typ des 
Speichers angibt, umfaßt zwei Einträge. 

MemEntry-Struktur: 

00 dc.l meu_Reqs/meu_Addr ; Typ/Anzahl 

04 dc.l me_Length ; Größe 

415 



Kapitel 8 


meu_Reqs/meu_Addr 

Das erste Langwort hat zwei Funktionen (deshalb auch zwei 
Namen). Zunächst wird hier der Typ des Speichers angegeben, 
der belegt werden soll (meu_Requirements). Nachdem die 
Funktion aufgerufen wurde, erhält man die Adresse einer 
neuen Struktur, die allerdings den gleichen Aufbau wie die 
übergebene aufweist. Dieser Eintrag enthält die Adresse des 
belegten Bereichs (meu_Address). 

me_Length 

Der letzte Wert muß die Länge des Blocks enthalten, der 
benötigt wird. 


Folgende Funktionen stehen für die Anwendung der Alloc- 
Entry-Struktur zur Verfügung: 


AllocEntry 


-222 (Exec-Library) 


*MemList aO < Zeiger auf eine MemList-Struktur. 

*List dO > Zeiger auf eine, von AllocEntry neuange¬ 

legte, MemList-Struktur aus der man die 
Adresse des belegten Speicherbereichs 
auslesen kann. 


Erklärung Durch AllocEntry ist es möglich, eine 

beliebige Anzahl von verschiedenen 
Speicherbereichen zu reservieren, die 
durch die angegebene MemList-Struktur 
bestimmt sind. Dabei wird eine identi¬ 
sche Struktur angelegt in der die Adres¬ 
sen der Bereiche abgelegt werden 


FreeEntry 


-228 (Exec-Library) 


*List aO < Zeiger auf die von AllocEntry-Funktion 

angelegte MemList-Struktur. 

Erklärung Durch die Einträge der übergebenen Mem¬ 

List-Struktur wird der belegte Speicher 
wieder freigegeben. 

Bevor wir uns das Demonstrationsprogramm ansehen wollen, 
möchte ich noch erwähnen, wie die AllocEntry-Funktion ab¬ 
läuft. Dazu folgender Auszug aus dem Kickstart-ROM 2.0: 


AllocEntry: ; AllocEntry (222) 

; aO < old Entry 
; dO > new Entry 
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MOVEM.L D2-3/A2-4,-(A7) ; Register retten 

MOVEA.L A0,A2 ; a2 =a0 

; Zunächst wird die Anzahl der MemEntry-Strukturen gelesen und mit acht 
; multipliziert, um auf die Größe der neu anzulegenden Struktur zu 
; kommen. Danach wird die Größe um 16 erhöht, da auch die Knoten- 
; Struktur nachgebildet werden soll. 


MOVEQ 

#0,D3 

d3 löschen 

MOVE.W 

$E(A2),D3 

Anzahl der MemEntry-Strukturen 

MOVE.L 

D3,D0 
#3,DO 

auslesen und nach do kopieren 

LSL.L 

Anzahl * 8 um 

ADDI.L 

#$10,DO 

byteSize += 16 

MOVE.L 

#$10000,Dl 

Requirements 

JSR 

—$C6(A6) 

> AllocMem 

MOVEA.L 

DO, A3 

Adresse nach a3 

MOVEA.L 

DO, A4 

a4 = a3 

TST.L 

DO 

Fehler bei Speicherbelegung, dann 

BEQ.S 

$F81EE2 

Routine beenden 


; Jetzt wird die neue Struktur mit den "alten" Werten initialisiert und 
; der angeforderte Speicher belegt. 


MOVE.W 

D3,$E(A3) 

LEA 

$10(A2),A2 

LEA 

$ 10(A3),A3 

MOVEQ 

#0,D2 

LF81E8A MOVE.L 

0(A2),D1 

MOVE.L 

4(A2),D0 

MOVE.L 

DO,4(A3) 

BEQ.S 

LF81EA0 

JSR 

-$C6(A6) 

TST.L 

DO 

BEQ.S 

$F81EB6 


NumEntries übertragen 
Adresse der neuen MemEntry-Stru. 
Adresse der alten MemEntry-Stru. 
d2 löschen 

Reguirements auslesen 
Length auslesen und in neue 
Struktur übertragen 
Länge = Null, dann weiter 
> AllocMem 

Fehler bei Belegung des Speichers 
aufgetreten? Ja, dann verzweigen. 


; Nun wird die Adresse des Speichers nur in die neue Struktur 
; eingetragen und, falls noch ein Speicherbereich belegt werden soll, 
; die Routine erneut abgearbeitet. 


LF81EA0 MOVE.L 

D0,0(A3) 

ADDQ.L 

#8,A2 

ADDQ.L 

#8,A3 

ADDQ.W 

#1 ,D2 

SUBQ.L 

#1 ,D3 

BNE.S 

LF81E8A 


MOVE. L 

A4, DO 

LF81EB0 MOVEM.L 
RTS 

(A7)+,D2-3/A2-4 


Adresse des Speichers 

a2 und a3 auf nächste MemEntry- 

Struktur zeigen lassen. 

Zähler für die angelegten 
Strukturen erhöhen und Anzahl 
der gewollten erniedrigen. Noch 
nicht alle Struk. belegt, dann 
Routine wiederholen 
Adresse der Struktur übergeben 
; Register restaurieren 
; Programm beenden 


LF81EB6 ; Die Routine, die im Falle eines Fehlers den schon 

; belegten Speicher freigibt, wollen wir uns an dieser 
; Stelle schenken. 
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LF81EE2 BSET #$1F,D0 ; 32. Bit setzen 

BRA SF81EB0 ; Ende! 


Bild 8.2: ROM-Auszug der AllocEntry-Routine 


Wie dieser Auszug aus dem KickStart-ROM zeigt, wird nicht 
die angegebene (alte) Struktur mit neuen Werten 
(meu Address) gefüllt, wie das in einigen Büchern behauptet 
wird7 sondern es wird eine ganz neue Struktur angelegt. Au¬ 
ßerdem erzählt man sich, daß mehrere Strukturen, die durch 
ihre Knoten verbunden sind, mit einem AllocEntry-Aufruf ab¬ 
gearbeitet werden können. Ich bin mir nicht sicher, ob bei 
früheren Versionen der AllocEntry-Funktion diese Möglichkeit 
gegeben war, jedoch ist sie bei der 2.0 Version sicher nicht 
berücksichtigt (Lediglich beim KickMemPtr ist eine Art Ver¬ 
kettung möglich). 

Nun aber das versprochene Demonstrationsprogramm: 


* 

* Kapitel 8 

* Demonstrationsprogramm für die Speicherbelegung durch 

* AllocEntry und FreeEntry 

* 


ExecBase 

AllocEntry 

FreeEntry 


4 

-222 

-228 


Start: 

move.l ExecBase,a6 


Zeiger auf Exec-Base 


lea MemStruktur,aO ; Zeiger auf MemList-Struktur 

jsr AllocEntry(a6) ; Speicher "bestellen" 


; Nach der Funktion AllocEntry bekommt man einen 
; Zeiger auf die neue, von AllocEntry angelegte, 

; Struktur. Dort sind die Adressen der belegten 
; Speicherbereiche zu finden. Ansonsten ist die 
; Struktur identisch mit der übergebenen Struktur 


move 

1 dO,aO 

FreeEntry(a6) 

; Adresse der neuen MemList- 

jsr 

; Struktur übergeben und 

rts 


; Speicher freigeben 

MemStruktur: 

dc.l 

0,0 

/' 


dc.b 

0,0 

! 

Node-Struktur 

dc.l 

0 

t 
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dc.w 

1 

; NumEntries 

dc.l 

0 

; Requirements/Addr 

dc.l 

300 

; Length 

Programm 8. 

. 1: AllocEntry und 

FreeEntry 


8.2.6 Speicherbelegung unter Intuition 

Zum Abschluß der Speicherfunktionen kommen wir nun zu der 
AllocRemember- und FreeRemember-Funktion. Zwar sind dies 
keine Funktionen von Exec, sondern von Intuition, doch sind 
auch sie für die Speicherverwaltung zuständig und passen gut 
an diese Stelle. 

Auch hier wird eine Struktur benutzt, die sogenannte Remem- 
ber-Struktur. Sie setzt sich aus folgenden drei Einträgen 
zusammen: 

Remember-Struktur: 

00 dc.l ‘NextRemember ; Adr d. nächsten Struktur 

04 dc.l RememberSize ; Größe des Blocks 

08 dc.l ‘Memory ; Zeiger auf Block 

*NextRemember 

Adresse der nächsten Remember-Struktur. 

RememberSize 

Größe des belegten Speicherblocks. 

♦Memory 

Adresse des Speichers, den uns Exec zugeteilt hat. 


Für das Anlegen und die Initialisierung dieser Struktur ist 
Exec verantwortlich. Den Programmierer brauchen nur die fol¬ 
genden beiden Funktionen zu interessieren. 


AllocRemember = -396 (Exec-Library) 


RememberKey aO 


Size dO 


< Unter RememberKey versteht man den Zei¬ 
ger auf eine Variable (Long), die die 
Adresse der ersten Remember-Struktur 
aufnehmen kann. Dabei muß beim ersten 
Aufruf der Wert dieser Variablen auf 
Null gesetzt werden. Bei späteren Aufru¬ 
fen gibt man immer wieder die Adresse 
dieser Variablen an, wodurch das System 
die Liste der Remember-Strukturen selb¬ 
ständig ergänzen kann. 

< Größe des Speicherbereichs, der belegt 
werden soll. 
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Flags dl < 

MemBlock do > 

Erklärung 


Flags für den Typ des Speichers, der be¬ 
legt werden soll. 

Nachdem die Funktion ausgeführt worden 
ist, wird die Adresse des Speicherblocks 
zurückgemeldet. 

Durch die Funktion AllocRemember wird 
ein neuer Speicherbereich belegt und in 
die angegebene Remember-Struktur aufge¬ 
nommen . 


FreeRemember = -408 (Exec-Library) 


RememberKey aO 


ReallyForget do 


< Zeiger auf die erste Remember-Struktur 
der Liste, deren Speicher freigegeben 
werden soll. 

< Boolscher Ausdruck, der angibt, ob der 
Speicher freigegeben werden soll oder 
nicht. 


Erklärung Durch den Aufruf der Funktion FreeRemem¬ 

ber wird der gesamte Speicher, der durch 
die Remember-Struktur verwaltet wird, 
freigegeben. 


Um den Komfort deutlich zu machen, der uns durch diese bei¬ 
den Intuition-Funktionen angeboten wird, soll folgendes Pro¬ 
gramm dienen: 


* Kapitel 8 

* Demonstrationsprogramm für AllocRemember und FreeRemember 


ExecBase = 

4 


OpenLib = 

-552 


CloseLib = 

-414 


AllocRemember = 

-396 


FreeRemember = 

-408 


Start: move.l 

ExecBase,a6 

; Intuition-Library öffnen 

lea 

IntName,al 


jsr 

OpenLib(a6) 


move.1 

dO,IntBase 


move.1 

d0,a6 


lea 

RemKey,aO 

; Adresse des RemKey nach aO 

move.1 

#512,dO 

; 512KB belegen 

move.1 

#0,dl 

; keine MEM-Flags 
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jsr 

AllocRemember(a6) 

; Speicher allokieren lassen 

move.1 

dO,MemPtrl ; 

Zeiger auf Speicher ablegen 

lea 

RemKey,aO ; 

Adresse des RemKey nach aO 

move.1 

#312,dO 

jetzt 312KB belegen 

move.1 

#0,dl 

wiederum keine MEM-Flags 

jsr 

AllocRemember(a6) 

; Speicher allokieren lassen 

move.1 

dO,MemPtr2 ; 

Zeiger auf Speicher ablegen 

; ... Programm ... 


moveg 

#-l,dO 


move.1 

RemRey,aO ; 

Zeiger auf RemKey dessen Speicher 

jsr 

FreeRemember(a6) 

; freigegeben werden soll 

move.1 

ExecBase,a6 ; 

Intuition-Library schließen 

move.1 

IntBase,al 


jsr 

CloseLib(a6) 


rts 

t 

Fertig ! 


* Datenbereich 


IntName: 

dc.b 

even 

"intuition.library",0 

IntBase: 
RemKey: 

dc.l 

dc.l 

0 ; Intuition-Base-Ptr 

0 ; Zeiger auf Remember-Struktur 


* 

* 


* Es ist wichtig, daß beim ersten Aufruf der 

* Funktion Alloc-Remember hier eine Null steht! 

* _ 


MemPtrl: dc.l 0 ; Speicher für die Adresse der 

MemPtr2: dc.l 0 ; belegten Bereiche 


Programm 8.2: AllocRemember und FreeRemember 


8.3 Das Multitasking 

Die hervorstechenste Eigenschaft des Amiga-Betriebssystems 
ist die Möglichkeit, mehrere Aufgaben scheinbar gleichzeitig 
abzuarbeiten. So kann man z.B. während im Hintergrund ein 
Raytracing-Programm an einer Grafik rechnet, im Vordergrund 
mit einem Textverarbeitungsprogramm an einem Brief arbeiten, 
ohne den anderen Task anzuhalten. 

In Wirklichkeit werden die Aufgaben nicht gleichzeitig 
bearbeitet, da der Amiga in der Regel nur über einen 
MC68000-Prozessor verfügt. Vielmehr arbeitet die CPU immer 
nur für einen begrenzten Zeitraum an einem Task und setzt 
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dann seine Arbeit an einem anderen fort. Durch die hohe 
Rechengeschwindigkeit sieht es für den Benutzer so aus, als 
ob die Programme gleichzeitig ablaufen würden. Natürlich 
entstehen durch dieses Timesharing-System Einbußen bei der 
Geschwindigkeit der einzelnen Tasks, doch der gebotene 
Komfort läßt dieses Problem schnell vergessen. 

Jedes Programm, das vom Prozessor bearbeitet werden soll, 
besitzt eine sogenannten TaskControl-Struktur. Durch sie er¬ 
hält das System die notwendigen Informationen für das Task- 
Switching (Aufgabenwechseln). Wie alle Daten werden auch die 
Tasks in Listen organisiert. Exec legt zwei verschiedene Li¬ 
sten für die Tasks an, TaskWait und TaskReady. Dabei verwal¬ 
tet TaskReady alle Programme, die auf die CPU warten und je¬ 
derzeit weiterbearbeitet werden können. TaskWait enthält 
hingegen die "schlafenden" Tasks, die auf eine Meldung war¬ 
ten. Sie werden erst wieder in die Ready-Liste aufgenommen, 
wenn eine Nachricht empfangen worden ist. Die Header-Struk¬ 
turen (Listenkopf) dieser Listen stehen im Exec-Datenbe- 
reich. Abgesehen davon gibt es noch den Task (ThisTask), der 
im Augenblick bearbeitet wird. Er gehört zu keiner der 
beiden Listen. 


8.3.1 Die Task-Struktur 

Bevor wir näher auf den eigentlichen Switching-Vorgang ein- 
gehen, sollten wir uns die Task-Struktur ansehen. 

Task-Struktur: 


00 

dc.l 

*tc Succ 


04 

dc.l 

*tc Pred 


08 

dc.b 

tc Type 

Node-Struktur 

09 

dc.b 

tc Pri 


10 

dc.l 

*tc Name 


14 

dc.b 

tc Flags 

Flags für den Task 

15 

dc.b 

tc State 

Zustand des Tasks 

16 

dc.b 

tc IDNestCnt 

Zähler Interrupt-Disable 

17 

dc.b 

tc TDNestCnt 

Zähler Taskswitching-Disab. 

18 

dc.l 

tc_SigAlloc 

Reaktions-Flags 

22 

dc.l 

tc SigWait 

Warte-Flags 

26 

dc.l 

tc SigRecvd 

Ankommende Signale 

30 

dc.l 

tc SigExcept 

Ausnahmesignale 

34 

dc.w 

tc TrapAlloc 

belegte Traps 

36 

dc.w 

tc TrapAble 

freie Traps 

38 

dc.l 

*tc ExceptData 

Daten für Exception 

42 

dc.l 

*tc ExceptCode 

Routine für Exception 

46 

dc.l 

*tc TrapData 

Daten für Traps 

50 

dc.l 

*tc TrapCode 

Routine für Traps 

54 

dc.l 

tc SPReg 

Platz für StackPointer 

58 

dc.l 

tc SPLower 

Untere Stack Grenze 

62 

dc.l 

tc_SPUpper 

Obere Stack Grenze 

66 

dc.l 

tc Switch 

Routine für Abgabe 

70 

dc.l 

tc Launch 

Routine für Übernahme 
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74 ds.b tc_MemEntry,14 ; Task-MemListe 14 Bytes 

88 dc.l *tc_UserData ; Zeiger auf eigene Daten 

92 . tc_SIZEOF 

*tc_Succ, *tc_Pred, tc_Type, *tc_Name 

Wie fast alle Strukturen fängt auch die Task-Struktur mit 
einem Knoten an. Er ermöglicht es, den Task in eine der 
Exec-Listen aufzunehmen. 

tc_Flags 

Das erste Datenbyte der Struktur enthält Flags, deren Bedeu¬ 
tung in der nachstehenden Tabelle aufgeführt sind. 


Taskflag 

Wert 

Bedeutung 

tb ProcTime 

00 

(noch nicht benutzt) 

tb StackChk 

04 

(noch nicht benutzt) 

tb Except 

05 

Task benutzt Exceptions 

tb Switch 

06 

tc Switch-Routine ist installiert 

tb Launch 

07 

tc Launch-Routine ist installiert 

tc State 

Durch tc State 

wird 

der Status des Tasks angezeigt 

sind folgende Werte definiert: 

Name 

Wert 

Bedeutung 

ts Invalid 

00 

Task ungültig 

ts Added 

01 

Task ist gerade erstellt worden 

ts Run 

02 

Task läuft 

ts Ready 

03 

Task fertig für Übernahme der CPU 

ts Wait 

04 

Task wartet auf Signal 

ts Except 

05 

Task behandelt Exception 

ts Removed 

06 

Task wird aus dem System entfernt 


tc_IDNestCnt, tc_TDNestCnt 

Die beiden Einträge Interrupt Disable Nesting Counter und 
Task Disable Nesting Counter enthalten die Anzahl der 
Disable- und Forbid-Aufrufe. Wird der Task in den Wartezu¬ 
stand versetzt, benutzt Exec diese Werte, um die Interrupts 
bzw. den Taskwechsel wieder zuzulassen. Soll der Task später 
fortgesetzt werden, wird der Ausgangszustand anhand dieser 
Zähler wieder hergestellt. 

tc_SigAlloc 

Der Wert tc_SigAlloc enthält einen Langwort-Wert, dessen 32 
Bits die belegten Signale enthält. Dabei werden die ersten 
16 (0-15) von Exec benutzt! 

tc_SigWait 

SignalBit, auf den der Task im Augenblick wartet. Natürlich 
kann man auch mehrere Bits setzen, wodurch die Möglichkeit 
gegeben ist, auf verschiedene Ereignisse zu warten. 
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tc_SigRecvd 

SignalBits, die empfangen wurden. 
tc_SigExcept 

Signalbits, die eine Ausnahmezustand auslösen, wenn sie emp¬ 
fangen werden. 

tcTrapAlloc 

Belegte Prozessor-Ausnahmen (Traps). 
tc_TrapAble 

Freigegebene Prozessor-Ausnahmen (Traps). 

*tc ExceptData, *tc ExceptCode 

Zeiger auf den Datenbereich und die Routine, die bei einer 
Task-Ausnahmebehandlung benötigt werden. 

*tc_TrapData, »tcTrapCode 

Zeiger auf den Datenbereich und die Routine, die bei einer 
Prozessor-Ausnahmebehandlung benötigt werden. 

tc_SPReg 

Wert des Stackpointers bei Unterbrechung. 
tc_SPLower, tc_SPUpper 

Obere und untere Adresse des Task-Stacks. 
tcSwitch 

Routine, die bei Abgabe des Prozessors ausgeführt wird 
(Siehe auch tc_Flags). 

tc_Launch 

Routine, die bei Übernahme des Prozessors ausgeführt wird 
(Siehe auch tc_Flags). 

tc_MemEntry 

Unter dem Namen tc_MemEntry sind die Einträge einer List- 
Struktur zusammengefaßt. Sie wird benutzt, um den vom Task 
belegten Speicher zu verwalten. 

tcUserData 

Der letzte Eintrag kann vom Programmierer beliebig verwendet 
werden, da er nicht von Exec verwendet wird. 


8.3.2 Das Task-Switching 

Nachdem wir uns die Task-Struktur angesehen haben, stellt 
sich die Frage, wie Exec das Umschalten realisiert. 

Stellen wir uns vor, der Prozessor bearbeitet gerade einen 
Task. Nach einiger Zeit (einigen Buszyklen) wird der Ablauf 
durch einen Interrupt (externe Unterbrechung) gestoppt. Die¬ 
ser Interrupt hat eine Priorität von 1 bis 6 und ruft die 
Routine Exitlntr auf. Sie überprüft, ob ein Taskwechsel er¬ 
laubt ist. 
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Danach wird durch die Schedule-Funktion gecheckt, ob ein 
Task in der TaskReady-Liste vorliegt, der die gleiche oder 
eine höhere Priorität als der aktive hat, und ob die zuge¬ 
teilte Zeit des aktiven Tasks abgelaufen ist. 

Wenn eine der Anforderungen erfüllt ist, so werden mittels 
der Switch-Funktion alle wichtigen Informationen wie die Re¬ 
gisterinhalte u.Ä. in die Task-Struktur bzw. auf dem Task- 
Stack abgelegt. Dies geschieht, um das Programm beim näch¬ 
sten Mal an der gleichen Stelle, mit den selben Werten 
weiterzuführen. Danach wird, wenn nötig, die tc_Switch Rou¬ 
tine angesprungen, um die Abmeldung vom Programm aus vorzu¬ 
nehmen. Der Task wird jetzt wieder in eine der beiden Task- 
Listen, die von Exec verwaltet werden, aufgenommen. 

Um den nächsten Task einzustellen, wird die Funktion 
Dispatch benutzt. Sie entnimmt den Task mit der höchsten 
Priorität aus der TaskReady-List und trägt ihn in die 
ExecBase-Struktur (ThisTask) ein. Weiterhin werden die zwi¬ 
schengespeicherten Werte aus der Task-Struktur ausgelesen, 
die Register restauriert und die Arbeit an der unterbro¬ 
chenen Stelle wieder aufgenommen. 

Nachdem der Taskwechsel abgeschlossen worden ist, setzt der 
Prozessor seine Arbeit an der angegebenen Stelle fort, bis 
er wiederum von einem Interrupt unterbrochen wird. 

Hier die benutzten Funktionen: 


Dispatch 

— 

-60 

7 

Exitlntr 

— 

-36 


Reschedule 

= 

-48 


Schedule 

= 

-42 

! 

Switch 

= 

-54 

t 

Wait 

= 

-318 

/ 


Task einsetzen 
Interrupt-Handler 
TSwitch durch Softint 
Prüfen ob TSwicht nötig 
Task abbrechen 
Task in TWait-List 


Die letzte aufgeführte Funktion (Wait) kann vom Task selbst 
aufgerufen werden. Sie erzwingt einen Wechsel und fügt den 
Task in die TaskWait-List ein. Aus dieser Liste wird der 
Task wieder entnommen, wenn die erwarteten Signale empfangen 
worden sind (Näheres in den folgenden Kapiteln). 

Das Prinzip des Umschaltens dürfte nun etwas klarer geworden 
sein. Deshalb wollen wir nicht zu weit in die Tiefen des Sy¬ 
stems Vordringen. Das Wissen reicht vorerst aus, um die 
Funtkionen, die Exec für die Task-Verwaltung bereitstellt, 
zu verstehen. 


8.3.3 Task-Funktionen 

Beginnen wollen wir mit den Funktionen Forbid und Permit. 
Sie verbieten, daß der laufende Task durch einen anderen ab¬ 
gelöst wird. Das kann sehr wichtig sein, wenn das Programm 
auf Daten zugreifen will, welche auch von anderen Tasks be- 
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nutzt werden. Stellt man das Task-Switching nicht ab, so 
kann es sein, daß während der Task Daten einiesen will, er 
durch einen anderen abgelöst wird, welcher neue Daten an der 
gleichen Stelle speichert. Dies kann man durch den Aufruf 
von Forbid leicht verhindern. Um das System wieder von Mono- 
auf Multitasking umzuschalten genügt ein Aufruf der Permit- 
Funktion, und alle anderen Tasks werden wieder berücksich¬ 
tigt. 

Die Forbid-Funktion läßt auch Verschachtelungen zu. So kann 
man das Task-Switching gleich mehrmals sperren. Dabei wird 
lediglich der Zähler TDNestcnt (Task Disabel Nesting Coun¬ 
ter) erhöht. Entsprechend wird durch Permit der Wert ernied¬ 
rigt. Enthält der Zähler den Wert -1, so ist das Task-Swit¬ 
ching wieder zugelassen. 


Forbid 


= -132 (Exec-Library) 

Erklärung 


Forbid wird ohne Parameter aufgerufen 
und verhindert das Wechseln des Tasks 
durch das Erhöhen des Task Disable Ne¬ 
sting Counter in der Task-Struktur. 

Permit 


= -138 (Exec-Library) 

Erklärung 


Wie Forbid benötigt auch Permit keine 
Parameter. Es wird lediglich der Task 
Disable Nesting Counter erniedrigt. Ist 
der Zähler kleiner als Null, so ist das 
Task-Switching wieder erlaubt. 

Neben dem Task-Switching kann man auch die Interrupts ver¬ 
bieten. Das Programm wird dann ohne Störungen durch Inter¬ 
rupts abgearbeitet (dadurch kann auch kein Task-Switching 
mehr vorgenommen werden). Hierzu dient die Funktion Disable. 
Vergleichbar mit Permit können die Interrupts mittels Enable 
wieder zugelassen werden. Dabei dient hier der Eintrag ID- 
Nestcnt (Interrupt-Disable Nesting Counter) als Zähler. 

Disable 


= -120 (Exec-Library) 

Erklärung 


Durch die Funktion Disable werden die 
Interrupts verboten und der Interrupt 
Disable Nesting Counter erhöht. 

Enable 


= -126 (Exec-Library) 

Erklärung 


Mit der Funktion Enable wird der Inter¬ 
rupt Disable Nesting Counter erniedrigt. 


426 






Die Exec-Library 


Sollte der Wert unter Null liegen, wer¬ 
den zusätzlich die Interrupts wieder zu¬ 
gelassen . 


Wird der Task durch die Wait-Funktion abgelöst, werden die 
beiden Werte IDNestCnt und TDNestCnt in die TaskControl- 
Struktur übernommen. 

Die weiteren Funktionen unterstützen den Programmierer da¬ 
bei, eigene Tasks anzulegen oder zu entfernen bzw. angelegte 
Task zu bearbeiten. 


AddTask 


= -282 (Exec-Library) 


*Task 

al 

< Zeiger auf die Task-Struktur, die 
nommen werden soll. 

aufge- 

initialPC 

a2 

< Hier muß die Adresse angegeben 
ab der das Programm bearbeitet 
soll. 

werden, 
werden 

finalPC 

a3 

< Ist der letzte RTS-Befehl ausgeführt 


worden, so wird zu der Routine ver¬ 
zweigt, deren Adresse hier eingetragen 
worden ist. Diese Routine kann die 
"Überbleibsel" des Tasks "aufräumen", 
wie z.B. belegten Speicher freigeben. 
Durch einen übergebenen Null-Wert wird 
zu einer Standard-Routine verzweigt, die 
den belegten Speicher, der in der MemEn- 
try-Liste eingetragen worden ist, frei¬ 
gibt. 

Erklärung Die Funktion AddTask dient dazu, dem Sy¬ 
stem einen neuen Task zu übergeben. 


FindTask 


-294 (Exec-Library) 


♦TaskName 

al 

< Hier kann ein Zeiger auf einen Namen der 
gesuchten Task-Struktur angegeben werden 
oder eine Null, wenn die Adresse des ei¬ 
genen/aktiven Tasks gesucht wird. 

Task 

dO 

> Nachdem die Funktion aufgerufen wurde, 
erhält man in dO einen Zeiger auf die 
gesuchte Task-Struktur oder eine Null, 
wenn der gesuchte Task nicht gefunden 
worden ist. 

Erklärung 


Die Adresse eines durch seinen Namen be¬ 
stimmten Tasks oder des eigenen Tasks 
kann mit der Funktion FindTask in Erfah¬ 
rung gebracht werden. Will man die 
Adresse des eigenen Tasks (bzw. der ei- 
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genen Task-Stuktur) wissen, so kann man 
dazu auch direkt den Wert ThisTask (276) 
im Exec-Datenbereich auslesen. 

RemTask 


= -288 (Exec-Library) 

*Task 

al 

< Zeiger auf die Task-Struktur, die aus 
dem System entfernt werden soll. 

Erklärung 


Um einen Task aus dem System zu löschen 
kann man sich der RemTask-Funktion be¬ 
dienen . 

SetTaskPri 

= -300 (Exec-Library) 

— 

*Task 

newPriority 

al 

dO 

< Adresse der Task-Struktur, deren Priori¬ 
tät geändert werden soll. 

< Neue Priorität des Tasks. Der Wert kann 
zwischen -128 und +127 liegen. 

oldPriority 

do 

> Nachdem die neue Priorität gesetzt wurde 
erhält man den Wert der alten in do. 

Erklärung 


SetTaskPri setzt die Priorität eines an¬ 
gegebenen Tasks neu. 

Um die Anwendung der Funktionen zu demonstrieren, folgt nun 
ein kleines Beispielprogramm. 


* 

* Kapitel 8 

* Demonstrationsprogramm für die Task-Funktionen 

* 


ExecBase 

FreeMem 

AllocMem 

AddTask 

AllocEntry 

FindTask 

AddHead 


Start: move.l 
lea 
jsr 

move.1 
beq 


4 

-210 

-198 

-282 

-222 

-294 

-240 


ExecBase,a6 

MemStruktur,aO 

AllocEntry(a6) 

d0,a0 

Error 


; Stackspeicher belegen 
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move.l 16(a0),dl 

move.l dl,tc_SPLower ; 

add.l #400,dl 

move.l dl,tc_SPUpper 

move.l dl,tc_SPReg 

move.l #tc_MemEntry,aO 

move.l d0,al ; 

jsr AddHead(a6) 

move.l #TaskStruktur,al 

move.l #TaskPrg,a2 ; 

sub.l a3,a3 

jsr AddTask(a6) ; 

; ... Programm ... 


MainLoop: 



lea 

TaskName,al 


jsr 

FindTask(a6) 


tst. 1 

do 


bne 

MainLoop 

Error: 

rts 


TaskPrg 

move.1 

#$40000,do 

TPLoop: 

move.w 

dü,$dff180 


sub.l 

#1 ,d0 


bne 

TPLoop 


rts 



* Datenbereich 

TaskName: dc.b 

"Mein TASK' 

even 

TaskStruktur: 

de. 1 

0,0 

dc.b 

1,0 

de. 1 

TaskName; J 

dc.b 

0 

dc.b 

0 

dc.b 

0 

dc.b 

0 

dc.l 

0 

dc.l 

0 

dc.l 

0 

dc.l 

0 

dc.w 

0 

dc.w 

0 

dc.l 

0 

dc.l 

0 

dc.l 

0 

dc.l 

0 


Stackpointer eintragen 


; Stackspeicher in ME-Struktur 
eintragen 


Zeiger auf Programm 
Task einrichten 


Task suchen 

wurde Task gefunden? 

Ja, dann noch nicht beenden 


Schleifenzähler 
Hintergrundfarbe ändern 


;] Node-Struktur 


tc_Flags 

tcstate 

tc_IDNestCnt 

tc_TDNestCnt 

tc_SigAlloc 

tc_SigWait 

tcSigRecvd 

tc_SigExcept 

tc_TrapAlloc 

tc_TrapAble 

tc_ExceptData 

tcJSxceptCode 

tc_TrapData 

tc_TrapCode 
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tc SPReg: 

dc.l 

0 

tc SPReg 

tc SPLower: 

dc.l 

0 

tc SPLower 

tc SPUpper: 

dc.l 

0 

tc SPUpper 


dc.l 

0 

tc Switch 


dc.l 

0 

tc Launch 

tc MemEntry: 




lh Head: 

dc.l 

lh Tail 

tc MemEntry 

lh Tail: 

dc.l 

0 


lh TailPred: 

dc.l 

lh Head 



dc.b 

0,0 



dc.l 

0 

tc UserData 

MemStruktur: 

dc.l 

0,0 



dc.b 

0,0 

Node-Struktur 


dc.l 

0 



dc.w 

1 

Num Entries 


dc.l 

0 

Requirements/Addr 


dc.l 

400 

Length 


Programm 8.3: Demonstration Task-Funktionen 


Das Programm startet einen zweiten Task, welcher lediglich 
die Hintergrundfarbe verändert. Dieser Task ist autark und 
wird, nachdem er abgearbeitet worden ist, vom System eigen¬ 
händig entfernt. Währenddessen kontrolliert der Haupttask, 
durch die Funktion FindTask, ob der Sub-Task noch existiert. 


8.3.4 Verbindung zwischen den Tasks 

Die Kommunikation zwischen den Tasks ist sehr wichtig. Wenn 
z.B. zwei verschiedene Tasks auf den gleichen Speicher zu¬ 
greifen wollen, so muß dies untereinander abgestimmt werden. 
Außerdem kann durch Signale ein Task auf spezielle Ereig¬ 
nisse hingewiesen werden. Dies geschieht über die Einträge 
tc_SigAlloc, tc_SigWait, tc_SigRecvd und tc_SigExcept. 

Die unteren Bits des Langwortes tc_SigAlloc (0-15) sind für 
das System reserviert. Die anderen 16 können frei gewählt 
werden. Sie sollten jedoch mit dem empfangenden bzw. senden¬ 
den Task abgesprochen werden, da ihre Funktionen frei wähl¬ 
bar ist 

Zur Verdeutlichung der Kommunikation zwischen Tasks soll die 
beiden folgenden Programmablaufbeschreibungen dienen: 
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Task #1 


Task #2 


Vorbereitungen für den Pro- 
grammablauf tätigen 


Vorbereitungen für den Pro¬ 
grammablauf tätigen 


SignalBit belegen 
(AllocSignal) 


Adresse von Task #2 ermitteln 
(FindTask) 


Warten auf Signale 

(Durch die Funktion Wait wird 
der Task in die TaskWait-List 
aufgenommen. Dort kann er nur 
durch die Funktion Signal 
wieder entnommen werden.) 


SignalBit an Task #2 senden 
(Durch die Funktion Signal 
kann ein bestimmtes Signal an 
einen Task gesendet werden. 
Dabei wird das entsprechende 
SignalBit im Eintrag 
tc_SigRecvd gesetzt und der 
Task aus der TaskWait-List in 
die TaskReady-List übernom¬ 
men . ) 


Nachdem das Signal empfangen 
worden ist, wird der Task 
weiter bearbeitet. 


alle Vorbereitungen rückgän¬ 
gig machen 


Wie man erkennen kann, ist ein Task, der sich durch Wait 
"schlafen gelegt hat" nur durch einen anderen Task wiederzu¬ 
beleben. Dabei kann man folgende, von der Exec-Library be¬ 
reitgestellte, Funktionen benutzen. 


AllocSignal = -330 (Exec-Library) 


sigNum 


sigNum 


Erklärung 


dO < Nummer eines Signalbits (0-31), welches 
besetzt werden soll. Um das nächste 
freie Bit zu benutzen, gibt man -1 an. 

dO > Man erhält die Nummer des gesetzten Si¬ 
gnalbits oder, wenn alle 32 Bits belegt 
waren, -1 als Fehlermeldung zurück. 

Durch die Funktion AllocSignal kann man 
die Signalbits des laufenden Tasks set¬ 
zen. (Bezieht sich auf den Eintrag 
tc_SigAlloc) 


FreeSignal 


-336 (Exec-Library) 


sigNum dO < Nummer des Signalbits, welches wieder 

freigegeben werde soll. 

Erklärung FreeSignal gibt das angegebenen Signal¬ 

bit des laufenden Tasks frei. (Bezieht 
sich auf den Eintrag tc_SigAlloc) 
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Setsignal = -306 (Exec-Library) 

newSignals do < Neue Signalbelegung. Die Bits der bishe¬ 

rigen Signalbelegung werden entsprechend 
dieses Werts verändert. 

signalSet dl < Maskenwert für Signale. Nur die Bits, 

die hier gesetzt sind, werden in der Si¬ 
gnalbelegung beachtet. 

oldSignals dO > Vorige Signalbelegung 

Erklärung Ändert die Signalbelegung eines Tasks. 


Signal = -324 (Exec-Library) 

»Task al < Adresse des Tasks, der die angegebenen 

Signale erhalten soll. 

signalSet do < Signalwert, den der angegebene Task emp¬ 

fangen soll. 

Erkärung Durch die Signal-Funktion läuft die ei¬ 

gentliche Kommunikation ab. Die angege¬ 
benen Signalbits werden dem angegebenen 
Task übergeben. Das heißt, sie werden in 
den Eintrag tc_SigRecvd eingetragen. Au¬ 
ßerdem wird der Task, sofern er auf eine 
Nachricht wartet, aus der TaskWait- in 
die TaskReady-List übertragen. 



signalSet do < Maske der Signalbits auf die der Task 
wartet. 


signalSet do > Hat der Task ein (oder mehrere) Signale 
erhalten, wird er wieder bearbeitet und 
die Signalflags werden im Datenregister 
do zurückgeliefert. 

Erkärung Durch die Funktion Wait wird ein Task¬ 

wechsel erzwungen und der Task in die 
TaskWait-Liste von Exec eingetragen. 
Dort wartet er darauf, daß er von einem 
anderen Task eins der angegebenen Si¬ 
gnale erhält. Erst dann wird er wieder 
bearbeitet. Liegt eins der Signalbits 
noch an, so wird die Bearbeitung direkt 
weitergeführt. 
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(Alle besprochenen Funktionen sollten nicht während einer 
Exception aufgerufen werden!) 


* 

* Kapitel 8 

* Demonstrationsprogramm für das Signal-System 

* 


ExecBase = 

AllocSignal = 

Wait = 

Signal = 

Start: move.1 
move.1 

move.1 
jsr 
addg 
beg 


* 

move.1 


jsr 

Error: rts 
TaskPrg: 


move.1 
move.1 


move.1 
jsr 

rts 


4 

-330 

-318 

-324 

ExecBase,a6 ; Adresse der Task-Struktur 

276(a6),MainTask ; auslesen 

#20,do ; Signalbit #20 belegen 

AllocSignal(a6) 

#1,d0 ; dO += 1 (-1+1= 0) 

Error ; dO = 0 => Fehler 

; Jetzt wird der Task eingerichtet 

\|/ 

10987654321098765432109876543210 

#%00000000000100000000000000000000,d0 

; Jetzt warten wir darauf, daß 
; der zweite Task uns das belegte 
; Signalbit sendet. 

Wait(a6) 

; Main-Task beenden 


; Programm des Sub-Tasks 
ExecBase,a6 

MainTask,al ; Adresse der ersten Task-Struktur 
; nach al und Signal abschicken 

10987654321098765432109876543210 

#%00000000000100000000000000000000,d0 

Signal(a6) 


; Dann wird der Task entfernt 


MainTask: dc.l 


0 


Programm 8.4: Demonstration Signal-System 
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Das Demonstrationsprogramm ist lediglich eine abgewandelte 
Form des Task-Demonstrationsprogramms. Der Unterschied be¬ 
steht darin, daß der Main-Task erst abgeschlossen wird wenn 
ein bestimmtes Signal von ihm empfangen worden ist. 


8.3.5 Task-Ausnahmen (Exceptions) 

Eine Task-Ausnahme ist eigentlich nichts anderes als ein 
Signal, welches einer besonderen Behandlung unterzogen wer¬ 
den soll. Sollte das empfangene SignalBit mit dem im Eintrag 
tc_SigExcept abgelegten Wert übereinstimmt, dann wird der 
Task unterbrochen und die Routine, deren Adresse im Eintrag 
tc_ExceptCode erwartet wird, ausgeführt. Die Signale, die zu 
einer Task-Exception führen, können mittels der Funktion Se- 
tException gesetzt werden. 



newSignals dO < Werte der SignalBits. 

signalSet dl < Maskenwert, der angibt welche Signalbits 
von der Funktion verändert werden sol- 


10987654 32109876 54321098 76543210 
%00001001 00001000 00100000 00001000 

Durch diese Maske wird z.B. die Verände¬ 
rung der Signalbits 3, 13, 19, 24 und 27 
erlaubt (es wird von 0 bis 31 gezählt). 
Je nachdem, welchen Wert "newSignals" 
enthält, werden die Bits gesetzt oder 
gelöscht. 

oldSignals dO > In dO erhält man die alten Werte der Si¬ 
gnalbits zurück. 

Erklärung Durch die Funktion SetException kann man 

die Signalbits des tc_SigExcept Eintrags 
des laufenden Tasks ändern. Diese Bits 
geben an, bei welchen Signalen die Rou¬ 
tine tc_ExceptCode ausgeführt werden 
soll. 


Empfängt ein Task ein Signal, welches für eine Task-Ausnahme 
reserviert ist, werden folgende Schritte unternommen: 

Zunächst werden alle wichtigen Register, wie der Programm 
Counter, das Status Register und die Register dO-7 und aO-6 
auf den Stack des Tasks abgelegt. Dann wird die Adresse, die 
im Eintrag tc_ExceptData eingetragen ist, in das Adreßregi¬ 
ster 1 geladen, über dieses Adreßregister kann dann auf den 
Datenbereich zugegriffen werden, der für Task-Exceptions an- 
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gelegt worden ist. In dO erhält man zusätzlich noch die Si¬ 
gnalbits, die den Exceptionzustand ausgelöst haben. 

Wurde die Exceptionroutine abgearbeitet, muß sie mittels ei¬ 
nes RTS-Befehls verlassen werden. Dann werden die ursprüng¬ 
lichen Registerinhalte wieder hergestellt und der Task fort¬ 
gesetzt . 

Sollte während der Bearbeitung der Exception ein weiteres 
Signal eine Task-Ausnahme provozieren, so wird sie erst nach 
der Abarbeitung der ersten berücksichtigt. 


8.3.6 Interne Prozessor-Ausnahmen (Traps) 

Im Unterschied zu den Task-Ausnahmen werden Prozessor- 
Ausnahmen nicht durch das Betriebssystem sondern durch den 
Prozessor selbst geschaffen. So gibt es bei der MC68000- 
Familie einige Möglichkeiten, das laufende Programm zu 
unterbrechen und die Arbeit an einer anderen Stelle 
fortzusetzen, dabei unterscheidet man interne und externe 
Exceptions. 

Als interne Exceptions bezeichnet man Ausnahmezustände, die 
durch einen Befehl (Trap/TrapV/CHK..) oder einen Fehler 
(Zero-Divide/Bus-Error..) auftreten können. 

Externe Exceptions dagegen werden durch einen externen Bau¬ 
stein verursacht, der an die Interruptleitungen des Prozes¬ 
sors eine bestimmte Signalkombination anlegt (auf diesen Typ 
gehen wir an dieser Stelle nicht näher ein. Dies geschieht 
im Abschnitt über die externen Prozessor-Ausnahmen). 

Für jede Ausnahme ist ein Vektor vorgesehen, der die Adresse 
der Behandlungsroutine enthalten sollte. Diese Vektortabelle 
liegt bei dem MC68000 immer an der Adresse $0-$3FF des 
Hauptspeichers (bei höheren Prozessortypen kann die Position 
frei gewählt werden). 

Tritt eine Prozessor-Exception auf, so wird der Prozessor in 
den Supervisor-Modus geschaltet und der aktuelle PC 
(Programmzähler) sowie das Status-Register auf dem 
Supervisor-Stack abgelegt. Dann wird die Behandlungsroutine 
der zugehörigen Ausnahme angesprungen. 

In diesem Kapitel sollen zunächst nur die internen Excepti¬ 
ons besprochen werden. Folgende Prozessor-Ausnahmen gibt es: 

Bus-Error 

Es wurde eine Adresse angesprochen, die keinem Baustein oder 
Speicher zugeordnet ist. 

Address-Error 

Es wurde mit einem Langwort oder Wort-Befehl auf eine unge¬ 
rade Adresse zugegriffen. Achtung: Da beim 68020-Prozessor 
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ungerade Adressierung erlaubt ist, wird bei ihm auch keine 
Exception ausgelöst. 

move.l #20,$40001 ; Langwort wird an ungerade 

; Adresse geladen 


111egal-Instruction 

Dieser Vektor wird angesprungen, wenn ein illegaler Befehl 
ausgeführt wird. Dies kann auch mit Hilfe des ILLEGAL- 
Befehls provoziert werden. 


illegal 


; = %0100101011111100 = $4AFC 

Zero-Divide 

Es wurde eine 

Division 

durch Null vorgenonvmen. 

clr.l 

do 

; do mit Null laden 

divs 

#5,d0 

; und dividieren 


CHK-Instruction 

Die CHK-Instruktion prüft das angegebene Datenregister. Ist 
der Wert negativ oder kleiner als der angegebene, wird eine 
CHK-Exception ausgelöst. Die Prüfung des Datenregisters be¬ 
zieht sich dabei nur auf Wortgröße ! 

move.w #24,d4 ; Datenregister mit 24 laden 

chk #4,d4 ; Prüfen (CHK -> Exception) 

TRAPV-Instruction 

Durch den TRAPV-Befehl wird das V-Flag (Überlauf) getestet 
und eine Exception ausgelöst, wenn das Flag auf 0 stand. 

move.w #$3FFF,dO ; Datenregister do laden 

add.w #$4001,do ; Wert addieren -> Überlauf 

trapv ; prüft das V-Flag und löst 

; eine TRAPV-Exception aus 

Privilege-Violation 

Es wurde im User-Modus ein privilegierter Befehl ausgeführt, 
der nur im Supervisor-Modus erlaubt ist. 

ori #$700,sr ; Privilegierter Befehl 


Trace 

Diese Exception ist durch das Trace-Bit des StatusRegisters 
ausgelöst worden. Ist dieses Bit gesetzt, so wird nach jedem 
Befehl die Trace-Exception ausgeführt (Einzelschritt-Abar¬ 
beitung) . 

Line (%1010) $A-Emulator 

Es wurde ein Befehl ausgeführt, der mit der Kodierung 
%1010 = $A beginnt. Diese Befehlsgruppe hat keine Funktion 
und löst daher eine Exception aus. Die anderen 12 Bits kön¬ 
nen z.B. als Parameterübergabe dienen. 


436 



Die Exec-Library 


dc.w $A405 ; Es reicht auch schon $A000 

Line (%1111) $F-Emulator 

Genau wie beim Line $A-Emulator kann auch durch diese Excep- 
tion ein Befehl emuliert werden. Jedoch werden die $Fxxx-Be- 
fehle beim MC68020-Prozessor für die Programmierung des ma¬ 
thematischen Co-Prozessors benutzt. 

dc.w $F27D ; Es reicht auch schon $F000 

Trap-Vektor #00-15 

Die Exception-Vektoren $80-$BC werden durch den Trap-Befehl 
des MC6B000 ausgelöst. Bei einigen Betriebssytemen dienen 
die Trap-Befehle zum Verzweigen in Systemroutinen. 

Trap #3 ; Ruft den Trap 3 auf 


Hier die Tabelle der Traps mit ihren Adressen: 


Prozessor-Traps: 


Vektor Adresse 


002 

$008 

003 

$00C 

004 

$010 

005 

$014 

006 

$018 

007 

$01C 

008 

$020 

009 

$024 

010 

$028 

011 

$02C 

032 

$080 

033 

$084 

034 

$088 

035 

$08C 

036 

$090 

037 

$094 

038 

$098 

039 

$09C 

040 

$0A0 

041 

$ 0A4 

042 

$0A8 

043 

$0AC 

044 

$0B0 

045 

$0B4 

046 

$0B8 

047 

$0BC 


Bedeutung 


Bus-Error 

Address-Error 

Illegal-Instruction 

Zero-Divide 

CHK-Instruction 

TRAPV-Instruction 

Privilege-Violation 

Trace 

Line %1010 ($A) Emulator 
Line %llll ($F) Emulator 
Trap-Vektor #00 
Trap-Vektor #01 
Trap-Vektor #02 
Trap-Vektor #03 
Trap-Vektor #04 
Trap-Vektor #05 
Trap-Vektor #06 
Trap-Vektor #07 
Trap-Vektor #08 
Trap-Vektor #09 
Trap-Vektor #10 
Trap-Vektor #11 
Trap-Vektor #12 
Trap-Vektor #13 
Trap-Vektor #14 
Trap-Vektor #15 
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Tritt nun eine solche interne Skizze des Stacks nach 
Task Exception auf, wird der Pro- einer Ausnahme 

zessor in den Supervisor-Modus 
gesetzt und der Programmzähler 
(Langwort/zeigt auf nächsten Be¬ 
fehl) sowie das Status-Register 
(Wort) auf den Supervisor-Stack 
gerettet. Dann wird die Behand¬ 
lungsroutine des zugehörigen Vek¬ 
tors ausgeführt. Normalerweise 
steht hier die 
Behandlungsroutine von Exec. Sie legt die Trap-Nummer 
(Langwort) auf den Stack ab, dann wird die Trap-Behandlungs¬ 
routine des Programms (tc_TrapCode) angesprungen. 

Ist die eigene Behandlungsroutine abgearbeitet, muß sie über 
den RTE-Befehl (Return from Exception) verlassen werden. Da¬ 
bei sollte man beachten, daß zuerst die Trap-Nummer vom Su¬ 
pervisorstack genommen werden muß ! 

Es sei noch erwähnt, daß es möglich ist, die anderen beiden 
Werte, die auf dem SSP abgelegt worden sind, zu verändern. 
Dabei profitiert man davon, daß die Werte, die auf dem SSP 
liegen, nach der Trap-Routine wieder geladen werden. So kann 
man z.B. das Trace-Bit im Statusregister setzen, um ein Pro¬ 
gramm im Einzelschrittmodus zu durchlaufen! 


Trap-Nummer 


Status-Register 

Programmzähler 


0 

+ 2 

+4 
+ 6 
+ 8 


* Kapitel 8 

* Demonstrationsprogramm für den Gebrauch des tc_TrapCode- 

* Eintrags in der Task-Struktur. 

* 


ExecBase 

4 


Start: 

move.1 
move.1 

ExecBase,a6 
276(a6),a0 

; Adresse der ExecBase lesen 
; ThisTask-Eintrag auslesen 


move.1 
move.1 

#0,46(aO) 
#PException, 

; Keine Daten (tc TrapData=0) 

, 50(aO) ; Zeiger auf Routine 

; (tc_TrapCode = iPException) 


trap 

#1 

; Trap aufrufen 


rts 


; Programmende 

PException: 

move.1 

d0,-(a7) 

; Trap-Routine 
; dO sichern 

Loop: 

move.1 
move.w 
sub.l 

#$7000,dO 
d0,$dff180 
#l,d0 

; Schleifenwert nach dO 
; dO in ColorOO schreiben 
; dO verringern 
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bne Loop 


add.l #8,a7 


rte 


; nicht Null, dann verzweigen 
; zu Loop 

; Bevor man das Programm 
; fortsetzt muß der Stack 
; bearbeitet werden. 

; TrapNummer und der Wert des 
; Datenregisters 0 müssen 
; ausgeglichen werden. 

; (Return from Exception) 


Programm 8.5: Gebrauch des tc_TrapCode-Eintrags 


Wie man sieht, benötigt man keine Exec-Funktion, um die 
Task-Exceptions zu benutzen. Dennoch gibt es auch hierfür 
zwei Routinen, die speziell für Traps bereitgestellt werden. 
Sie dienen dazu, den Eintrag tc_TrapAlloc/Free zu verändern, 
der jedoch nicht unbedingt berücksichtigt werden muß. Voll¬ 
ständigkeitshalber sollen auch diese beiden Funktionen hier 
aufgeführt werden: 


AllocTrap = -342 (Exec-Library) 


trapNum 

dO 

< Nummer des zu belegenden Trap-Befehls 
(0-15) oder -1, wenn der nächste freie 
Trap-Befehl belegt werden soll. 

trapNum 

dO 

> Zurückgegeben wird die Nummer des Trap- 
Befehls (0-15), die belegt worden ist. 

Erklärung 


Durch AllocTrap wird in der Task-Stuktur 
vermerkt, welche Trap-Befehle belegt 
sind. Diese Maske hat keine Auswirkung 
auf den Aufruf der Trap-Routine und 
dient nur zur Verwaltung der Traps. 


FreeTrap 


-348 (Exec-Library) 


trapNum dO < Nummer des Trap-Befehls (0-15), der 

freigegeben werden soll. 

Erklärung Der angegebene Trap-Befehl wird wieder 

freigegeben. 


Will man die Exec-Routine, welche die Verwaltung der Traps 
übernimmt, umgehen, so kann man die Adresse der Trap-Routine 
direkt an die entsprechende Speicherstelle des Trap-Vektors 
schreiben. Dies hat jedoch zur Folge, daß auch interne 
Exceptions, die von einem anderen Programm ausgelöst wurden, 
diese Routine anspringen. 
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8.4 Das Message-System 

Durch die Signal-Funktionen ist zwar ein gewisses Maß an 
Kommunikation möglich, doch der Austausch komplexer Daten 
kann dabei nicht stattfinden. Zur Erweiterung dient das 
Message-System. 

Das Message-System besteht aus zwei Strukturen: dem Message- 
Port, einer Art Briefkasten, und der Message selbst, welche 
den Brief darstellt. 

In der Intuition-Library haben wir dieses Nachrichtensystem 
schon einmal kurz kennengelernt, als wir auf eine IntuiMes- 
sage (das ist eine Art der Message-Struktur) gewartet haben. 
Aus dieser Struktur konnten wir dann die Ereignisse ausle- 
sen, die Intuition für uns vom Benutzer erhalten hat. Dabei 
hat Intuition diese Nachricht an den "Briefkasten" (MsgPort) 
unseres Fensters geschickt, welcher beim öffnen generiert 
worden ist. 


8.4.1 Die Message-Ports 

Da wir uns jetzt einen eigenen MessagePort erstellen wollen, 
sollten wir uns zuerst die MessagePort-Struktur ansehen. 


Msgport-Struktur: 


00 

dc.l 

*mp Succ 

04 

dc.l 

*mp Pred 

08 

dc.b 

mp Type 

09 

dc.b 

mp Pri 

10 

dc.l 

*mp Name 

14 

dc.b 

mp Flags 

15 

dc.b 

mp SigBit 

16 

dc.l 

*mp SigTask 

20 

ds.l 

mp MsgList 

24 


mp SIZEOF 


; Node-Struktur 


; Reaktionsflags 
; Signalbits 

; Zeiger auf Task o. Int-Str. 
; MsgList-Header =14 Bytes 


*mp_Succ, *mp_Pred, mp_Type, mp_Pri, *mp_Name 
Um die MessagePort-Strukturen in Listen verwalten zu können, 
beginnen sie mit einer Node-Struktur. Der Typ des Nodes muß 
als nt_MsgPort (4) angegeben werden. Der Port kann, muß aber 
nicht, in die Public-Port Liste von Exec aufgenommen werden. 


mp_Flags 

Mit dem Eintrag mp_Flags wird die Reaktion bestimmt, die die 
ankommende Nachricht auslösen soll. Hier sind folgende Flags 
vorbestimmt: 


Name Wert Bedeutung 

pa_Signal 00 Task durch Signale benachrichtigen 
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pa Softint 

01 

pa Ignore 

02 

pf Action 

03 


Software-Interrupt auslösen 
keine Reaktion 

Routine (mp_SigTask) ausführen 


paSignal 


paSoftlnt 


palgnore 


pfAction 


Wenn eine Nachricht empfangen worden ist, werden 
die Signalbits aus dem Eintrag mp_SigBits mit¬ 
tels der Funktion Signal an den Task 
(mp_SigTask) gesendet. Diese Flags werden dann 
in den Eintrag tc_SigRecvd der Task-Struktur 
eingetragen. 

Ist das Flag pa Softlnt gesetzt, so wird ein 
Software-Interrupt mittels der Funktion Cause 
ausgelöst. Dabei wird der Zeiger auf die Inter¬ 
rupt-Struktur, die die Cause-Funktion benötigt, 
im Eintrag mp_SigTask erwartet. 

Wenn keine Reaktion ausgelöst werden soll, so 
muß das Flag pa_Ignore gesetzt werden. Dann wird 
dem Task nicht mitgeteilt, daß eine Nachricht 
vorliegt. 

Der Eintrag mp_SigTask wird als Zeiger auf eine 
Routine interpretiert, die beim Empfang einer 
Nachricht ausgeführt wird. 


mpSigBit 

In diesem Wert steht die Nummer des Signalbits, welche dem 
Task bei einer empfangenen Nachricht gesendet werden soll. 


*mp SigTask 

Wie schon bei den mp_Flags angedeutet, kann der Eintrag 
*mp_SigTask drei verschiedene Bedeutungen haben. Dies ist 
abhängig von den gesetzten Flags. 

pa_Signal 

Bei der Flag-Kombination für pa_Signal wird das im Eintrag 
mp_SigBit abgelegte SignalBit an den Task gesendet, dessen 
Adresse (es handelt sich hierbei um die Adresse der Task- 
Struktur) hier abgelegt wurde. 

pa Softint 

Sollten die Flags für pa_SoftInt gesetzt worden sein, so 
wird ein Software-Interrupt ausgelöst. Der dabei benötigte 
Zeiger auf die Softlnt-Struktur wird hier, im *mp_SigTask- 
Eintrag, abgelegt. 


paAction 

Bei der letzten Möglichkeit muß der Eintrag *mp_SigTask die 
Adresse einer Routine enthalten, die bei einer empfangenen 
Meldung ausgeführt werden soll. 


mpJMsgList 

Die ankommenden Nachrichten werden in einer Liste aufge¬ 
reiht. Der Listenkopf ist an dieser Stelle in die MsgPort- 
Struktur eingebettet. 
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Erstellen und Entfernen von MsgPorts 

Um nun einen solchen MessagePort für einen Task einzurich¬ 
ten, ist es günstig, sich eine kleine Routine zu basteln, 
die diese Arbeit erledigt. Auch die Runtime-Libraries vieler 
C-Compiler stellen dem Programmierer eine solche Funktion 
zur Verfügung. In Anlehnung an diese Funktionen haben wir 
die beiden Routinen zum Erstellen und Auflösen eines Ports 
Create- und DeletePort genannt. Wir benötigen dabei zwei 
weitere Exec-Funktionen, AddPort und RemPort. Diese beiden 
Funktionen sind dazu da, eine Port-Struktur in die 
PublicPort-Liste von Exec einzuhängen bzw. zu entfernen. 


AddPort 


-354 (Exec-Library) 


♦Port al < Zeiger auf den Port, der in die Publi- 

Port-Liste von Exec eingefügt werden 
soll. 

Erklärung Fügt einen Port in die von Exec verwal¬ 

tete PublicPort-Liste ein, die von allen 
Tasks benutzt werden kann. 


RemPort 


-360 (Exec-Library) 


♦Port al < Zeiger auf Port, der aus der PublicPort- 

Liste ausgeschlossen werden soll. 

Erklärung RemPort dient dazu einen Port aus der 

öffentlichen Port-Liste zu entnehmen. 


Man könnte natürlich auch einen Port erstellen, ohne ihn in 
die PublicPort-Liste von Exec einzutragen. Doch kann dann 
der sendende Task nicht mittels der FindPort-Funktion die 
Adresse unseres Message-Ports erfahren (näheres zu FindPort 
gleich)! 

Jetzt aber wollen wir die beiden Funktionen zum Erstellen 
und Auflösen eines Message-Ports erläutern. Zunächst den 
Aufruf der beiden Funktionen: 


move.1 

#MsgPort Name,aO 

; Zeiger auf Port-Namen 

move.1 

#0,d0 

Priorität = Null 

bsr 

CreatePort ; 

Port erstellen 

tst.l 

dO 

konnte Port angelegt werden? 

beq 

Ende ; 

nein, dann Ende 

move. 1 

dO,MsgPort ; 

Adresse speichern 
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move.l MsgPort,aO ; Zeiger auf Port nach 

jsr DeletePort ; aO und löschen 


Nun folgen die Routinen Create- und DeletePort, die selb¬ 
ständig einen Message-Port einrichten und wieder entfernen 
können. Lediglich der Name des Ports sowie seine Priorität 
werden benötigt. 


* Kapitel 8 



* Create- und 

* 

DeletePort-F\ 

; Offsets für 

die 

Funktion« 

ExecBase 

- 

4 

AddPort 

= 

-354 

RemPort 

- 

-360 

AllocSignal 

= 

-330 

FreeSignal 

= 

-336 

FindPort 

= 

-390 

AllocMem 

- 

-198 

FreeMem 

= 

-210 


* 

* CreatePort 

* 

* aO < Zeiger auf Port-Namen 

* dO < Priorität des Ports 

* 

* dO > Zeiger auf erstellte Port-Struktur 

* 


CreatePort: 


movem.1 

dl-d3/al-a3/a6, 

-(a?) ; Register retten 

move.1 

ExecBase,a6 


move.1 

d0,d3 


move.1 

a0,a2 

; Parameter sichern 

move.1 

a0,al 


jsr 

FindPort(a6) 

; Kontrollieren, ob es einen 

tst. 1 

dO 

; Port mit dem angegegebenen Namen 

bne 

CPError 

; schon gibt 

move.1 

134,dO 


move.1 

#$10000,dl 


jsr 

AllocMem(a6) 

; Speicher für MsgPort-Struktur 

move.1 

d0,a3 

; belegen 

beq 

CPError 


move.1 

#-l,dO 
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CPOK: 

CPError: 


jsr 

AllocSignal(a6) 

; Signal belegen 

tst.b 

do 


bmi 

DPFreeMem 

MsgPort-Struktur einrichten 

move.b 

#4,8(a3) 

mp Type 

move.b 

d3,9(a3) 

mp Pri 

move.b 

#0,14(a3) 


move.b 

d0,15(a3) 

mp Sig 

move.1 

a2,10(a3) 

mp Name 

move.1 

276(a6),16(a3) 

mp SigTask 

move.1 

33,31 

Wenn ein Namen angegeben wurde, 

tst.l 

10(al) 

wird der Port in die PublicPort- 

beq 

CPBranch 

Liste aufgenommen 

jsr 

AddPort(a6) 


bra 

CPOK 


i: 

lea 

20(a3),al 

Sollte der Port nicht in die PP- 

move.1 

al,(al) 

Liste aufgenommen werden, muß mar 

addq.1 

#4,(al) 

den Listenkopf der Nachrichten 

clr.l 

4(al) 

(MsgList) von "Hand" einrichten 

move.1 

al,8(al) 

!!! Sonst hätte das AddPort für 
uns erledigt ! 

move.1 

a3,d0 

Zeiger auf Port "bergeben 


movem.l (a7)+,dl-d3/al-a3/a6 
rts 


Pop 


* 

* DeletePort 

* 

* aO < Zeiger auf Port-Struktur, die aufgelöst werden soll 

* 


DeletePort: 


movem.l 

dl-d3/al-a3/a6, 

-(37) 

move.1 

ExecBase,a6 


move.1 

a0,a3 

; Parameter retten 

move.1 

a3,al 

; Hat der Port einen Namen, so ist 

tst.l 

10(al) 

; er in die PP-Liste eingetragen 

beq 

DPBranch 

; worden. Jetzt müssen wir ihn 

jsr 

RemPort(a6) 

; wieder entfernen. 

DPBranch: 

move.b 

15(a3),d0 

; Signal freigeben 

ext.w 

dO 


ext.l 

do 


jsr 

FreeSignal(a6) 


DPFreeMem: 

move.1 

134,dO 


move.1 

a3,al 


jsr 

FreeMem(a6) 

; Speicher freigeben 
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movem.l (a7)+,dl-d3/al~a3/a6 

moveq #0,d0 ; Null übergeben 

rts 


Programm 8.6: CreatePort und DeletePort 


8.4.2 Die Messages 

Nachdem wir die beiden Routinen zum Einrichten und zum Lö¬ 
schen eines MessagePorts kennengelernt haben, wollen wir uns 
jetzt um die "Post" kümmern, die wir hoffentlich in unserem 
"Briefkasten" finden werden. Hierzu müssen wir uns die 
Message-Struktur ansehen. 

Message-Struktur: 


00 

dc.l 

*mn Succ 


04 

dc.l 

*mn Pred ; 


08 

dc.b 

mn Type ; 

Node-Struktur 

09 

dc.b 

mn Pri ; 


10 

dc.l 

*mn Name 


14 

dc.l 

*mn ReplyPort ; 

Zeiger auf Antwort-Port 

18 

dc.w 

mn Length ; 

Länge der folgenden Daten 

20 


mn SIZEOF 



*mn Succ, *mn_Pred, mn_Type, mn_Pri, *mn_Name 
Zunächst besteht die Message-Struktur aus einer Node-Struk- 
tur, die benutzt wird, um alle ankommenden Nachrichten zu 
verwalten. Das Abarbeiten der Meldungen geschieht dann nach 
dem sogenannnten first-in-first-out-Prinzip. Das heißt: Die 
Message, die zuerst gesendet wurde, wird auch zuerst behan¬ 
delt. 

*mn_ReplyPort 

Nach der Knoten-Struktur folgt ein Zeiger, der auf einen Re- 
plyPort verweist. Dieser Port muß/kann eine Bestätigung des 
Empfangs erhalten. 

mnLength 

Die nachfolgenden Daten können je nach Art der Nachricht un¬ 
terschiedlich ausfallen. Es muß lediglich an dieser Stelle 
die Länge der Daten und die Länge der Struktur mitgeteilt 
werden. 


Abschicken und Empfangen von Messages 

Jetzt, nachdem wir die Message-Struktur kennengelernt haben, 
können wir Nachrichten verschicken. Dazu benötigt man einen 
Brief in Form einer Message-Struktur und die Adresse des 
Empfängers, sprich die Adresse des MsgPorts, dem man eine 
Nachricht senden will. Um die Adresse eines Message-Ports zu 
bekommen, können wir mittels der FindPort-Funktion die Pu- 
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blicPort-Liste von Exec nach einem Namen durchsuchen lassen. 
Deshalb sollte man, wie schon erwähnt, seinen Port stets in 
die PublicPort-Liste eintragen (AddPort). Außerdem sollte 
man darauf achten, daß man nicht zwei Ports mit dem gleichen 
Namen anlegt! Aber um diese Kleinigkeiten müssen wir uns, 
dank der CreatePort und DeletePort Funktionen, keine Gedan¬ 
ken mehr machen. 

Wie gesagt, benötigen wir die Funktion FindPort, um die 
Adresse eines in der PublicPort-Liste eingetragenen Ports zu 
ermitteln. 


FindPort 


-390 (Exec-Library) 


*Name 

al 

< Zeiger auf eine, mit Null 
Zeichenkette. 

abgeschlossene 

Port 

do 

< Adresse der gesuchten 

oder, wenn die Struktur 
werden konnte, eine Null. 

Port-Struktur 
nicht gefunden 

Erklärung 


Mit der Funktion FindPort kann man in 
der PublicPort-Liste von Exec nach ei- 


ner, durch den Namen bestimmten, Port- 
Struktur suchen lassen. Man erhält ent¬ 
weder die gesuchte Adresse oder eine 
Null, wenn kein Port dieses Namens ge¬ 
funden werden konnte. 


Nebenbei sei noch bemerkt, daß die FindPort-Funktion ledig¬ 
lich den Zeiger auf den Listenkopf der PublicPort-Liste ins 
Adreßregister 0 legt und dann die Funktion FindName aufruft 
(die Listenköpfe der PublicPort-Liste und aller anderen Sy¬ 
stemlisten befinden sich im Datenbereich der Exec-Library). 

Haben wir die Adresse des Message-Ports gefunden, können wir 
nun die Meldung senden. Hierzu dient die Funktion PutMsg. 


PutMsg = -366 (Exec-Library) 


♦Port 

a0 

♦Message 

al 

Erklärung 



< Zeiger auf den Port, dem eine Nachricht 
gesendet werden soll. 

< Zeiger auf die Message-Struktur, die an 
den Port gesendet werden soll. 

PutMsg erlaubt es, Meldungen an einen 
Message-Port zu verschicken. Dabei wird 
die Message-Struktur an die Liste der 
Nachrichten des Message-Ports gehängt. 
Die weitere Arbeit der PutMsg-Funktion 
ist von der, im Eintrag mp.Flags ge¬ 
setzten Bit-Kombination abhängig. 
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Um die Verbindung mit dem Signal-System deutlich zu machen 
folgt nun ein Auszug aus der PutMsg-Funktion des Kick-Start- 
ROM V2.0. 


; Exec-Library (-366) 

; aO < 

Zeiger auf Port 

; al < 

Zeiger auf Message 

MOVEQ 

#5, DO 

MOVE.L 

AO ,D1 

LEA 

$14(AO),A0 

MOVE.W 

#$4000,$DFF09A 

ADDQ.B 

#1,$126(A6) 

MOVE.B 

DO,8(Al) 

ADDQ.L 

#4,A0 

MOVE.L 

4(A0),D0 

MOVE.L 

Al,4(AO) 

MOVE.L 

AO,(Al) 

MOVE.L 

DO,4(Al) 

MOVEA.L DO,AO 

MOVE.L 

Al,(AO) 


PutMsg: 


Typ = nt_Message = 5 
Zeiger auf Port nach dl 
Adresse der MsgList-Header 

Interrupts sperren 
IDNestCnt++ (Disable) 

Typ eintragen 
aO += 4 

Zeiger auf Endknoten 
neue Message einbinden 
Adresse von lh_Tail in den 
lh_Succ-Eintrag der Message- 
Struktur einsetzen 
alter Endknoten nach lh_Pred 
Endknotenadressse nach aO 
lhSucc-Eintrag des alten 
Endknoten auf neue Nachricht 
setzen 


; Nachdem die Nachricht in die MsgList des MsgPorts 
; eingefügt worden ist, wird nun auf die Behandlung der 
; Nachricht eingegangen! 


MOVEA.L 

Dl,Al 

MOVE.L 

$10(A1),D1 

BEQ.S 

LF82106 

MOVE. B 

$ E(Al),D0 

ANDI.W 

#3,DO 

BEQ.S 

LF82122 

CMPI.B 

#1,D0 

BNE.S 

LF82116 

pa Softint: 

MOVEA.L 

Dl,Al 

JSR 

-$B4(A6) 


LF82106 


pa Ignore: 


SUBQ.B 

#1,$126(A6) 

BGE.S 

LF82114 

MOVE.W 

#$C000,$DFF09A 

LF82114 RTS 



Zeiger auf Port nach al 
mp SigTask nach dl 
kein SigTask eingetragen 

mpji'lags auslesen 
obere Bits ausblenden 
dO = paSignal ? 

testen ob dO = pa_SoftInt 
nein, dann weiter 

Routine für Softinterrupt 
mp_SigTask (Zeiger auf Softint) 
nach al und Softint auslösen 
(Cause) 


Routine für "Ignore" 

IDNestCnt— (Enable) 

Interrupts wirklich freigeben ? 
Interrupts freigeben 
Ende der PutMsg-Funktion 


447 




Kapitel 8 


LF82116 

CMPI.B 

BEQ.S 

#2,DO 

LF82106 

; testen ob d0 = pa Ignore, wenn ja 
; dann nach pa Ignore verzweigen 

pf Action: 

MOVEA.L 

Dl, AO 

; Routine für Action-Flag 
; Wert von mp_SigTask nach aO 


; Der Zeiger auf die Routine, die ausgeführt werden soll 
; steht nun im Adreßregister aO 


JSR 

BRA.S 

(AO) 

LF82106 

; Routine ausführen 
; >Ende< (pa Ignore) 

LF82122 

MOVE.B 

ADDQ.B 

SUBQ.B 

BGE.S 

$F(A1),D0 
#1 ,$127(A6) 

#1 ,$126(A6) 
LF82138 

; mp SigBits auslesen 
; TaskDisableNestingCounter++ 

; InterruptDisableNestingCounter— 

: Interrupts wirklich freigeben ? 


MOVE.W 

#$C000,$DFF09A 

; Interrupts freigeben 

LF82138 

MOVEA.L 

MOVEQ 

BSET 

MOVE.L 

JSR 

BRA 

Dl, Al 

#0,D1 i 

DO,Dl i 

Dl,DO 
-$144(A6) 
$F82578 

Zeiger auf Port nach al 
dl löschen 

SignalBits in dl setzen 
und nach dO schieben 

Signal abschicken (Signal) 

(Permit) > Ende 


Bild 8.3: ROM-Auszug der PutMsg-Routine 


Wie man sieht, wird die angegebene Nachricht an die Message- 
Liste des Empfänger-Ports gehängt. Danach wird, wie durch 
die Flag-Kombination vom mp_Flags bestimmt, reagiert. 

Als nächstes müssen wir uns um die "Briefkastenleerung" küm¬ 
mern. Sie wird mit Hilfe des Befehls GetMsg bewerkstelligt. 


GetMsg = -372 (Exec-Library) 


♦Port 

aO 

< Zeiger auf eine MessagePort-Struktur, 
aus der eine Nachricht entnommen werden 
soll. 

♦Message 

dO 

> Nachdem die Funktion-GetMsg ausgeführt 
wurde, erhält man die Adresse auf die 
nächste Message-Struktur. Wenn keine 
Nachricht mehr vorliegt, wird eine Null 
zurückgegeben. 

Erklärung 


Durch GetMsg kann man die nächste Nach¬ 
richt (es wird nach dem first-in-first- 
out-System vorgegangen) entnehmen. 
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Um die Nachricht abzuholen, wird der Zeiger auf einen Messa- 
gePort benötigt, von dem die nächste Nachricht übernommen 
werden soll. Nachdem die Meldung aus der Liste entfernt 
worden ist, erhält man die Adresse auf die Message-Struktur 
zurück. Sollte keine Nachricht anliegen, erhält man eine 
Null. 

Auch hierzu ein Auszug aus dem KickStart-ROM (2.0) 


GetMsg: ; GetMsg (-372) 

; aO < Zeiger auf Ports 


LEA 

$14(A0),A0 

MOVE.W 

#$4000,$DEF09A 

ADDQ.B 

#1,$126(A6) 

MOVEA.L 

(AO),Al 

MOVE.L 

(Al),DO 

BEQ.S 

LF82166 

MOVE.L 

DO,(AO) 

EXG 

DO,Al 

MOVE.L 

AO,4(Al) 

LF82166 SUBQ.B 

#1,$126(A6) 

BGE.S 

$F82174 

MOVE.W 

#$C00Q,$DFF09A 

RTS 



; Adresse des mp_MemList Eintrags 
; Interrupts sperren 
; IDNestCnt++ (Disable) 

; Zeiger auf erste Nachricht 
; ln_Succ-Eintrag auslesen 
; Null ? Dann war die Liste leer 
; sonst Succ als erstes eintragen 
; Registerinhalte austauschen 
; Vorgänger (ln_Pred) setzen 

; IDNestCnt— (Enable) 

; Interrupts wirklich freigeben ? 
; Interrupt freigeben 
; Ende 


Bild 8.4: ROM-Auszug der GetMsg-Routine 


Haben wir die Meldung vom Port übernommen, können wir auf 
die Message-Daten zugreifen. Betrachtet man den Vorgang ganz 
neutral, so stellt man fest, daß es sich bei einer Nachricht 
um einen Speicherbereich handelt, auf den ein zweiter Task 
für einen bestimmten Zeitraum zugreifen kann. Die Länge kann 
vom Empfängertask festgelegt werden. Während dieser Zeit 
sollte der sendende Task nicht auf den Datenbereich schrei¬ 
bend (!) zugreifen. Wird die Nachricht mittels der Funktion 
ReplyPort vom Empfängertask beantwortet, hat der Task, von 
dem die Nachricht stammt, wieder die Erlaubnis, auf seine 
Daten zuzugreifen. 


ReplyMsg = -378 (Exec-Library) 


♦Message al < Zeiger auf die Message-Struktur, deren 
Empfang bestätigt werden soll. 

Erklärung Mit der Funktion ReplyMsg kann man den 

Empfang einer Meldung bestätigen. Dies 
kann wichtig sein, da einige Tasks auf 
eine Rückmeldung warten, bevor sie ihre 
Arbeit fortführen. Durch den Aufruf wird 
der Typ des Knotens der Message-Struktur 
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auf 7, also nt_ReplyMsg, geändert. Da¬ 
nach wird sie an den angegebenen Reply- 
Port, dessen Adresse in der Struktur 
enthalten ist, zurückgesendet. 


Auch hier wollen wir uns die Routine näher ansehen: 


ReplyMsg:; Exec-Library (-378) 

; al < Zeiger auf Message die bestätigt werden soll 


MOVEQ 

MOVE.L 

MOVEA.L 

BNE.S 

MOVE.B 

RTS 

; PutMsg 

PutMsg: MOVEQ 
MOVE.L 
LF820C0 LEA 

MOVE.W 
ADDQ.B 


#7,DO 
$E(A1),D1 
Dl ,A0 
LF820C0 
#6,8(A1) 


•Funktion: 

#5,D0 

A0,D1 

$14(A0),A0 
#$4000,$DFF09A 
#1,$126(A6) 


Typ = nt_ReplyMsg (7) 

Zeiger auf ReplyPort nach dl 
testen ob ReplyPort eingetragen 
ist. Wenn ja, dann zurück senden 
sonst Message in nt_FreeMsg (6) 
ändern 


ab hier wird die Nachricht 
zurückgesendet 


Bild 8.5: ROM-Auszug der ReplyMsg-Routine 


Wie erwähnt, wird zusätzlich zu der GetMsg-Funktion auch 
noch die ReplyMsg-Funktion benötigt. Manche Tasks warten so¬ 
gar solange, bis sie auf ihre Nachricht eine Antwort erhal¬ 
ten haben. Meist werten sie dann die zurückerhaltene Nach¬ 
richt aus, falls der empfangende Task neue Daten in die Mes¬ 
sage-Struktur geschrieben hat. 


Warten auf Messages 

Zum Schluß müssen wir uns noch überlegen, wie wir auf eine 
Nachricht warten können. Die erste Möglichkeit besteht 
darin, daß man immer wieder versucht, eine Nachricht vom 
MessagePort zu bekommen. Bei dieser Möglichkeit muß unser 
Task ständig bearbeitet werden und nimmt so den anderen 
Tasks Rechenzeit weg. Um dies zu verhindern, kann man die 
Funktion WaitPort einsetzen. 
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WaitPort 

= 

-384 (Exec-Library) 


»Port 

aO < Zeiger auf eine Port-Struktur 


Erklärung 

Mit der 

Funktion WaitPort wird solange 


gewartet 

, bis der angegebenen Port 

eine 


Nachricht empfängt. 


Wiederum wollen wir uns ein 

ROM-Auszug ansehen, der die 

Rou- 

tine verständlicher machen soll: 


WaitPort:; Exec-Library (-384) 



; aO < Zeiger auf Port-Struktur 


MOVEA.L 

$14(A0),A1 ; 

Zeiger auf erste Nachricht 


TST.L 

(Al) 

laden und testen. Wenn eine 


BNE.S 

LF8219A 

Meldung anliegt zurück. 


MOVE.B 

$F(AO),D1 

mp SigBits aus Port holen 


LEA 

$14(A0),A0 ; 

mp MsgList der Nachrichten 


MOVEQ 

#0,D0 

dO löschen 


BSET 

Dl,DO ; 

Bits übertragen 


MOVE.L 

A2,-(A7) 

Inhalt von a2 retten 


MOVEA.L 

A0,A2 



LF8218E JSR 

—$ 13E(A6) 

(Wait) 


MOVEA.L 

(A2),A1 

Message nach al 


TST.L 

(Al) 

ist etwas angekommen ? 


BEQ.S 

LF8218E ; 

nein, dann wiederum warten! 


MOVEA.L 

(A7)+,A2 

Inhalt von a2 restaurieren 


LF8219A MOVE.L 

Al,DO ; 

angekommene Nachricht nach 


RTS 

1 

dO und Funktion beenden! 



Bild 8.6: ROM-Auszug der WaitPort-Routine 


Das Programm wird durch die WaitPort-Funktion solange ge¬ 
stoppt, bis die SignalBits des MessagePorts empfangen wer¬ 
den. Die Routine hat dann folgendes Aussehen: 


MsgLoop: 



move.1 

4,a6 

; ExecBase nach a6 

move.1 

Port,aO 

; Nachricht vom angegebenen 

jsr 

GetMsg(a6) 

; Port abholen. 

move.1 

dO,Message 

; Zeiger speichern 

bne 

CheckMessage 

; verzweigen wenn wir eine 
; Meldung empfangen haben 
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move.l Port,al 
jsr WaitPort(a6) 

bra MsgLoop 


; sollte keine Nachricht an- 
; gekommen sein, müssen wir 
; warten! 


Bild 8.7: Warten auf eine Nachricht mit WaitPort 


Eine weitere Möglichkeit besteht darin, daß man die Exec- 
Funktion Wait direkt benutzt. Auch hier wird der Task in die 
TaskWait-Liste übertragen. Erst wenn eins der angegebenen 
Signalbits empfangen wurde, wird er wieder in den Ready-Zu- 
stand versetzt. 


MsgLoop: 

move.1 

4,a6 

; ExecBase nach a6 

move.1 

Port,aO 

; Nachricht vom angegebenen 

jsr 

GetMsg(a6) 

; Port abholen. 

move.1 

dO,Message 

; Zeiger speichern 

bne 

CheckMessage 

; verzweigen wenn wir eine 

move.1 

Signal,dO 

; Meldung empfangen haben. 

; Ist keine Nachricht vorhan- 
; den, wird auf die in der MsgPor 
; Struktur abgelegten Signal-Bits 

jsr 

Wait(a6) 

; gewartet. 

bra 

MsgLoop 

/ 


Bild 8.8: Warten auf eine Nachricht mit Wait 


Der Unterschied zu der WaitPort-Funktion besteht darin, daß 
bei letzterer nur auf einen Port, also nur auf ein Signal- 
Bit, geachtet werden kann. Bei Wait hingegen kann auf meh¬ 
rere Signale, also auch auf mehrere MessagePorts, reagiert 
werden. So wird es möglich z.B. gleichzeitig auf Ereignisse 
von zwei verschiedenen Fenstern zu warten. 


8.4.3 Demoprogramm 

Den Schluß dieses Kapitels bilden zwei Programme, welche die 
Funktion des Message-Systems demonstrieren sollen. Der erste 
Task richtet einen Message-Port ein und wartet dann auf eine 
Nachricht. Erhält er eine solche, gibt er den mit der Nach¬ 
richten-Struktur gesendeten Text auf seinem Fenster aus. 


* 

* Kapitel 8 

* Demonstrationsprogramm #1 für das Message-System 

* 
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ExecBase = 4 

; Weitere Offsets ... 
Start: 


; Zunächst wird die Dos-Library und ein "einfaches" 
; Fenster geöffnet, über welches die Kommunikation 
; ablaufen soll. 


lea 

Textl,a0 


bsr 

MyPrint 

; Text ausgeben 

move.1 

#MsgPort Name, 

,a0 

move.1 

#0,d0 


bsr 

CreatePort 

; Msg-Port anlegen 

move.1 

dO,MsgPort 


move.1 

ExecBase,a6 


WaitLoop: 

lea 

Text2,a0 

; Text ausgeben 

bsr 

MyPrint 


move.1 

MsgPort,aO 


jsr 

WaitPort(a6) 

; auf Nachricht warten 

move.1 

MsgPort,aO 


jsr 

GetMsg(a6) 

; Nachricht abholen 

move.1 

dO,Message 


move.1 

dO,aO 


tst.w 

18(a0) 

; Länge =0? 

bne 

Weiter 

; Nein, dann weiter 

lea 

Text4,a0 


bsr 

MyPrint 

; Ende-Text ausgeben 

pea 

Ende 

; Rücksprungadresse = Ende 

bra 

Schluß 

; Nachricht bestätigen 

Weiter: lea 

Text3,a0 


bsr 

MyPrint 

; Empfangsbestätigung ausgeben 

move.1 

Message,aO 


add.l 

#20,aO 


bsr 

MyPrint 

; Nachricht ausgeben 

pea 

WaitLoop 

; Adresse für Loop setzen 

Schluß: move.l 

Message,al 


jsr 

ReplyMsg(a6) 

; Nachricht bestätigen 

rts 


; Loop verzweigen 
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Ende: 

move.1 
jsr 

MsgPort,aO 

DeletePort 

; Port entfernen 

move.1 
move.1 
jsr 

WinError: 

DosBase,a6 

WindowHD,dl 

Close(a6) 

; Fenster schließen 


move.1 
move.1 
jsr 

ExecBase,a6 

DosBase,al 

CloseLib(a6) 

; Dos-Lib schließen 

Error: 

rts 


; Programm beenden 


; Ausgabe-Routine 
; Datenbereich 



Programm 8.7: Message-Demonstration, Programm 1 


Das zweite Programm liest eine Textzeile ein und sendet sie 
mittels PutMsg an den Message-Port des ersten Tasks, der 
seinerseits die Nachricht auswertet. Danach wartet er auf 
die Bestätigung der Meldung, wonach er wiederum die Eingabe 
einer Zeichenkette erlaubt. 


* Kapitel 8 

* Demonstrationsprogramm #2 für das Message-System 


ExecBase = 4 

; Weitere Offsets ... 
Start: 


; Zunächst wird die Dos-Library und ein "einfaches" 
; Fenster geöffnet, über welches die Kommunikation 
; ablaufen soll. 


lea 

Textl,aO ; 

Hallo-Text ausgeben 

bsr 

MyPrint 


move.1 

ExecBase,a6 


lea 

YourPortName,al 

; Adresse des Message-Ports des 

jsr 

FindPort(a6) ; 

ersten Tasks suchen. 

move.1 

dO,YourPort ; 
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beq 

Exit 


sub.l . 

aO,aO 

; Name ist belanglos 

move.1 

#0,d0 

; Priorität = 0 

bsr 

CreatePort 

; Reply-Port einrichten 

move.1 

dO,MsgPort 


move.1 

ExecBase,a6 


move.1 

MsgPort,mn_ReplyPort ; ReplyPort einsetzen 

MsgLoop: 

lea 

Text2,a0 

; Eingabeaufforderung ausgeben 

bsr 

MyPrint 


move.1 

#mn Data,d2 


move.1 

#100,d3 


bsr 

M 

bsr MyReadLN ; String einiesen 

move.w 

d0,mn Length 


pea 

MsgLoop 

; Stack mit MsgLoop belegen 

tst.l 

dO 


bne 

Weiter 

; Keine Eingabe 

move.1 

#Ende,(a7) 

; Ja, dann Ende auf Stack ablegen 

Weiter: 

lea 

Text3,a0 

; Sende-Text ausgeben 

bsr 

MyPrint 


move.1 

YourPort,aO 


lea 

MyMsg,al 


jsr 

PutMsg(a6) 

; Nachricht senden 

lea 

Text4,a0 

; Warte-Text ausgeben 

bsr 

MyPrint 


move. 1 

MsgPort,aO 


jsr 

WaitPort(a6) 

; auf Bestätigung warten 

move. 1 

MsgPort,aO 

; und Message aus ReplyPort 

jsr 

GetMsg(a6) 

; entfernen 

rts 


; Programm beenden oder wiederholen. Je 
; nachdem, welche Rücksprungadresse auf 
; dem Stack abgelegt worden ist. 

Ende: move.1 

MsgPort,aO 


bsr 

DeletePort 

; ReplyPort "abbauen" 

Remove: 

move.1 

DosBase,a6 


move. 1 

WindowHD,dl 

Close(a6) 


jsr 

; Fenster schließen 

WinError: 

move.1 

ExecBase,a6 


move.1 

DosBase,al 

CloseLib(a6) 


jsr 

; Dos-Library schließen 
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Error: 

rts 


; Programm beenden 

Exit: 

lea 

ErrTextl,aO 

; Fehler-Text ausgeben 


bsr 

MyPrint 


move.1 

#ErrTextl,d2 



move.1 

#2,d3 



pea 

Remove 

; Rücksprungadresse festlegen 


bra 

MyReadLN 

; Text einiesen (Repeat until 
; Keypressed) 


; Ein- 

und Ausgaberoutinen 


/ • • • 

; Datenbereich 


MyMsq: 


dc.l 

0,0 ; mn Succ, mn Pred 



dc.b 

0,0 ; mn Typ, mn Pri 



dc.l 

0 ; mn Name 

mn ReplyPort 

dc.l 

0 ; mn ReplyPort 

mn Length 


dc.w 0 ; mn Length 

mn Data 


ds. 1 

100 ; Zeichenkettenpuffer 


Programm 8.8: Message-Demonstration, Programm 2 


8.5 Libraries (Bibliotheken) 

Bisher haben wir schon einige Libraries kennengelernt und 
uns aus ihrem reichhaltigen Angebot an Funktionen bedient. 
Über den Aufbau haben wir aber nur einen kleinen Einblick 
erhalten, der in diesem Kapitel vertieft werden soll. 

Im Grunde ist eine Library nichts anderes als eine Sammlung 
von einzelnen Routinen, auf die ein Programmierer zurück¬ 
greifen kann. Jede Library ist für ein spezielles Gebiet zu¬ 
ständig. So enthält die Graphics-Library z.B. Routinen, die 
für Grafikausgaben benutzt werden können. 

Folgende Libraries stehen zur Verfügung: 


D "arp.library" Die AmigaDOS Replacement Project Library ist 

sehr weit verbreitet und enthält viele nützliche 
Funktionen wie z.B. einen FileRequester. 

D "diskfont.library* Laden und Suchen von Zeichensätzen, die auf Dis¬ 
kette vorliegen. 

R "clist.library" Die Funktionen der CList-Library werden zur Ma¬ 

nipulation der Char-Listen benutzt. 

R "console.library" Die console.library beinhaltet zahlreiche Funk¬ 

tionen, die die Ein- und Ausgabe mit dem Con- 
sole-Device unterstützen. 
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R "dos.library" 

R "exec.library" 

R "graphics.library" 
D "icon.library" 

R "intuition.library" 
D "janus.library" 

D "layers.library" 


D "mathffp.library" 

D "mathieeedoubbas.lib" 


D "mathtrans.library" 

D "potgo.library" 

D "timer.library" 

D "translator.library" 


In der DOS-Library sind Funktionen zur Bearbei¬ 
tung von Dateien, einfachen Fenstern und sonsti¬ 
gen Datenträger-Einrichtungen enthalten. 

Die Exec-Library ist die Betriebs-System-Li- 
brary. In ihr findet man viele Funktionen, die 
die Arbeit mit dem Betriebssystem erleichtern. 

Wie schon angesprochen, enthält die Graphics-Li- 
brary eine große Anzahl von Funktionen, die für 
die Grafikausgabe benutzt werden können. 

Die Icon-Library, die sich nicht im ROM befindet 
sondern von Diskette nachgeladen werden muß, ist 
für die Darstellung der Icons auf der Workbench 
zuständig. 

Die Funktionen der Intuition-Library stellen die 
grafische Benutzeroberfläche (Windows, Screens 
usw.) des Amiga dar. 

Die Janus-Library bietet einige Funktionen für 
die Programmierung des Side-Car bzw. der 
Brückenkarte (PC-Emulator) des Amigas an. 

Die Funktionen der Layers-Library werden von der 
Intuition- und der Graphics-Library benutzt, da 
sie für die Verwaltung von sich überlagernden 
Grafikausschnitten zuständig sind. 

Diese Library enthält Funktionen für Rechnungen 
mit Fließkommazahlen. 

Diese Library enthält mathematische Funktionen 
für Rechnungen mit doppelt-genauen Fließkomma¬ 
zahlen. 

Hier sind mathematische Sonderfunktionen wie 
sin, cos, tan usw. gesammelt. 

Programmierung der analogen Eingänge (Maus). 
Zeitmessung durch CIAs. 

Die Translator-Library enthält nur eine Funk¬ 
tion. Sie konvertiert einen Text in Lautschrift, 
um ihn durch das Narrator-Device ausgeben lassen 
zu können. 


Wie man schon an dem großen Angebot an Libraries sehen kann, 
ist jeder Bereich des Computers mit hilfreichen Routinen 
ausgestattet. Dies erleichtert die Arbeit des Programmierers 
und verhindert Kompatibilitätsprobleme. 


8.5.1 Aufbau einer Library 

Doch jetzt wollen wir uns etwas näher mit dem Aufbau einer 
Library, die sich im Speicher befindet, beschäftigen. Grund¬ 
sätzlich kann man sagen: Eine Library unterteilt sich in 
zwei wichtige Abschnitte. Zum einen in den Funktionsteil und 
zum anderen in die Library-Struktur mit der Sprungtabelle. 
Dabei sind die beiden Teile lediglich durch die Sprungta¬ 
belle verbunden. 

Zu dem Funktionsteil braucht man wohl nichts mehr zu sagen. 
Er enthält abgeschlossene Routinen, die spezielle Aufgaben 
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übernehmen können. Viel interessanter ist die Sprungtabelle 
und die, sich direkt daran anschließende Library-Struktur. 
Sie werden durch die Basisadresse, die mit der Adresse des 
ersten Eintrags der Library-Struktur übereinstimmt, geteilt. 
Man erhält diese Adresse, wenn man die Library mittels der 
(Old)OpenLibrary-Funktion öffnet. Ausgehend von dieser 
Adresse kann man also sagen, daß die Sprungtabelle im 
negativen Bereich (adressierbar durch negative Offsets) und 
die Library-Struktur im positiven Bereich liegt. Diesen Auf¬ 
bau soll die folgende Skizze verdeutlichen. 



1 

< - 

<- 

jmp Funktion+n 



<- 

jmp Funktion+4 


Funktionen 

<- 

jmp Funktion+3 



< - 

jmp Funktion+2 



<- 

jmp Funktion+1 



<... 

1 

jmp Funktion+O 



<■ 


negativer Bereich 


=> Basisadresse 


Liste aller 
Libraries 


< 


> 

Node-Struktur 







öffentlicher 

Datenbereich 




—Library-Struktur 


positiver Bereich 


privater 

Datenbereich 


Bild 8.9: Skizze zum Aufbau einer Library 


Wie man aus der Skizze erkennen kann, besteht die Sprungta¬ 
belle lediglich aus einer Anzahl von Jump-Befehlen, die in 
den Funktionsteil verzweigen. Um von der Basisadresse in den 
Bereich der Sprungtabelle zu gelangen, benötigt man einen 
negativen Offset, der ein Vielfaches von sechs ist. Dies ist 
begründet in der Länge eines Sprungbefehls OpCode (2 Byte) + 
Adresse (4 Byte) = Jump-Befehl (6 Byte). 


458 






Die Exec-Library 


30 

jmp 

24 

jmp 

18 

jmp 

12 

jmp 

06 

jmp 

00 

... 


Funktion+n 

Funktion+4 

Funktion+3 

Funktion+2 

Funktion+1 


Für die Offsetberechnung ergibt sich dann folgende Formel: 

-1 * n * 6 

Offset negieren — 1 j 

Nummer der Funktion -' 

Länge eines Jump-Befehls - 

Im Programm sähe dies wie folgt aus: 


move.l 4,a6 

jsr -l*n*6(a6) 


Es ist noch wichtig zu wissen, daß man immer das Adreßregi¬ 
ster a6 nehmen sollte, um in die Sprungtabelle einer Library 
zu verzweigen, da fast alle Funktionen in a6 die Adresse der 
Library-Basis erwarten. 

Nachdem wir uns mit der Sprungtabelle auseinandergesetzt ha¬ 
ben, schenken wir nun der Library-Struktur unsere Aufmerk¬ 
samkeit. Sie enthält Daten, die zur Verwaltung der Library 
dienen. 

jmp ... ; Sprungtabelle 

jmp 

jmp 

Library-Struktur: 


00 

04 

dc.l 

dc.l 

*lib Succ 

*lib Pred ; 

<.. Basisadresse 

08 

dc.b 

lib Type ; 

Node-Struktur 

09 

dc.b 

lib Pri ; 


10 

dc.l 

*lib Name 


14 

dc.w 

lib Flags ; 

Flags für Library-Struktur 

16 

dc.w 

lib NegSize ; 

Länge der Sprungtabelle Byte 

18 

dc.w 

lib PosSize ; 

Länge des Datenteils in Byte 

20 

dc.w 

lib Version ; 

Versionsnummer der Library 

22 

dc.w 

lib Reversion ; 

Revisionsnummer der Lib. 

24 

dc.l 

*lib IDString ; 

Identifikationsstring 

28 

dc.l 

lib Sum ; 

Prüfsumme d. Sprungtabelle 

32 

dc.w 

lib OpenCnt ; 

Zähler der Benutzer 


; Spezialdatenbereich der Library 
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*lib_Succ, *lib_Pred, lib_Type, lib_Pri, *libNode 
Im Anschluß an die Sprungtabelle finden wir wieder eine 
Node-Struktur, die es Exec ermöglicht, alle Libraries (die 
im Speicher vorliegen) zu verwalten. Die List-Struktur (Kopf 
der Liste) finden wir in der ExecBase ab dem Byte 378. 

lib_Flags 

Der Eintrag lib_Flags enthält den Zustand, in der sich die 
Library im Augenblick befindet. Dabei sind folgende Werte 
möglich: 

Library-Flag Wert Bedeutung 


libf Summing 

00 

libf Changed 

01 

libf SumUsed 

02 

libf DelExp 

03 


Checksumme wird gerade berechnet 
Library wurde geändert 
Kontrolle der Checksumme 
Library wird aus dem System entfernt 


lib_NegSize 

Größe des negativen Datenbereichs. Hiermit ist die Länge der 
Sprungtabelle gemeint, die vor der Library-Struktur, also im 
negativen Bereich, liegt. 

lib_PosSize 

Größe des positiven Datenbereichs. Die Länge dieses Bereichs 
kann je nach Library unterschiedlich ausfallen. Dies liegt 
daran, daß neben den Standarddaten auch interne Daten abge¬ 
legt werden können. 

libVersion 

Versionsnummer der Library. 
lib_Reversion 

Reversionsnummer (Überarbeitungsnummer) der Library. 
lib_IDString 

Zeiger auf eine Zeichenkette, welche den Identifikationstext 
enthält. 

lib_Sum 

Der Eintrag lib_Sum enthält die Prüfsumme über die Sprungta¬ 
belle. Wenn man einen Vektor der Tabelle "verbogen" 
(geändert) hat, sollte man diesen Wert neu berechnen (siehe 
auch SumLibrary). 

lib_OpenCnt 

Durch den Wert OpenCnt wird die Anzahl der Benutzer festge¬ 
legt, welche die Library geöffnet haben. Wenn kein Programm 
die entsprechende Library benötigt, kann sie aus der Liste 
der Libraries entfernt und dadurch der Speicherplatz 
freigegeben werden. Dies geschieht jedoch nur, wenn das Flag 
libf_DelExp (verzögertes Entfernen) im Eintrag lib_Flags 
gesetzt ist. Jetzt dürfte es auch klar sein, warum die 
Libraries immer geschlossen werden sollten, wenn man sie 
nicht mehr benutzt. 
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Datenbereich 

Im Anschluß an die Library-Struktur folgt ein Datenteil, der 
von Library zu Library unterschielich ausfallen kann. 


8.5.2 Routinen zur Library-Verwaltung 


Nachdem wir uns die Library-Struktur angesehen haben, soll¬ 
ten wir uns den Funktionen der Library zuwenden. Sicherlich 
ist ihnen schon aufgefallen, daß alle Library-Offsets bei 
-30 beginnen. Das liegt daran, daß die ersten vier Funktio¬ 
nen (-6 bis -24) zur Verwaltung der Library benutzt werden. 
Sie haben folgende Aufgaben: 


lib_Open -06 


lib Close -12 


lib_Expunge -18 


lib Extfunct -24 


Routine, die beim öffnen der Library 
ausgeführt wird (wird von OpenLibrary 
angesprungen). 

Routine, die beim Schließen der Library 
ausgeführt wird (wird von CloseLibrary 
angesprungen). 

Routine, die beim Entfernen der Library 
aufgerufen wird (wird von RemLibrary an¬ 
gesprungen ). 

Die letzte der vier Funktionen ist noch 
nicht belegt. Sie ist freigehalten wor¬ 
den für spätere Erweiterungen. 


Es ist noch wichtig zu wissen, welche Register nach einem 
Funktionsaufruf verändert sein können. Die System-Libraries 
verändern die Register do, dl, aO und al. Dies kann natür¬ 
lich bei "privaten" Libraries unterschiedlich sein. 

Nachdem wir den Aufbau der Library besprochen haben, folgen 
nun die Funktionen, die uns Exec für die Verwaltung der Lib¬ 
raries zur Verfügung stellt. Einige Funktionen werden wir 
erst im Kapitel 9 besprechen. 


AddLibrary = -396 (Exec-Library) 


»LibraryNode al < Zeiger auf eine Library-Node-Struktur, 
die mit Hilfe der Funktion MakeLibrary 
erstellt worden ist. 

Erklärung Die Funktion AddLibrary trägt die ange¬ 

gebene Library in die Library-Liste ein. 
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CloseLibrary 


-414 (Exec-Library) 


*LibraryNode al < Zeiger auf die Library-Node-Struktur der 
zu schließenden Library. 


Erklärung Durch den Aufruf dieser Funktion kann 

die geöffnete Library wieder geschlossen 
werden (lib_OpenCnt wird verringert). 


MakeFunctions = -90 (Exec-Library) 

Addresse des Bereichs, in dem die 
Sprungtabelle angelegt werden soll. 

Zeiger auf eine Tabelle, die entweder 
absolute 32-Bit-Adressen oder Offset 
Werte (16 Bit) enthalten kann. Soll eine 
Tabelle mit Offset-Werten benutzt wer¬ 
den, so muß sie mit dem Wert $FFFF (-1W) 
beginnen. Die Liste muß in beiden Fällen 
immer mit einer -1 abgeschlossen sein. 
Wenn die in FunctionArray übergebene Ta¬ 
belle Offset-Werte enthält, muß hier die 
relative Adresse für die Offsets angege¬ 
ben sein. Sonst sollte der Wert mit Null 
initialisiert werden. 

TableSize do > Nachdem die Funktion aufgerufen wurde, 
erhält man die Größe der Sprungtabelle 
in dO zurück. 

Erklärung Durch die MakeFunctions-Routine wird 

eine, durch die angegebenen Parameter 
spezifizierte, Sprungtabelle erstellt 
(Näheres zu dieser Funktion siehe Kapi¬ 
tel 9 ) . 


♦Target aO < 

♦Funct.Array al < 


FuncDispBase a2 < 


MäkeLibrary = -84 (Exec-Library) 

♦funclnit aO < Tabelle von absoluten Adressen oder Off¬ 
sets (identisch mit der Tabelle Func¬ 
tionArray von MakeFunction). Die Offset¬ 
werte würden sich hierbei immer auf die 
Anfangsadresse ihrer Tabelle beziehen, 
♦structlnit al < Zeiger auf eine Initialisierungs-Tabelle 
wie sie bei der Funktion InitStruct 
(siehe "Sonstige Funktionen") benutzt 
wird. Die Initialisierungs-Tabelle dient 
dazu, die Library-Struktur anzulegen. 
Wird hier eine Null eingetragen, muß man 
die Library-Struktur selbständig ein¬ 
richten . 
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*liblnit a2 < Zeiger auf eine Routine, die nach der 
MakeLibrary-Funktion aufgerufen wird. 
Diese Routine kann die weitere Initiali¬ 
sierung der Library-Struktur übernehmen. 
Dazu bekommt sie im Register dO einen 
Zeiger auf die erstellte Library-Struk¬ 
tur und in aO die Adresse der Segmentli¬ 
ste übergeben. Nachdem die Routine been¬ 
det wurde, wird der Wert, der im Daten¬ 
register 0 zurückgegeben wurde, als 
lib_Node (Basisadresse) dem Programm 
übergeben. Will man auf eine eigene Rou¬ 
tine verzichten, initialitisiert man den 
Zeiger mit Null. 


dataSize 

dO 

< Größe der Library-Struktur, die angelegt 
werden soll. 

»codeSize 

dl 

< Zeiger auf Segment-Liste der Library-Da¬ 
tei . 

‘libNode 

dO 

> Zeiger auf den Library-Knoten der er¬ 
stellten Library (Basisadresse oder 

Null). 

Erklärung 


Durch die Funktion MakeLibrary wird eine 


Library erstellt, die durch die überge¬ 
benen Parameter bestimmt wurde. Näheres 
finden sie im Kapitel 9 und 11. 



♦LibName al < Zeiger auf eine Zeichenkette mit dem Na¬ 
men der Library, die geöffnet werden 
soll. 


*LibraryNode dO > Die Funktion liefert den Zeiger auf die 
Node-Struktur der gesuchten Library zu¬ 
rück. Ist ein Fehler aufgetreten, wird 
in dO eine Null übergeben. 

Erklärung Die OldOpenLibray-Funktion löscht das 

Datenregister 0 und ruft die Funktion 
OpenLibrary auf. Diese Funktion durch¬ 
sucht die Library-Liste nach dem angege¬ 
benen Namen und gibt die Adresse der be¬ 
treffenden Node-Struktur zurück. Außer¬ 
dem wird der lib OpenCnt-Zähler erhöht. 
Ist die Library nicht in der Liste ent¬ 
halten, wird versucht, sie von Diskette 
nachzuladen. 
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OpenLibrary 


-512 (Exec-Library) 


*LibName al < Zeiger auf die Zeichenkette (die mit ei¬ 

nem Null-Byte abgeschlossen werden muß) 
mit dem Namen der Library, die geöffnet 
werden soll. 

Version do < Wird eine besondere Version der Library 

benötigt, kann in do die Mindestversi- 
onsnummer angegeben werden. Gibt es 
keine Version, die für die Mindestversi¬ 
onsnummer ausreicht, wird die Funktion 
abgebrochen und do mit Null initiali¬ 
siert. Ist die Version der Library be¬ 
langlos, kann eine Null übergeben wer¬ 
den. 


♦LibraryNode do > Die Funktion liefert den Zeiger auf die 
Node-Struktur der gesuchten Library mit 
der angegebenen Mindestversionsnummer 
zurück. Ist ein Fehler aufgetreten, wird 
in do eine Null zurückgegeben. 

Erklärung Die OpenLibrary-Funktion durchsucht die 

Library-Liste nach dem angegebenen Namen 
und gibt die Adresse der betreffenden 
Node-Struktur zurück. Außerdem wird der 
lib_OpenCnt Zähler erhöht. Ist die Li¬ 
brary nicht in der Liste enthalten, wird 
versucht, sie von der Diskette 
nachzuladen. 


RemLibrary = -402 (Exec-Library) 

♦LibraryNode al < Zeiger auf die Basisadresse bzw. Adresse 
der Library-Node-Struktur, die entfernt 
werden soll. 

Error do > Konnte die Library nicht entfernt wer¬ 

den, wird in do der Fehlercode überge¬ 
ben. Ist kein Fehler aufgetreten, erhält 
man eine Null. 

Erklärung Mit dieser Funktion kann man eine Li¬ 

brary aus der Library-Liste entfernen. 


SetFunction = -420 (Exec-Library) 

Offset aO < Negativer Offset der Funktion, die geän¬ 

dert werden soll 
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*LibraryNode al 


NewAddress 

dO 

OldAddress 

dO 

Erklärung 



< Basisadresse der Library bzw. Adresse 
des Knotens, dessen Sprungtabelle geän¬ 
dert werden soll 

< Neue Sprungadresse, die eingetragen wer¬ 
den soll. 

> Nach dem Aufruf erhalten wir die alte 
Sprungadresse der Routine zurück. 

Die Sprungadresse wird in der Sprungta¬ 
belle der definierten Library auf die 
angegebene Routine gesetzt. Außerdem 
wird die Prüfsumme der Sprungtabelle neu 
berechnet. Dies ist eine ganz nützliche 
Funktion, um sich in das System 
"einzuhängen". Virus-Programme benutzen 
diese Möglichkeit, um aktiviert zu wer¬ 
den. Natürlich kann man die Sprungta¬ 
belle auch von "Hand" manipulieren. Je¬ 
doch sollte man dann nicht vergessen, 
die Prüfsumme mit Hilfe der SumLibrary- 
Funktion zu errechnen. 


SumLibrary 


-426 (Exec-Library) 


♦Library al < Zeiger auf die Library-Struktur der Li¬ 
brary, deren Checksumme neu berechnet 
werden soll. 

Erklärung SumLibrary berechnet die Checksumme ei¬ 

ner Library neu. 


Zum Abschluß wollen wir uns die Anwendung der Funktion Set- 
Function ansehen. Dazu schauen wir uns folgendes Programm, 
welches die Funktion AllocMem der Exec-Library durch eine 
eigene Routine ersetzt, an. 


* 

* Kapitel 8 

* Demonstrationsprogramm für die SetFunction-Funktion 

* 


ExecBase = 4 

SetFunction = -420 

Forbid = -132 

Permit = -138 


Start: 

move.l ExecBase,a6 
jsr Forbid(a6) 


Task-Switching sperren 
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move.1 
move.1 
move.1 
jsr 

a6,al 
#-198,aO 
#HyOpen,dO 
SetFunction(a6) 

Adresse der Library nach al 
Offset der zu ändernden Funktion 
Adresse der neuen Funktion 
; ändern 


move.1 

dO,01dJump+2 

alte Adresse speichern 


jsr 

Permit(a6) 

Task-Switching zulassen 


; Programm _ 



move.1 
jsr 

ExecBase,a6 

Forbid(a6) 

Task-Switching sperren 


move.1 
move.1 
move.1 
jsr 

a6,al 
#-198,aO 
01dJump+2,dO 
SetFunction(a6) 

alte Adresse wieder einsetzen 

/ 


jsr 

Permit(a6) 

Task-Switching zulassen 


rts 



MyOpen: 

Loop: 

move.1 
move.1 
move.w 

sub. 1 
bne 
move.1 

d0,-(a7) 

#$ 800 ,do 
d0,$dff180 
#l,d0 

Loop 

(a7)+,d0 

Neue Funktion 
do retten 

Schleifenwert 

Hintergrundfarbe ändern 

Schleife fertig? 

dO restaurieren 

OldJump 

jmp 

MyOpen 

Damit nicht der Ablauf gestört 
wird rufen wir jetzt die 


; eigentliche Funktion auf 


Programm 8.9: Demonstration SetFunction 


8.6 Devices (Gerätetreiber) 

Um die Kommunikation mit der Außenwelt leichter zu gestal¬ 
ten, stellt das System sogenannte Devices (Gerätetreiber) 
zur Verfügung. Diese Devices sind für einen bestimmten Be¬ 
reich zuständig und enthalten alle nötigen Funktionen, um 
ein Gerät zu steuern. 

Folgende Devices stehen uns zur Verfügung: 


"audio.device" Steuerung der Tonausgabe 
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"console.device" 
"gameport.device" 
"input.device" 
"keyboard.device" 
"narrator.device" 
"parallel.device" 
"printer.device" 
"serial.device" 

"trackdisk.device" 


Ein-/Ausgabe-Funktionen für Fenster 
Kontrolle der GamePorts 
Sammeldevice für Eingabeereignisse 
Umrechnung von Tastendrücken in ASCII-Codes 
Sprachausgabe 

Datenübertragung über den Parallel-Port 
Umwandlung von Texten in Drucker-Steuercodes 
Datenübertragung über den seriellen Port 
Steuerung der Diskettenlaufwerke 


Der Aufbau eines Devices ist zum größten Teil mit dem einer 
Library identisch. So wird z.B. auch eine Library-Struktur 
mit Sprungtabelle angelegt, die mindestens sechs Standard¬ 
funktionen enthalten muß. Diese Funktionen sind die vier Li- 
brary-Standard-Funktionen, sowie die BeginlO- und die Abor- 
tlO-Funktion. 


8.6.1 Sinn und Zweck der Devices 

Natürlich stellt sich an dieser Stelle die Frage, warum man 
diese Funktionen nicht direkt mit einer Library zusammenge¬ 
faßt hat. Dies liegt an folgendem Problem: 

Stellen wir uns vor, ein Task versucht, einen bestimmten 
Block von der Diskette zu laden. Als der Schreib-/Lesekopf 
mit Hilfe der zugehörigen Routinen positioniert wurde, wird 
er durch einen Interrupt unterbrochen. Der nächste Task, mit 
höherer Priorität, will auch einen Block von der Diskette 
lesen. Dieser liegt jedoch an einer anderen Position und der 
Kopf wird erneut plaziert. Bekommt nun der erste Task die 
CPU wieder, geht er davon aus, daß der Kopf immer noch an 
der Stelle steht, an der er ihn zurückgelassen hat. Da 
jedoch der zwischengeschobene Task auch auf das 
Diskettenlaufwerk zugegriffen und den Schreib-/Lesekopf 
verschoben hat, wird der falsche Block von der Diskette 
geladen. 

Um dieses Problem zu umgehen, wird der gesamte Zugriff auf 
ein Gerät von einem Device übernommen. Dieses Device richtet 
einen eigenen Task ein, der den Zugriff auf das entspre¬ 
chende Gerät geschlossen abwickelt. Dieser Task läuft paral¬ 
lel zu den anderen Tasks ab. 


8.6.2 Ablauf einer Device-Operation 

Gehen wir von der oben besprochenen Situation aus, so können 
wir folgenden Ablauf beobachten: Zunächst wird das Device 
geöffnet und die entsprechende Nachrichten-Struktur für die 
Kommunikation mit dem angegebenen Device prepariert. Nun 
kann man die Nachricht mit den Informationen für das Device 
füllen und sendet sie mit der Funktion DoIO oder SendIO 
(wird gleich erklärt) an den Message-Port des Device-Tasks. 
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Sofern die Nachricht mit SendIO abgeschickt wurde, kann der 
Task an anderen Aufgaben, parallel zum Diskettenzugriff, 
Weiterarbeiten. Mit der Funktion ChecklO kann er testen, ob 
die Nachricht schon bearbeitet worden ist. 

Aus der Sicht des Device-Tasks spielt sich das wie folgt ab: 
Der Task für das Device erhält, wie jeder andere Task, ab 
und zu die CPU. In dieser Zeit kontrolliert er, ob an seinen 
Message-Port eine Nachricht gesendet wurde. Ist dies der 
Fall, holt er den Zeiger auf die Message-Struktur mittels 
der GetMsg-Funktion und führt die angegebene Operation aus. 
Ist die Aufgabe beendet, wird an den ReplyPort, der in der 
Message-Struktur eingetragen ist, die Nachricht (mittels Re- 
plyMsg) zurückgeschickt. Nun ist das Device bereit, weitere 
Aufträge auszuführen und holt die nächste Nachricht vom 
Message-Port. 


8.6.3 Routinen zur Arbeit mit Devices 

Wie man erkennt, ist die Kommunikation mit den Devices bzw. 
dem zuständigen Task nicht ganz einfach. Deshalb stellt uns 
Exec einige Funktionen zur Verfügung, die uns die Arbeit ab¬ 
nehmen. Beginnen wollen wir mit der DoIO-Funktion. Sie benö¬ 
tigt lediglich einen Zeiger auf eine IOReguest-Struktur, 
welche zuvor initialisiert wurde. 


DoIO 


-456 (Exec-Library) 


*IORequest 

al < Zeiger auf eine IORequest-Struktur, 
gesendet werden soll. 

die 

Ready 

do > Nummer des Fehlers, der aufgetreten 
oder eine Null 

ist 

Erklärung 

Durch die DoIO-Funktion wird eine lORe- 
quest-Struktur verschickt und gewartet, 
bis die Nachricht bearbeitet wurde. 


Die DoIO-Funktion der Exec-Library liest aus der übergebenen 
IORequest-Struktur die Adresse der Library-Struktur des De¬ 
vices aus und ruft dann die Funktion BeginlO auf. Diese 
Funktion sendet die Nachrichten-Struktur an den Message- 
Port, des vom Device eigenhändig eingerichteten Tasks. 

Nachdem die BeginlO-Funktion aufgerufen wurde, wird die 
WaitlO-Funktion bearbeitet, die eine Unterfunktion von DoIO 
ist. 
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WaitIO 

= 

-474 (Exec-Library) 


♦IORequest 

Error 

al 

dO 

< Zeiger auf eine lORequest-Struktur. 

> In dO findet man entweder den Fehlercode 
oder eine Null. 

Erklärung 


Durch die Funktion WaitIO wird der Task 
solange in die TaskWait-Liste aufgenom¬ 
men, bis die angegebenen Nachricht be¬ 
stätigt worden ist. 


Durch sie wird getestet, ob die Nachrichten-Struktur 
(IORequest) schon vom Device-Task zurückgeschickt worden 
ist. Hierbei wird lediglich in der Node-Struktur, der IORe- 
quest-Struktur, nachgesehen ob der Typ der Daten mit 7, also 
nt_ReplyMsg, initialisiert wurde. Ist das nicht der Fall, 
wird der Task durch die Wait-Funktion "schlafen geschickt". 
Dabei werden die SignalBits aus der ReplyPort-Struktur be¬ 
nutzt. Kommt ein Signal an, wird die lORequest-Struktur wie¬ 
derum überprüft. 

Sollte die lORequest-Struktur wirklich bestätigt worden 
sein, so wird sie noch aus der MsgList des ReplyPorts ent¬ 
nommen und der Fehlercode aus der lORequest-Struktur in das 
Datenregister dO geschoben. Damit ist sowohl die WaitIO- als 
auch die DoIO-Funktion beendet. 

Wie wir bei DolO gesehen haben, wird der Task angehalten und 
mittels der Wait-Funktion "schlafen gelegt". Für ein 
Multitasking-System ist das jedoch nicht befriedigend. Wenn 
schon ein unabhängiger Task für die Devices zuständig ist, 
müßte es doch auch möglich sein, den eigenen Task weiterlau- 
fen zu lassen. Genau diese Möglichkeit eröffnet uns die Sen- 
dlO-Funktion. Durch sie können wir unsere Auf-forderung sen¬ 
den und dennoch Weiterarbeiten. 


SendIO 


-462 (Exec-Library) 


*IORequest al < Zeiger auf lORequest-Struktur. 

Erklärung Durch die Funktion SendIO wird lediglich 

die Grundfunktion BeginlO (-$30) aufge¬ 
rufen, die die lORequest-Struktur an den 
Device-Task weiterleitet. Danach kann 
der Task an seinen Aufgaben Weiterarbei¬ 
ten. Wenn die Operation des Device erle¬ 
digt ist, erhält der Task über den ange¬ 
gebenen ReplyPort seine Nachricht zu¬ 
rück. 


469 








Kapitel 8 


Die SendlO-Funktion gleicht im Grunde der DoIO-Funktion ge¬ 
nau. Jedoch wird, nachdem die Funktion BeginlO der Library 
angesprungen worden ist, nicht auf die Bestätigung der Nach¬ 
richt gewartet. Das Programm kann jetzt an anderen Aufgaben 
Weiterarbeiten. Hat sie diese erledigt, so können wir die 
Unterfunktion von DoIO (WaitIO) benutzen um zu warten, bis 
unsere Nachricht bearbeitet wurde. 

Es gibt jedoch noch eine zweite Möglichkeit mit der man 
testen kann, ob die Nachricht schon bearbeitet wurde. Diese 
Funktion heißt ChecklO und kontrolliert lediglich, ob die 
angegebene Nachricht bestätigt worden ist. Wenn das nicht 
der Fall ist, kann man Weiterarbeiten und überprüft die 
Nachricht nochmals zu einem späteren Zeitpunkt. 


ChecklO = -468 (Exec-Library) 


*I0Request 

al < Zeiger auf IORequest-Struktur, auf 
gewartet werden soll 

die 

Ready 

do > Ist die angegebene Nachricht fertig, 
hält man eine Null zurück. 

er- 

Erklärung 

Testet, ob die angegebene IORequest- 
Struktur schon an ihren ReplyPort zu¬ 
rückgeschickt worden ist. 


Wie bei WaitIO wird auch bei ChecklO nur überprüft, ob der 
Node-Typ der Nachricht schon als nt_ReplyMsg gekennzeichnet 
wurde. Allerdings erhält man durch ChecklO nur die Informa¬ 
tion, ob die Nachricht bestätigt worden ist. Anschließend 
muß sie, mittels der GetMsg-Funktion, aus der Msg-Liste des 
ReplyPorts entfernt werden. 

Als letzte I0-Funktion sollte noch AbortIO erwähnt werden. 
Sie bricht den angegebenen IO-Prozeß ab. Dabei wird die 
gleichnamige Funktion AbortIO des Devices aufgerufen. 


AbortIO = -480 (Exec-Library) 


♦IORequest al < Zeiger auf IORequest-Struktur. 

Erklärung Durch die Funktion AbortIO kann ein 10- 

Request abgebrochen werden. 


Sicher ist dieser Teil etwas kompliziert, da man leicht die 
Namen der Exec-Funktionen und der Device-(Library)-Funktio- 
nen vewechseln kann. Die folgende Tabelle soll Ihnen einen 
Überblick geben. 
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Exec-Funktionen: 


OpenDevice 


CloseDevice 


RemDevice 


öffnet das angegebene Device mit den überge¬ 
benen Parametern. Außerdem wird die IORe- 
quest-Struktur eingerichtet. Das heißt, daß 
die Einträge io_Unit gelöscht werden, und 
io_Device mit dem Zeiger auf die Library- 
Struktur des Device belegt wird. Dann wird 
die Open-Funktion des Devices (-6) 
aufgerufen, welche private Installationen 
vornehmen kann. Der Device-Task und der 
zugehörige Message-Port sind zu diesem 
Zeitpunkt schon eingerichtet worden. Dies 
erledigt die Init-Routine der Resident- 
Struktur (diese Details werden im Kapitel 11 
näher erklärt). Sollte ein Fehler aufgetreten 
sein, wird der Eintrag io_Error und das 
Datenregister dO mit -1 belegt. 

Die Funktion CloseDevice (Exec) führt ledig¬ 
lich die device-spezifische Close-Funktion 
(-12) aus. 

Bei dieser Funktion wird nur die Library- 
Struktur des Devices aus der Device-Liste von 
Exec entnommen. 


DoIO 


Send10 


WaitIO 


ChecklO 


AbortIO 


Setzt den Eintrag io_Flags der angegebenen 
Struktur auf 1 (Quick-Bit gesetzt) und führt 
die device-spezifische Funktion BeginlO aus. 
Danach wird die WaitlO-Funktion abgearbeitet. 

Löscht den Eintrag io_Flags, führt die 
BeginlO-Routine aus und kehrt zum aufrufenden 
Task zurück. 

Wartet solange, bis die abgeschickte Nach¬ 
richt bearbeitet wurde. Danach wird die Nach¬ 
richten-Struktur aus der Liste der Nachrich¬ 
ten des Reply-Ports entnommen. 

Testet, ob die angegebene Nachricht bearbei¬ 
tet worden ist. Ist dies der Fall, so erhält 
man in dO den Zeiger auf die Nachricht-Struk¬ 
tur. Diese ist jedoch noch nicht aus der Li¬ 
ste des Reply-Ports entnommen worden! 

Ruft die gleichnamige device-spezifische 
Funktion AbortIO auf. 


Auch der Aufbau im Speicher soll noch einmal explizit an ei¬ 
ner Skizze verdeutlicht werden: 
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Library-Struktur, die vom Device angelegt worden ist. 
Dazu gehört auch eine Sprungtabelle, die mindestens 
die sechs Standardfunktionen aufnehmen muß! 


Beginio 


AbortIO 


Standardfunktionen 
für Libraries 


Sendet die 
Nachricht an 
den MessagePort 
des DeviceTasks 


Bricht die 
angegebene Ope¬ 
ration ab 


Open/Close 

Expunge/ExtFunc 


Sendet die Nachrichten an den 
MessagePort des Tasks, der vom 
Device erstellt worden ist. 


MessagePort des Device-Tasks. Er enthält alle Anträge 
der erwünschten Operationen des Gerätes. 


Device-Task. Er ist für alle Operationen des Gerätes 
verantwortlich. Er kontrolliert seinen MessagePort 
und erledigt die dort eingegangenen Aufträge nach dem 
fifo-Prinzip. Wurde eine Operation ausgeführt, wird die 
Nachricht an den, in der IOReq.-Struktur angegebenen, 
ReplyPort zurückgesendet. 


Standardfunktionen eines 
Devices: 


Sonderfunktionen eines 
Devices: 


Cmdlnvalid/CmdReset/ | 

CmdRead/CmdWrite/CmdUpdate CmdNonStd + n 

CmdClear/CmdStop/CmdStart/ I 

CmdFlush 


(Außerdem gibt es auch Devices, die nicht nur einen Task 
anlegen. So erstellt das Trackdisk-Device für jedes Laufwerk 
einen eigenen Task, der für die Steuerung des Laufwerks 
verantwortlich ist.) 


8.6.4 IORequest- und IOStdRequest-Struktur 

Jetzt fehlen uns noch zwei Strukturen, die für die erwei¬ 
terte Nachrichtenübermittlung verwendet werden. Sie heißen 
IORequest- und IOStdRequest, was soviel bedeutet wie Ein¬ 
gabe/Ausgabe- (Standard-)Anfrage-Struktur. Beginnen wollen 
wir mit der IORequest-Struktur: 
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IOReguest-Struktur: 


00 

dc.l 

*io Succ ;■ 



04 

dc.l 

*io Pred ; 



08 

dc.b 

io Type ; 

Node 


09 

dc.b 

io Pri ; 



10 

dc.l 

*io Name ;■ 


Message 

14 

dc.l 

*io ReplyPort ; 



18 

dc.w 

io Length ; 



20 

dc.l 

*io Device ; 

Zeiger auf Device-Struktur 

24 

dc.l 

*io Unit ; 

Zeiger auf Unit-Struktur 

28 

dc.w 

io_Command ; 

IO-Kommando 

30 

dc.b 

io Flags ; 

Device-Flags 

31 

dc.b 

io Error ; 

Fehler 

bei IO-Ausführung 

32 


io_SIZEOF 



*io 

Succ - 

io Length 




Wie man sieht, setzt sich die IORequest-Struktur aus einer 
Message-Struktur und einigen Spezialeinträgen zusammen. Die 
Zusammensetzung der Message-Struktur können sie aus dem Ka¬ 
pitel für Messages und Ports entnehmen. 

*io_Device 

Dieser Eintrag enthält die Adresse eines Device-Knotens, die 
durch die Funktion OpenDevice eingetragen wurde. Hierbei 
handelt es sich um die Adresse der Library-Struktur, die für 
das Device angelegt wurde und über die die sechs Standard¬ 
funktionen angesprungen werden können. 

*io_Unit 

Der Eintrag io_Unit kann einen Zeiger auf eine Unit-Struktur 
enthalten, in der für den Device-Task wichtige Daten abge¬ 
legt sind. Dieser Wert muß allerdings von der device¬ 
spezifischen Open-Funktion gesetzt werden. 

io_Command 

In io_Command muß der Befehl abgelegt werden, welcher ausge¬ 
führt werden soll. Dabei stehen einige Standardbefehle und 
auch device-abhängige Spezialbefehle zur Verfügung. 


IO-Kommando 

Wert 

Bedeutung 

cmd Invalid 

00 

ungültiger Befehl 

cmd Reset 

01 

Device zurücksetzen 

cmd Read 

02 

Daten in Puffer lesen 

cmd Write 

03 

Daten in Puffer schreiben 

cmd UpDate 

04 

Daten aus Puffer an Gerät schicken 

cmd Clear 

05 

Puffer löschen 

cmd Stop 

06 

Arbeit des Devices sperren 

cmd Start 

07 

Arbeit des Devices erlauben 

cmd Flush 

08 

alle IORequest-Strukturen streichen 

cmd NonStd 

09 

Sonderkommando 
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cmd Invalid 
cmdjReset 

cmdRead 

cmd_Write 

cmdUpDate 


cmd Clear 


cmdstop 


cmd Start 


cmd Flush 


cmd NonStd 


Ungültiger Befehl ! 

Durch den cmdReset Befehl wird das Device zu¬ 
rückgesetzt und die Liste der IORequest-Struktu- 
ren geleert. 

Wie der Name schon sagt, soll das Device Daten 
lesen. 

Auch der folgende Befehl dürfte sich selbst er¬ 
klären. Er veranlaßt das Device, Daten zu 
schreiben. 

Mittels der cmdJJpDate Anweisung wird das System 
aktiviert, die Daten aus dem Puffer dem Gerät zu 
übergeben. Das kann wichtig sein, wenn man z.B. 
auf eine Diskette einen Block schreiben will. 
Man benutzt zunächst den cmdWrite Befehl, der 
die angegebenen Daten in den Puffer übernimmt. 
Erst durch cmdJJpDate werden die Daten aus dem 
Puffer auf die Diskette geschrieben. 

Der Zwischenspeicher des Devices wird gelöscht. 
Achtung: Man sollte mit dem Befehl cmdJJpDate 
sicherstellen, daß die Daten wirklich übertragen 
worden sind bevor man den Puffer löscht. 

Der cmd_Stop Befehl erlaubt es, ein Device lahm¬ 
zulegen. Dabei wird nur die Abarbeitung der 10- 
Request-Strukturen gestoppt. Neue Strukturen 
dieser Art können immer noch in die Liste aufge¬ 
nommen werden. 

Wurde die Arbeit eines Devices mittels des 
cmd_Stop Befehls angehalten, kann man es mit dem 
Kommando cmd_Start wieder in Gang setzen. 

Durch cmd_Flush wird die Liste der IORequest- 
Strukturen des Devices geleert. Das heißt, alle 
Meldungen werden zurückgesandt und der entspre¬ 
chende Fehlercode übermittelt. 

Ab dieser Kennung fangen Sonderkommandos an 


io_Flags 

Durch die, im Eintrag ioFlags, gesetzten Werte wird die 
Bearbeitung der IORequest-Struktur beeinflußt. So ist hier 
z.B. das Quick-Flag enthalten, welches von der DolO-Funktion 
getestet wird. Näheres dazu finden sie im Kapitel 12. 

io_Error 

Ist ein Fehler aufgetreten, findet man an dieser Stelle den 
Fehlercode. Er wird auch im Datenregister do nach den Funk¬ 
tionen DoIO und WaitIO übergeben. Die Bedeutung der Fehler¬ 
codes ist abhängig vom Device. 


Die zweite Struktur, die wir uns ansehen wollten, heißt 
IOStdRequest (Eingabe/Ausgabe-Standard-Anfrage). Sie enthält 
neben einer "normalen" IORequest-Struktur noch weitere Ein¬ 
träge. 
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IOStdRequest-Struktur: 

00 dc.l 

04 dc.l 

08 dc.b 

09 dc.b 

10 dc.l 

14 dc.l *io ReplyPort ; I IORequest 

18 dc.w io_Length ; 

20 dc.l *io_Device ; 

24 dc.l *io_Unit ; 

28 dc.w io_Command ; 

30 dc.b io_Flags 

31 dc.b io_Error 

32 dc.l io_Actual 

36 dc.l io_Length 

40 dc.l io_Data 

44 dc.l ioOffset 

48 io_SIZEOF 

io_Actual 

Nachdem der angegebene Befehl ausgeführt worden ist, enthält 
der Eintrag ioActual die Anzahl der übertragenen Bytes, 
oder auch andere Rückgabewerte (device-abhängig). 

io_Length 

Durch den Wert io_Lenght wird die Anzahl der Bytes 
angegeben, die übertragen werden sollen. 

io_Data 

In io_Data muß die Adresse, ab der die Daten-Übertragung 
erfolgen soll, eingetragen werden. 

ioOffset 

Hier kann ein Offset-Wert angegeben werden, der z.B. beim 
Trackdisk-Device (TDD) den Block angibt, ab dem auf die Dis¬ 
kette zugegriffen werden soll. 

Einige Devicetypen haben spezielle Nachrichten-Strukturen, 
die meist auf den beiden vorangegangenen Strukturen auf¬ 
bauen . 

Bevor wir uns das Demonstrationsprogramm ansehen, wollen wir 
uns nochmal überlegen, welche Schritte notwendig sind, um 
ein Device zu benutzen. 

1. Zunächst müssen wir einen ReplyPort (ein ganz gewöhnli¬ 
cher MessagePort) erstellen, den wir mit AddPort in die 
System-Liste der Public-Ports aufnehmen können (nicht 
müssen!). 


; Anzahl der übertragenen Bytes 

; Anzahl der zu übertr. Bytes 

; Zeiger auf Daten 

; Offsetwert für Device 
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2. Dann initialisieren wir unsere IORequest- oder IOStdReq- 
Struktur (oder was das Device erwartet). 

3. Anschließend öffnen wir das Device, wobei wir neben eini¬ 
gen anderen Parametern einen Zeiger auf unsere Nachrich¬ 
tenstruktur übergeben. 

4. Jetzt können wir durch DolO und Sendio unsere Nachricht 
verschicken und sie mittels WaitIO, ChecklO und AbortIO 
kontrollieren bzw. abbrechen. 

5. Um die Kommunikation mit dem Device abzubrechen, muß man 
lediglich das Device schließen und dann den Port mit der 
RemPort-Funktion entfernen. 


Jetzt können wir uns an das Demonstrationsprogramm wagen. Es 
ist nicht lauffähig und soll nur das Prinzip veranschauli¬ 
chen . 


* 

* Kapitel 8 

* Demonstrationsprograimn für die Anwendung der Device-Funktionen 

* 


ExecBase 

- 

4 

FindPort 

= 

-390 

AllocMem 

- 

-198 

FreeMem 

= 

-210 

AddPort 

= 

-354 

RemPort 

- 

-360 

AllocSignal 

- 

-330 

FreeSignal 

= 

-336 

DolO 

= 

-456 

OpenDevice 

= 

-444 

CloseDevice 

= 

-450 


Start: move.l 

ExecBase,a6 

sub.l 

al,al 

move.1 

#0,d0 

bsr 

CreatePort 

move.1 

d0,io ReplyPort 

beq 

PortError 

lea 

DeviceName,a0 

lea 

IORequest,al 

moveq 

#2,d0 

moveq 

#0,dl 

jsr 

OpenDevice(a6) 

tst.l 

dO 

bne 

DevError 


Name ist belanglos 
Priorität = 0 
Port anlegen 

; Port in IORequest-Struktur 
eintragen 

Name des Devices 

Zeiger auf IORequest-Struktur 

Unit 

Flags 

Device öffnen 
Fehler aufgetreten? 

Dann verzweigen 
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/ • • • 

move.w 

#2 

io Command ; 

io Command = CMD Read 

move.1 

#Mem,Io Data ; 

io Data = 

Mem 

move.1 

#0 

io Offset ; 

io Offset 

= 0 

move.1 

#512,Io Length ; 

io Length 

= 512 

lea 

IORequest,al ; 

IORequest-Struktur 

jsr 

DoI0(a6) 

IORequest ausführen 

lea 

IORequest,aO ; 

IORequest-Struktur 

jsr 

CloseDevice(a6) 

; Device schließen 

DevError: 





move.1 

io 

ReplyPort,aO 

; Zeiger auf Port 

bsr 

DeletePort ; 

Port löschen 

PortError: 





rts 


t 

Programm beenden 

* Datenbereich 




DeviceName: 

dc.b 

"xyz.device 

',0 

Name des Devices 


even 




IORequest: 

dc.l 

0,0 


io Succ, io Pred 


dc.b 

0,0 


io Type, io Pri 


dc.l 

0 


io Name 

io ReplyPort: 

dc.l 

0 


io ReplyPort 


dc.w 

IOEnd-IORequest 

io Length 


dc.l 

0 


io Device 


dc.l 

0 


io Unit 

io Command: 

dc.w 

0 


io Command 


dc.b 

0 


io Flags 


dc.b 

0 


io Error 

io Actual: 

dc.l 

0 


io Actual 

io Length: 

dc.l 

0 


io Length 

io Data: 

dc.l 

0 


io Data 

io Offset: 

dc.l 

0 


io Offset 

IOEnd: 





Mem: 

ds.b 

1000 


Datenbereich 


Bild 8.10: Benutzung der Device-Routinen 


8.6.5 Sonstige Device-Routinen 

Bevor wir dieses Kapitel beenden, wollen wir uns noch die 
weiteren Device-Funktionen der Exec-Library ansehen. 
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AddDevice = -432 (Exec-Library) 

*Device al < Zeiger auf die Device-Struktur (eigent¬ 

lich eine Library-Struktur), die in die 
Liste aufgenommen werden soll. 

Erklärung AddDevice nimmt ein neues Device in die 

Liste aller Device-Strukturen auf. 


CloseDevice = -450 (Exec-Library) 

*IORequest al < Zeiger auf eine IORequest-Struktur. 

Erklärung Durch den Aufruf von CloseDevice wird 

dem Device mitgeteilt, daß der Task das 
Device nicht mehr benötigt. Wie bei den 
Libraries kann ein Device aus dem 
Speicher "geworfen" werden. 


OpenDevice = -444 (Exec-Library) 


♦DevName 

aO 

< 

Zeiger auf den Namen des Devices, wel¬ 
ches geöffnet werden soll. 

*IOReques 

al 

< 

Zeiger auf eine initialisierte IORe¬ 
quest-Struktur . 

Unit 

do 

< 

Nummer der Einheit. Bei der Benutzung 
des trackdisk.device kann man hier z.B. 
die Laufwerkseinheit (0-3) angeben. 

Flags 

dl 

< 

Flags (wird nicht von allen Devices 
benötigt). 

Error 

dO 

> 

Nachdem die Funktion aufgerufen wurde, 
enthält dO entweder eine Null oder die 


Nummer des aufgetretenen Fehlers. 

Erklärung Durch den Aufruf der OpenDevice-Funktion 

wird das angegebene Device geöffnet und 
die angegebene IORequest-Struktur in¬ 
itialisiert. Dabei werden die Werte für 
io_Unit und io_Device eingetragen. 


RemDevice = -438 (Exec-Library) 


♦Device 

al 

< Zeiger auf ein Device. 

Error 

dO 

> Null oder Nummer des Fehlers. 

Erklärung 


Durch RemDevice wird ein Device aus der 
Device-Liste von Exec entfernt. 
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8.7 Resources 

Die Resources bilden eine noch tiefere Schicht der Program¬ 
mierung und werden z.B. von den Devices benutzt. Ihr Aufbau 
und ihre Anwendung ist mit den Libraries vergleichbar. Da 
die Resources jedoch zu speziell sind, wollen wir nicht auf 
sie eingehen. 


8.8 Externe Prozessor-Ausnahmen (Interrupts) 

Wie wir schon im Kapitel über interne Prozessor-Ausnahmen 
besprochen haben, gibt es auch Exceptions, die von externen 
Bausteinen ausgelöst werden können. Diese Interrupts ermög¬ 
lichen es, schnell auf Signale von außen zu reagieren. 

Auch als Programmierer kann man von dieser Einrichtung pro¬ 
fitieren. Man benötigt lediglich eine initialisierte Inter¬ 
rupt-Struktur . 

Interrupt-Struktur: 


00 

dc.l 

*is Succ 

f' 


04 

dc.l 

*is Pred 

1 


08 

dc.b 

is Type 

I 

Node-Struktur 

09 

dc.b 

is Pri 

/ 


10 

dc.l 

*is Name 

1 


14 

dc.l 

*is Data 

f 

Zeiger auf Datenteil 

18 

dc.l 

*is Code 

t 

Zeiger auf Interrupt-Routine 

22 


is SIZEOF 




*is Succ, *is Pred, isType, isPri, *is Name 

Die ersten fünf Einträge dienen dazu, die Interrupt-Struktu¬ 
ren in eine Liste aufzunehmen. 

*is_Data 

Zeiger auf den Datenbereich, der vom Interrupt-Programm be¬ 
nutzt werden soll. 

*is_Code 

Zeiger auf die Interruptroutine, die ausgeführt werden soll. 


Hat man die Interrupt-Struktur initialisiert, kann man sie 
mittels der Funktion SetlntVector einem angegebenen Inter¬ 
rupt zuordnen. 
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SetlntVector 


-162 (Exec-Library) 


Interrupt 

al 

< Zeiger auf die Interrupt-Struktur, 
neu eingesetzt werden soll. 

die 

IntNum 

do 

< Nummer des Interrrupts, für den die 
terrupt-Struktur gelten soll (siehe 
ten). 

In- 

un- 

Interrupt 

dO 

> Nachdem man die Funktion aufgerufen hat, 
erhält man in do die Adresse der alten 
Interrupt-Struktur. 

Erklärung 


Durch die Funktion SetlntVector 
eine neue Interrupt-Struktur für den 

kann 

an- 


gegebenen Interrupt verwendet werden. 
Dabei wird die IntVector-Struktur des 
angegebenen Interrupts initialisiert. 


Durch die Funktion SetlntVector wird eine weitere Struktur 

definiert, die sogenannte IntVector-Struktur. Eine solche 
Struktur, die übrigens im Exec-Datenbereich liegt, gibt es 
für jeden Interrupt des Amiga. Sie ist wie folgt aufgebaut: 

IntVector-Struktur: 

00 dc.l iv_Data 

04 dc.l iv_Code 

08 dc.l iv_Node 

12 iv_SIZE0F 

iv Data 

Zeiger auf den Datenbereich für die Interrupt-Routine. Die¬ 
ser Wert ist mit der in der Interrupt-Struktur angegebenen 
Adresse identisch. 

iv Code 

ZeTger auf die Interrupt-Routine, die ausgeführt werden 
soll. 

iv Node 

Zeiger auf die Interrupt-Struktur. 


; Zeiger auf Interrupt Daten 
; Zeiger auf Programm für Interrupt 
; Zeiger auf Interrupt-Struktur 


Nachdem man die Funktion SetlntVector aufgerufen hat und das 
IPL-Signal des entsprechenden Interrupts anliegt, wird die 
angegebene Routine ausgeführt. 

Dabei schaltet sich eine Exec-Routine dazwischen, welche die 
Registerinhalte verändert. Zunächst werden die Inhalte der 
Register do-l, aO-l und a5-6 auf den Stack abgelegt. Zusätz¬ 
lich befindet sich noch die Rücksprungadresse auf dem Stack. 
Dadurch wird es möglich, das eigene Interrupt-Programm mit 
einer RTS-Anweisung zu verlassen. 
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dl Bitkombination, die die erlaubten Inter, anzeigt 
al Zeiger auf den Anfang der Customchip-Register 

a5 Adresse des Interrupt-Programms 

a6 Zeiger auf die ExecBase-Struktur 


Diese Art eines Interrupts nennt man Händler-Interrupt. Sie 
erlaubt lediglich, daß eine Interrupt-Routine ausgeführt 
wird. Bei einem Multitasking-System ist es jedoch sinnvoll, 
nicht nur eine Routine auszuführen, sondern mehrere hinter¬ 
einander. Natürlich kann man auch einen solchen Interrupt- 
Typ beim Amiga erstellen: den Server-Interrupt. 

Der Unterschied zu einem Händler besteht darin, daß die Ein¬ 
träge der IntVector-Struktur andere Bedeutungen haben. 

iv_Data 

Ist ein Zeiger auf eine ServerList-Struktur, welche die 
Interrupt-Strukturen, die ausgeführt werden sollen, enthält. 

iv Code 

ZeTger auf eine Routine, die die Interrupt-Strukturen nach¬ 
einander aufruft. 

iv_Node 

Der letzte Eintrag hat keine Bedeutung. 

Wie man sieht, unterscheiden sich die beiden Interrupt- 
Struktur-Typen nur wenig. Man kann sagen, daß es sich bei 
einem Server-Interrupt nur um einen Händler-Interrupt han¬ 
delt, der eine Reihe von weiteren Interrupts verwaltet. So 
könnte man z.B. einen Server-Interrupt mittels der Funktion 
SetlntVector durch einen "normalen" Händler-Interrupt aus- 
tauschen. Die Folge wäre, daß nur noch eine Routine ausge¬ 
führt würde. 


Als letzte Struktur fehlt jetzt nur noch die ServerList- 
Struktur, mit der die Interrupts verwaltet werden können. 

ServerList-Struktur: 


00 

dc.l 

*sl Head 

04 

dc.l 

*sl Tail 

08 

dc.l 

*sl_TailPred 

12 

dc.b 

sl Type 

13 

dc.b 

sl Pad 

14 

dc.w 

sl IntClrl 

16 

dc.w 

sl intSet 

18 

dc.w 

sl IntClr2 

20 

dc.w 

sl Pad 


List-Struktur 


"Interrupt-Clear"-Wert 
"Interrupt-Set"-Wert 
"Interrupt-C1ear"-Wert 
Füllwort 


481 







Kapitel 8 


*sl Head, *sl_Tail, *sl_TailPred, slType, slPad 
List-Struktur in der die einzelnen Interrupt-Strukturen ver¬ 
waltet sind. 

sl_lntclrl 

Der Eintrag sl_IntClrl (und auch 2) enthält einen Wort-Wert, 
der, wenn er in das Interrupt-Register geschrieben wird, den 
für diesen Server zuständigen Interrupt sperrt. 

sl_IntSet 

Der Wert dieses Eintrags entspricht dem Wert des Eintrags 
sl_IntClrl. Der Unterschied liegt lediglich darin, daß das 
157 Bit gesetzt ist. Dadurch wird der gesperrte Interrupt 
wieder freigegeben. 

sl IntClr2 
(sTehe sl_IntClrl) 

sl_Pad 

Füllbyte, welches zur Begradigung der Struktur dient. 


Bei den durch Exec installierten Server-Interrupts werden 
die Register do, al und a5 mit Werten belegt, die für das 
Interrupt-Programm interessant sein könnten. Außerdem wird 
auf den Rückgabewert geachtet. Sollte der letzte Interrupt 
keinen Null-Wert zurückgeben, wird kein weiterer Interrupt 
ausgeführt. 


dO Zeiger auf nächsten Interrupt 

al Zeiger auf Datenbereich des Interrupts 

a5 Adresse des Interrupt-Programms 


Für die Coper-, VertB-, Blit-, Exter-, Ports- und NMI-Inter- 
rupts sind die IntVector-Strukturen schon als Server einge¬ 
richtet. Dabei gehören die Routinen (Server-Interrupts) zur 
Verwaltung der Server-Listen zu Exec. 

Um nun einen Interrupt in eine Server-Liste aufzunehmen, 
benötigt man wiederum eine Interrupt-Struktur. Sie wird dann 
mit Hilfe der Funktion AddlntServer in die Server-Liste auf¬ 
genommen . 


AddlntServer = -168 (Exec-Library) 


Interrupt al < Zeiger auf eine initialisierte Inter¬ 

rupt-Struktur, die an die Server-Liste 
des angegebenen Interrupt-Servers ge¬ 
hängt werden soll. 

IntNum do < Nummer des Interrupts, an dessen Inter- 

rupt-Server-Liste der Interrupt ange¬ 
hängt werden soll. 
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Erklärung Durch die Funktion AddlntServer wird 

eine initialisierte Interrupt-Struktur 
an die Server-Liste der angegebenen In¬ 
terrupts gehängt. 


Natürlich kann man auch einen eingebundenen Interrupt wieder 
aus der Liste entfernen. Dazu bietet sich die Funktion Remo- 
velnterruptServer an. 


RemlntServer = -174 (Exec-Library) 


Interrupt 

al 

< Zeiger auf die Interrupt-Struktur, die 
entfernt werden soll. 

IntNum 

dO 

< Nummer des Interrupts. 

Erklärung 


Mit Hilfe der Funktion RemlntServer kann 
man eine durch den Befehl AddlntServer 
angehängte Interrupt-Struktur aus einer 
Interrrupt-Server-Liste entfernen. 


8.8.1 Wie entstehen eigentlich Interrupts? 


Nun haben wir uns angesehen, wie die Interrupt-Verwaltung 
vom System bewältigt wird. Doch was ist ein Interrupt und 
wie entsteht er eigentlich? 

Ein Interrupt wird durch ein Signal eines externen Bausteins 
ausgelöst. Bevor jedoch dieses Signal an den Prozessor wei¬ 
tergegeben wird, schaltet sich Paula dazwischen. 

Paula ist ein Customchip, der Ein- und Ausgabe-Operationen 
übernimmt, wie z.B. die Tonausgabe, sowie die Koordinierung 
der Daten für das Diskettenlaufwerk. Außerdem übernimmt 
Paula die Verwaltung der Interrupts. 

Erhält Paula von einer der 14 Interruptquellen ein Signal, 
so wird kontrolliert, ob der entsprechende Interrupt zuge¬ 
lassen ist. Dies geschieht mit Hilfe des Customchip-Regi- 
sters INTENA (Interrupt Enable) dessen Bits je eine Inter¬ 
rupt-Quelle repräsentieren. 

Geht man davon aus, daß der Interrupt erlaubt war, wird das 
kodierte Signal an die IPL0-IPL2 (Interrupt-Pending-Level) 
Eingänge des Prozessors angelegt. Dabei können mehrere In¬ 
terruptquellen das gleiche IPL-Signal auslösen. 

Das anliegende IPL-Signal unterbricht den Prozessor bei der 
Arbeit. Er vergleicht das anliegende Signal mit der Signal¬ 
maske des Statusregisters. Stellt sich heraus, daß ein In¬ 
terrupt höherer Priorität anliegt, wird die Maske des Sta¬ 
tusregisters geändert, der neue Signal-Wert mit vier multi¬ 
pliziert und zu der Basisadresse der Interrupt-Autovektoren 
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addiert. An der so errechneten Position befindet sich die 
Adresse der Behandlungsroutine, die ausgeführt werden soll. 

Wie schon erwähnt, benutzen einige Interrupts die gleichen 
IPL-Signale für die CPU. Dies ergibt sich durch die drei 
IPL-Leitungen, die lediglich 2 3 Prioritätsstufen für 14 ver¬ 
schiedenen Interruptquellen erlauben. 

Für jede dieser IPL-Interrupts ist eine Speicherstelle fest¬ 
gelegt ($64-$7C), an der die Adresse der auszuführenden Be¬ 
handlungsroutine vermerkt ist. Diese Routinen werden von 
Exec gestellt und kontrollieren zunächst, welcher Interrupt 
das IPL-Signal ausgelöst hat. Natürlich kann der Zeiger auf 
die Behandlungsroutine der einzelnen Interrupts auf eine ei¬ 
gene Routine umgebogen werden. Dann würde man jedoch das Sy¬ 
stem aus der Interrupt-Kette ausklinken, was sich in manchen 
Fällen ungünstig auswirken könnte. 

Die folgende Tabelle zeigt die Interruptquellen mit ihren 
Namen, Exec-Prioritäten, CPU/IPL-Prioritäten, Vektoradres¬ 
sen, Offsetwerten für den Exec-Datenbereich der Exec-Int- 
Vect-Strukturen und ihre Bedeutungen. 


Name 

Exec 

IPL 

Vektor 

Execlnt 

Bedeutung 

Softint 

00 

1 

$64 

$054 

Software Unterbrechung 

DskBlk 

01 

1 

$64 

$060 

DiskBlock übertragen 

TBE 

02 

1 

$64 

$06C 

serieller Port-Puffer leer 

Ports 

03 

2 

$68 

$078 

CIA-A/Expansion Port Int 

Coper 

04 

3 

$6C 

$084 

Copper-Interrupt 

VertB 

05 

3 

$6C 

$090 

Seitenaufbau fertig 

Blit 

06 

3 

$6C 

$09C 

Blitter-Interrupt 

Äud2 

07 

4 

$70 

$0C0 

Audio-Interrupt 0 

AudO 

08 

4 

$70 

$0A8 

Audio-Interrupt 1 

Aud3 

09 

4 

$70 

$0CC 

Audio-Interrupt 2 

Audi 

10 

4 

$70 

$0B4 

Audio-Interrupt 3 

RBF 

11 

5 

$74 

$0D8 

serieller Port-Puffer voll 

DskSync 

12 

5 

$74 

$0E4 

Syncmarkierung gelesen 

Exter 

13 

6 

$78 

$0FO 

CIA-B/Expansion Port Int 

Inten 

14 

6 

$78 

$0FC 

Copper 

NMI 

15 

7 

$7C 

$108 

nicht maskierbarer Interrupt 

Stellen 

wir 

uns 

vor. 

Paula 

bekommt ein VertB-Signal 


(Vertical Blanking Interrupt tritt immer dann auf, wenn die 
letzte Bildschirmzeile vom Rasterstrahl durchlaufen wurde). 
Zunächst wird überprüft, ob der Interrupt im INTENA-Register 
zugelassen ist. Dann werden die IPL-Eingänge mit dem Priori¬ 
tätswert 3 belegt. Dadurch wird die Arbeit des Prozessors 
unterbrochen, und das anliegende Signal mit der Signalmaske 
im SR (Statusregister) verglichen. Sollte im SR eine 
niedriegere Priorität verzeichnet sein, wird die Maske neu 
gesetzt und die Position der Behandlungsroutine ($6C) 
errechnet. Diese Behandlungsroutine ist von Exec (zumindest 
sollte sie von Exec sein) und überprüft, welches Ereignis 
(Copper, VertB oder Blit) den Interrupt ausgelöst hat. Bei 
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unserem Beispiel stellt die Routine fest, daß ein VertB-In- 
terrupt anliegt. An dieser Stelle kommen wieder die IntVec- 
tor-Strukturen zur Geltung, die für jeden Interrupt angelegt 
wurden. Aus ihnen liest nämlich die Behandlungs-routine die 
Adresse der Interrupt-Routine, sowie die Adresse des Daten¬ 
speicher aus und ruft die Routine auf. 

Handelt es sich bei der Routine um einen Interrupt-Server, 
so ruft er nacheinander alle durch die im Datenbereich lie¬ 
gende List-Struktur verketteten Interrupts auf. 


8.8.2 Zusätzliche Interrupt-Funktionen 

Zum Schluß wollen wir einen Blick auf die Disable- und En- 
able-Funktionen werfen, die es erlauben, die Interrupts zu 
sperren bzw. freizugeben. Beide Funktionen benutzen die so¬ 
genannten Customchip-Register. 

Bei Customchip-Registern handelt es sich um Register, die 
benutzt werden, um die Customchips zu steuern. Mit ihnen 
können z.B. Einstellungen für Auflösung, Farben, Grafikbe¬ 
reich, sowie für Ein- und Ausgabe gewählt werden. Sie begin¬ 
nen ab der Adresse SdffOOO. 


Für uns gibt es dort vier recht interessante Register. 


$dff01c 

INTENAR 

Interrupt-Enable 

read Register 

$dff09a 

INTENA 

Interrupt-Enable 

write Register 

$dffOie 

INTREQR 

Interrupt-Request 

read Register 

$dff09c 

INTREQ 

Interrupt-Request 

write Register 


Die beiden INTENA(R)-Register enthalten die Bitmaske der In¬ 
terrupts, die erlaubt sind. Die INTREQ(R)-Register enthalten 
die Bitmaske des gerade anliegenden Interrupts. Genau diese 
beiden Register werden auch von Agnus benutzt, um zu testen, 
ob der empfangene Interrupt vom System zugelassen war. Alle 
vier Register haben den gleichen Aufbau: 


Name 

Bit 

Bedeutung 

SET/CLR 

15 

Durch das SET/CLR-Bit wird angegeben, wie auf das Register 
zugegriffen werden soll: 0=löschen/l=setzen 

INTEN 

14 

Dieses Bit stellt eine Art Hauptschalter dar. Nur wenn es 
gesetzt ist, können Interrupts bearbeitet werden. 

EXTER 

13 

Externer Interrupt (CIA-B-Baustein) 

DSKSYN 

12 

Disk-Synchronisationsmarkierung wurde gefunden 

RBF 

11 

Eingabepuffer voll (serielle Schnittstelle) 

AUD3 

10 

Sounddaten über Kanal 3 vollständig ausgegeben 

AUD2 

09 

Sounddaten über Kanal 2 vollständig ausgegeben 

AUDI 

08 

Sounddaten über Kanal 1 vollständig ausgegeben 

AUDO 

07 

Sounddaten über Kanal 0 vollständig ausgegeben 

BLIT 

06 

Blitter fertig 

VERTB 

05 

Beginn der vertikalen Austastlücke erreicht 

COPER 

04 

Interrupt durch Copper 
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PORTS 

03 

Interrupt von CIA-A-Baustein 

SOFT 

02 

Softinterrupts 

DSKBLK 

01 

Datenübertragung über Disk-DMA beendet 

TBE 

00 

Ausgabepuffer voll (serielle Schnittstelle) 


Wie man sieht kann man jeden Interrupt einzeln oder auch 
alle gleichzeitig sperren bzw. zulassen. 

Als Programmierer kann man von den transparenten Registern 
profitieren. So hat man die Möglichkeit auszuwählen, welche 
Interrupts erlaubt (INTENAR = $dff01c) oder welche gesperrt 
sind (INTENA = $dff09a). Es ist auch möglich, anliegende In¬ 
terrupts zu kontrollieren (INTREQR = SdffOle), sowie soft¬ 
waremäßig "eigene" Interrupts zu provozieren 
(INTREQ = $dff09c). Auch Exec benutzt diese Möglichkeit bei 
den Funktionen Disable und Enable. 


Disable 


-120 (Exec-Library) 


Erklärung Durch die Funktion Disable werden alle 

Interrupts gesperrt und der IDNestCnt 
erhöht. 


Um die simple Routine der Disable-Funktion zu demonstrieren, 
folgt nun ein Auszug aus dem 2.0 ROM. 


Disable: 

; Disable (-120) 



; keine Parameter 

move.w 

#$4000,$dff09A ; 

(INTENA) Interrupts sperren 

addq.b 

#l,$126(a6) 

IDNestCnt++ 

rts 

/ 

Ende 


Bild 8.11: ROM-Auszug der Disable-Routine 


Um die Interrupts wieder zuzulassen bzw. den Zähler zu erhö¬ 
hen, benutzt man die Funktion Enable. 


Enable = -126 (Exec-Library) 


Erklärung Mit Hilfe der Funktion Enable wird der 

IDNestCnt erniedrigt. Wenn der Zähler -1 
erreicht hat, werden die Interrupts wie¬ 
der zugelassen. 


Der ROM-Auszug verdeutlicht die Funktion der Routine: 
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Enable: ; Enable (-126) 

; keine Parameter 


subq.b 

#1,$126(a6) 

IDNestCnt— 

bge 

L123456 

IDNestCnt >= 0 ? 

move.w 

#$C000,$dffO9A 

Interrupts zulassen 

L123456 rts 


Ende 


Bild 8.12: ROM-Auszug der Enable-Routine 


8.8.3 Das Interrupt-Demonstrationsprogramm 

Als Demonstration haben wir uns für einen Screen-Blanker 
entschieden. Er benutzt den VB-Interrupt, um die Tastatur- 
und Mauseingabe zu kontrollieren, sowie einen Zähler zu er¬ 
höhen . 

Hat der Zählerwert einen bestimmten Wert (Time) überschrit¬ 
ten, werden alle DMA-Kanäle im DMACON-Register 
(Customchipregister) ausgeschaltet. Dadurch ist jegliche 
Bildschirmausgabe unterbunden. Zusätzlich wird noch die Hin¬ 
tergrundfarbe auf Schwarz gesetzt (COLOROO/$dff180 = 0). 

Zum besseren Verständnis soll nun die Funktion der DMACON- 
Bits folgen: 

DMACON-Register (schreiben) $dff096 
DMACONR-Register (lesen) $dff002 


Name 

Bit 

Bedeutung 


SET/CLR 

15 

Durch das SET/CLR-Bit wird angegeben wie auf das Register 
zugegriffen werden soll. Das heißt 0=löschen/l=setzen 

BBUSY 

14 

Blitter ist beschäftigt. 


BZERO 

13 

Blitteroperationen ergaben Null (wird zum 
von Gfx-Kollisionen benutzt). 

Kontrollieren 

— 

12 

nicht belegt 


— 

11 

nicht belegt 


BLTPRI 

10 

Blitter hat Priorität (CPU muß warten!) 


DMAEN 

09 

Hauptschalter für alle DMA-Kanäle 


PLEN 

08 

Bit-DMA (einschalten) 


COPEN 

07 

Copper-DMA (einschalten) 


BDTEN 

06 

Blitter-DMA (einschalten) 


SPREN 

05 

Sprite-DMA (einschalten) 


DKSEN 

04 

Disk-DMA (einschalten) 


AUD3EN 

03 

Audio3-DMA (einschalten) 


AUD2EN 

02 

Audio2-DMA (einschalten) 


AUDIEN 

01 

Audiol-DMA (einschalten) 


AUDOEN 

00 

AudioO-DMA (einschalten) 



Unter der Abkürzung DMA (Direct Memory Access) versteht man 
den direkten Speicherzugriff, der durch einen DMA-Controller 
gesteuert wird. 
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* 

* Kapitel 8 

* Demonstrationsprogramm für externe Exceptions (Interrupts) 

* 


ExecBase = 

4 


ÄllocMem = 

-198 


FreeMem 

-210 


AddlntServer = 

-168 


OpenLib 

-552 


Start: 



move.1 

ExecBase,a6 


lea 

IntName,al 


moveg 

#0,d0 


jsr 

OpenLib(a6) ; 

Intuition-Library öffnen 

move.1 

d0,IntBase 


beg 

IntError 


move.1 

#IntEnd-KeyInt,dO 

move.1 

#$10000,dl 


jsr 

AllocMem(a6) ; 

Speicher belegen 

move.1 

d0,d6 


add.l 

fvbis Prg-KeyInt,d0 

move.1 

d0,vbis Code ; 

Adresse des Codes eintragen 

add.l 

#Count-vbis Prg,d0 

move.1 

d0,vbis Data ; 

Adresse der Daten eintragen 

move.1 

#50*30,Time 

Zeit eintragen (50*30 = 30 Sec 


; Der Wert 50*30 ergibt sich aus dem Zeitintervall, in dem der 
; VBI aufgerufen wird. Dies hängt mit der Freguenz der Bild- 
; Wiederholung zusammen (50Hz). 

; 1/50*50*30 = 30 sec 


move.l d6,al 

lea Keyint,aO 

move.l #IntEnd-KeyInt-l,d0 

KeyLoop: 

move.b (a0)+,(al)+ ; Programmdaten kopieren 

dbf dO,KeyLoop 


move.1 
move.1 
jsr 
moveg 
IntError: 

rts 


#5,d0 ; Interruptnummer (VB-Int) 

d6,al 

AddIntServer(a6) ; Server installieren 

#0,d0 


; Programm beenden 


IntName: dc.b "intuition.library",0 

even 
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cnop 0,4 

* 

* Programmdaten für die Interrupts 


KeyInt: 

VBInt: 

vbisSucc: dc.l 

vbis_Pred: dc.l 

vbis_Type: dc.b 

vbis_Pri: dc.b 

vbis_Name: dc.l 

vbis_Data: dc.l 

vbis_Code: dc.l 

vbis_Prg: ; VB-Programm: 

movem.l al/d0,-(a7) ; Register retten 

move.b $bfec01,dl ; Taste auslesen 

cmp.b 18(al),dl ; neue Taste = alte Taste? 

beq vbis_BEnd ; Ja, dann verzweigen, 

move.b dl,18(al) ; Nein, dann neue Taste speichern 

clr.l (al) ; und Zähler löschen 

vbis_BEnd: 

move.l 6(al),a6 ; Zeiger auf IntBase nach a6 

move.l 68(a6),d0 ; MouseX und MouseY auslesen und 

cmp.l 10(al),d0 ; mit alten Werten vergleichen, 

beq vbBranchO ; Keine Bewegung, dann weiter! 

move.l d0,10(al) ; Sonst neue Position speichern 

clr.l (al) ; Zähler löschen 

vbBranchO: 

tst.l (al) ; Counter = 0? 

bne vbBranchl ; Nein, dann verzweigen 

tst.w 4(al) ; Screen = DUNKEL? 

beq vbBranchl ; Nein, dann verzweigen 

move.w #$8200,$dff096 ; DMACON setzen (DMA an) 

move.w #0,4(al) ; Flag löschen 

vbBranchl: 

addq.l #1,(al) ; Zähler erhöhen 

move.l (al),d0 ; Zähler auslesen 

cmp.l I4(al),d0 ; mit übergebenen Wert vergleichen 

blt vbBranch2 ; noch nicht abschalten! 

#$200,$dff096 ; DMACON setzen (DMA aus) 

#1,4(al) ; Flag setzen 

#0,$dffi80 ; Farbe auf Null (schwarz) setzen 

(a7)+,al/d0 ; Register restaurieren 


* Datenbereich 

Count: dc.l 0 ; 00 Zähler für Zeit 

Dark: dc.w 0 ; 04 Flag für Zustand 

IntBase: dc.l 0 ; 06 Intuition-Basis 

Mouse: dc.l 0 ; 10 Mousekoordinaten 


move.w 
move.w 
move.1 
vbBranch2: 

movem.l 

rts 
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dc.l 0 ; 14 Zeit 

dc.w 0 ; 18 alte Taste 

IntEnd: 


Time: 

Key: 


Programm 8.10: Demonstration Interrupts 


8.8.4 Software-Interrupts 

Im Gegensatz zu Hardware-Interrupts, die durch die Interven¬ 
tion eines externen Bausteins entstehen, wird der Software- 
Interrupt durch die Cause-Funktion erzeugt. Sicherlich 
stellt sich die Frage, weshalb es einen solchen softwaremä¬ 
ßigen Interrupt überhaupt gibt. Dies ist leicht zu erklären. 
Software-Interrupts haben eine niedrigere Priorität als alle 
anderen Interrupts. Jedoch unterbrechen sie die Bearbeitung 
von Tasks. Diese Eigenschaft ist wichtig für spezielle Ab¬ 
läufe des Multitasking-Systems. 

Wie alle Hardware-Interrupts ist auch der Software-Interrupt 
mit einer intVector-Struktur in der Exec-Base verankert. 
Diese als eine Art Server-Interrupt eingebundene Routine 
benötigt fünf weitere Strukturen, die sich auch in der Exec- 
Base befinden. Diese sogenannten SoftlntList-Strukturen für 
die Prioritäten -32, -16, 0, +16 und +32 bestehen aus einer 
List-Struktur, mit der die auszuführenden Interrupt-Struktu¬ 
ren zusammengefaßt werden. 

SoftlntList-Struktur: 


00 

dc.l 

*sh Head 

/' 


04 

dc.l 

*sh Tail 

/ 


08 

dc.l 

*sh TailPred 

/ 

List-Struktur 

12 

dc.b 

sh Type 

t 


13 

dc.b 

sh Pad 

/ 


14 

dc.w 

sh Pad 

l 

Füllwort 

*sh 

Head, 

*sh Tail, *sh 

TailPred, sh Type, sh Pad 


List-Struktur, die zur Verwaltung der Interrupt-Strukturen 
benutzt wird. 

shPad 

Füllwort, um Struktur auf Langwortgrenze zu erweitern. 


Will man einen Software-Interrupt auslösen, so benötigt man 
zunächst eine IntVector-Struktur. Es bieten sich zwei Mög¬ 
lichkeiten an, den Interrupt einzurichten. Zum einen kann 
man durch eine Listen-Funktion (oder auch per Hand) den In¬ 
terrupt in die Liste einer der fünf SoftlntList-Strukturen 
einhängen. Die andere Möglichkeit besteht darin, daß man die 
Cause-Funktion aufruft. Sie hängt die IntVector-Struktur in 
die, durch die Priorität bestimmte, Liste ein und löst mit 
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Hilfe des Customchip-Registers INTREQ einen Software-Inter¬ 
rupt aus. Diese Möglichkeit wird z.B. auch beim Message-Sy¬ 
stem benutzt, wenn im mp_Flags Eintrag das Bit pa_SoftInt 
gesetzt wurde. 


Cause = -180 (Exec-Library) 


♦Interrupt al < Zeiger auf eine Interrupt-Struktur, die 
ausgeführt werden soll (es dürfen nur 
Prioritäten zwischen -32, -16, 0, +16 

und +32 verwendet werden). 

Erklärung Durch die Funktion Cause kann ein Soft¬ 

ware-Interrupt ausgelöst werden. 


Durch den provozierten Software-Interrupt wird die Software- 
Interrupt-Verwaltungsroutine ausgeführt. Sie durchläuft die 
Listen mit fallender Priorität und führt alle eingeklinkten 
Interrupt-Routinen aus. 


Natürlich werden auch hier die Registerinhalte geändert. 


al 

Zeiger auf 

Datenbereich des Interrupts 

a5 

Adresse des 

Interrupt-Programms 


Bei Software-Interrupts jedoch wird, im Gegensatz zu Server- 
Interrupts, nicht kontrolliert, was zurückgegeben wurde, um 
gegebenenfalls die Abarbeitung der Interrupts zu unterbre¬ 
chen . 


8.9 Die Residents 

Die Resident-Struktur ist eine besondere Verwaltungsstruk¬ 
tur. Sie wird hauptsächlich dazu benutzt, um sogenannte 
resetfeste Module einzubinden. 

Während des Resetvorgangs werden die Speicherbereiche 
$F00000-$F80000 und $FC0000-$FFFFFF nach residenten Modulen 
durchsucht. Dabei dienen die ersten beiden Einträge der 
Struktur als Erkennungsmarke, da sie nie (oder sehr selten) 
in dieser Konstellation Vorkommen. Es handelt sich dabei um 
den Code des ILLEGAL-Assemblerbefehls ($4afc) und ein Lang¬ 
wort, welches mit der Adresse des vorangegangenen ILLEGAL- 
Befehls belegt ist. 

Resident-Struktur: 

dc.w $4afc ; OpCode von illegal 

dc.l Resident ; Zeiger auf illegal 
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Wurde eine solche Resident-Struktur gefunden, wird sie in 
die Tabelle eingetragen, deren Anfangsadresse im ExecBase- 
Eintrag ResModules (300) abgelegt ist. Zu einem etwas späte¬ 
ren Zeitpunkt werden dann die in der Tabelle zusammengefaß¬ 
ten Module mit der InitCode-Funktion installiert. 

Die Tabelle enthält 4-Byte-Zeiger auf den Anfang der gefun¬ 
denen Resident-Strukturen. Die Tabelle ist mit einem Null- 
Wert abgeschlossen. Sollten neue Adressen an die Tabelle ge¬ 
hängt werden, so kann man einen Zeiger einfügen, der auf 
eine neue Tabelle zeigt. Dieser Zeiger muß durch Setzen des 
32. Bits gekennzeichnet werden. 


Tabelle: 

dc.l 

Residentl 

; Zeiger auf 

Resident¬ 


dc.l 

Resident2 

; Struktur 



dc.l 

Tabelle2 

$80000000 





; Zeiger auf 

neue Tabelle 

f 

OR-Verknüpfung — 1 



Tabelle2: 

dc.l 

Resident3 

; Zeiger auf 

Resident- 


dc.l 

Resident4 

; Struktur 



dc.l 

0 

; Endkennung 



Die angesprochene Initialisierung durch die InitCode-Funk¬ 
tion richtet sich nach den in der Struktur abgelegten Daten. 
Deshalb wollen wir uns zunächst den Aufbau der Struktur an- 
sehen: 


Resident-Struktur: 


00 

dc.w 

rt MatchWord 

; Erkennungscode (ILLEGAL) 

02 

dc.l 

*rt MatchTag 

; Adresse der Struktur 

06 

dc.l 

*rt EndSkip 

; Ende der Daten der Struktur 

10 

dc.b 

rt Flags 

; Funktions-Bits 

11 

dc.b 

rt Version 

; Versionsnummer der Struktur 

12 

dc.b 

rt Type 

; Typ der verwalteten Daten 

13 

dc.b 

rt_Pri 

; Priorität 

14 

dc.l 

*rt Name 

; Zeiger auf Namen 

18 

dc.l 

*rt IDString 

; Identifikationszeichenkette 

22 

dc.l 

rt Init 

; Init-Daten/Routine 

26 


rt SIZEOF 



rt MatchWord 

BeT dem ersten Eintrag der Resident-Struktur handelt es sich 
um ein Wort, welches zur Erkennung der Resident-Struktur 
dient. Dabei wird die Bitkombination für den ILLEGAL-Befehl 
(rtsMatchWord = $4AFC) benutzt. Er kommt nur selten vor und 
ist somit als Erkennungmarke gut geeignet. 
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*rt_MatchTag 

Auch der zweite Eintrag der Struktur dient zur Erkennung. 
Dabei wird an dieser Stelle die Startadresse der Struktur 
erwartet (rt_MatchTag = *rt_MatchWord). 

*rt_EndSkip 

Zeiger auf das Ende der Daten, die zur Resident-Struktur ge¬ 
hören . 

rtFlags 

Durch die Bits des Eintrags rt Flags kann unter anderem die 
Funktion festgelegt werden, die der Eintrag rt_Init haben 
soll. So enthält er normalerweise die Adresse einer Routine, 
die ausgeführt werden soll. 

Resident-Flag Wert Bedeutung 


rtf_AutoInit 128 Struktur benutzt die MakeLib-Funktion 

rtf_ColdStart 1 Einbindung bei Kaltstart 

rtf_SingleTask 2 (benutzt ab Version 2.0) 

rt_Version 

Versionsnummer der Daten, die von dieser Struktur verwaltet 
werden. 

rt_Type 

Durch den Typ wird festgelegt, welche Art Daten von der Re¬ 
sident-Struktur verwaltet werden sollen. Hier können die 
Werte der Knotentypen verwendet werden (z.B. 
nt_Library = 9). 

rtPri 

Wie das Kürzel verrät, handelt es sich hierbei um die Prio¬ 
rität des residenten Moduls. 

*rt_Name 

Zeiger auf die Zeichenkette, die den Namen des Moduls ent¬ 
hält . 

*rt_IDString 

Zeiger auf die Zeichenkette, die den Identifikationstext 
enthält. 

rt_Init 

Der letzte Eintrag der Resident-Struktur kann zwei verschie¬ 
dene Zwecke erfüllen. Zum einen kann hier ein Zeiger auf 
eine Routine eingetragen werden, die zur Initialisierung an¬ 
gesprungen wird. Andernfalls kann hier die Adresse der Ta¬ 
belle stehen, welche die Parameter für die MakeLibrary- 
Funktion enthalten muß. Dies hängt von der im Eintrag 
rt_Flags gewählten Bitkombination ab. 


Wie man an Hand der Erklärungen der Einträge rt_Flags und 
rt_Init erkennen kann, ist es möglich, eine Library, ein De- 
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vice oder ein Resource direkt mit Hilfe der MakeLibrary- 
Funktion zu initialisieren. 

Natürlich kann auch rt_Init auf eine Initialisierungsroutine 
zeigen, die bei der Bearbeitung der Resident-Struktur aufge¬ 
rufen wird. Somit stehen dem Programmierer viele Möglichkei¬ 
ten zur Auswahl. 

Wählt man die erste Möglichkeit, so muß man eine Tabelle an- 
legen, die die Registerinhalte für den MakeLibrary-Aufruf 
enthalten. Da wir an dieser Stelle kein spezielles Demon¬ 
strationsprogramm erstellen wollen, verweise ich auf die Ka¬ 
pitel 9 und 11, in denen man an Hand einer Library und eines 
Devices die Verwendung der Resident-Struktur gut erkennen 
kann. 

Für den Gebrauch der Resident-Strukturen bietet Exec fol¬ 
gende Funktionen an: 


InitCode 


-72 (Exec-Library) 


startclass dO < Bei startclass handelt es sich um einen 
Datenwert, der angibt welche Resident- 
Strukturen bearbeitet werden dürfen. Da¬ 
bei wird startclass mit dem Eintrag 
rt_Flags der Resident-Struktur durch 
AND-Verknüpung verglichen (wenn start¬ 
class AND rt_Flags != 0, dann ausfüh¬ 
ren) . 

Version dl < Ist die Version der Resident-Struktur 

niedriger als die hier angegebene, so 
wird diese Struktur nicht behandelt. 

Erklärung Durch die Funktion InitCode werden die 

residenten Module, die in einer Tabelle 
zusammengefaßt sind, auf welche ResModu- 
les zeigt, bearbeitet. Es werden dabei 
lediglich die durch die Parameter start¬ 
class und Version bestimmten Strukturen 
berücksichtigt. Die Behandlung der 
Strukturen wird durch die Funktion In- 
itResident erledigt. Die Funktion findet 
Verwendung während des Resetvorgangs. 


InitResident = -102 (Exec-Library) 


segList dl < Zeiger auf die Segment-Liste, die beim 

Aufruf der Funktion MakeLibray benötigt 
wird. Der Wert muß hier übergeben wer¬ 
den, da bei selbstinitialisierenden Re¬ 
sident-Strukturen dieser Parameter nicht 
übergeben werden kann. 
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resident al < Zeiger auf die zu initialisierende Resi¬ 
dent-Struktur. 

Erklärung Durch die Funktion initResident wird die 

angegebene initResident-Struktur einge¬ 
richtet. Dabei wird entweder die Funk¬ 
tion MakeLibrary mit den abgelegten Pa¬ 
rametern oder eine Initialisierungsrou¬ 
tine aufgerufen. Dies richtet sich nach 
dem 7. Bit (rtf Autolnit) des Eintrags 
rt_Flags der Resident-Struktur. Für nä¬ 
here Informationen siehe Kapitel 9. 


FindR esident _ = -96 (Exec-Library) _ 

name al < Zeiger auf eine mit Null abgeschlossene 

Zeichenkette. 

resident dO > Zeiger auf die Resident-Struktur mit dem 

angegebenen Namen oder eine Null, wenn 
die Resident-Struktur nicht gefunden 
werden konnte. 

Erklärung Die Funktion FindResident sucht die 

Adresse einer Resident-Struktur mit dem 
angegebenen Namen. 

8.9.1 Gibt es ein Leben nach dem Tod? 

Wenn man einen Reset mit dem Tod vergleicht, so kann man 
diese Frage mit Ja beantworten, denn es gibt die Möglich¬ 
keit, seine Programme so zu schreiben, daß sie auch nach ei¬ 
nem Reset noch im System bleiben. 

Grundsätzlich stehen zwei Möglichkeiten zur Auswahl. Man 
kann sich entweder durch eine Resident-Struktur (KickTagPtr) 
oder mit den Reset-Vektoren (Cool-/Cold-/Warm-Capture) "über 
Wasser halten". 


8.9.2 Überleben mit der Resident-Struktur 

Wie wir aus dem vorangegangenen Kapitel wissen, können Resi¬ 
dent-Strukturen nicht nur zum automatischen Initialisieren 
von Libraries, Devices oder Resources verwendet werden. Sie 
können auch benutzt werden, um eine Routine zu starten. 
Diese Möglichkeit kann man für ein resetfestes Programm be¬ 
nutzen . 

Zusätzlich benötigt man die drei ExecBase-Einträge Kick- 
MemPtr, KickTagPtr und KickCheckSum. Sie werden bei einem 
Reset dazu benutzt, vom Programmierer angegebenen Speicher- 
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bereich sofort wieder zu belegen und Resident-Strukturen in 
die ResModules-Tabelle aufzunehmen. 


KickMemPtr (546) 

Der Eintrag KickMemPtr kann einen Zeiger enthalten, der auf 
eine MemEntry-Struktur zeigt, mit der festgelegt wird, wel¬ 
che Speicherbereiche nach einem Reset sofort wieder belegt 
werden sollen. 


KickTagPtr (550) 

Auch bei diesem Eintrag handelt es sich um einen Zeiger. Er 
enthält die Adresse einer Tabelle mit Resident-Strukturen, 
die während eines Resets ausgeführt werden sollen. Die Ta¬ 
belle ist genauso aufgebaut, wie die für die Resident-Struk¬ 
turen aus dem ROM (ResModules). 

KickChkSum (554) 

Der Eintrag KickChkSum enthält die Prüfsumme über die Werte 
der Resident-Tabelle (KickTagPtr) und über die Einträge der 
MemEntry-Strukturen (KickMemPtr). Um diese Prüfsumme zu er¬ 
rechnen, steht uns die Funktion SumKickData zur Verfügung. 


SumKickData = -612 (Exec-Library) 


Sum do > Neue Checksurame 

Erklärung Die Funktion SumKickData errechnet die 

Checksumme der Werte für die Einträge 
KickMemPtr und KickTagPtr. 


* 

* Kapitel 8 

* Demonstrationsprogramm für residente Module 

* 


ExecBase 

= 

4 

AllocMem 

= 

-198 

SumKickData 

= 

-612 

OpenLib 

= 

-552 

CloseLib 

- 

-414 

GetMsg 

- 

-372 

ReplyMsg 

- 

-378 

WaitPort 

= 

-384 

OpenWindow 

= 

-204 

CloseWindow 

= 

-72 

Drawlmage 

= 

-114 

OpenWorkBench 

= 

-210 
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Start: 

move.1 

ExecBase,a6 ; 

Zeiger auf nächstes Segment 


clr.l 

Start-4 ; 

/ 

! 

löschen, damit der Speicher 
nach Beendigung des Programms 
belegt bleibt. 


move.1 

546(a6),RStart ; 

Zeiger auf MemEntry-Struktur 


move.1 

#RStart,546(a6) 

; speichern und neuen Zeiger set- 

zen 

belle 

move.1 

550(a6),RT second ; Zeiger auf alte Resident-Ta- 


tst.l 

RT second ; 

Speicher. War sie Null? 


beq 

Ende ; 

Ja, dann Ende. 


or.l 

#$80000000,RT second ; Sonst Eintrag als Zeiger auf 
; Resident-Tabelle kennzeichnen. 

Ende: 


move.1 

jsr 

#RTab,550(a6) ; 

SumKickData(a6) 

Neue Tabelle eintragen 


move.1 
rts 

d0,554(a6) ; 

Checksumme eintragen 


* Resident (Programm) 

section "",Code_C ; neue Sektion 


RStart: 

dc.l 

0 

ml Succ 


dc.l 

0 

ml Pred 


dc.b 

0 

ml Type 


dc.b 

0 

ml Pri 


de. 1 

0 

ml Name 


dc.w 

1 

ml NumEntries 


dc.l 

RStart 

meu Reqs/Addr 


dc.l 

REnd-RStart 

me Length 

RTab: 




RT first: 

dc.l 

RStruktur 


RT second: 

dc.l 

0 


RStruktur: 

illegal 


rt MatchWord 


dc.l 

RStruktur 

rt_MatchTag 


dc.l 

REnd 

rt EndSkip 


dc.b 

1 

rt Flags 


dc.b 

0 

rt Version 


dc.b 

0 

rt Type 


dc.b 

5 

rt Pri 


dc.l 

RName 

rt Name 


dc.l 

RID 

rt iDString 


dc.l 

RInit 

rt Init 

RID: 

dc.b 

"Hy Resident! v0.1",0 


even 



RName: 

dc.b 

"My-Resident", 



even 



RInit: 





497 






Kapitel 8 


; Hier schließt sich das Programm an, welches nach 
; einem Reset ausgeführt werden soll. 

REnd: 


Programm 8.11: Demonstration residente Module 


Die Priorität der eigenen Resident-Struktur sollte man nicht 
ohne Bedenken setzen, da von ihr die Position in der ResMo- 
dules-Tabelle abhängt. Durch die Position ist auch die zeit¬ 
liche Abfolge der Abarbeitung der einzelnen Resident-Struk¬ 
turen festgelegt. So kann man z.B. noch nicht auf die Intui¬ 
tion-Library zugreifen, wenn man eine Priorität > 10 gewählt 
hat, da sie noch nicht initialisiert worden ist. Außerdem 
sollte man die Priorität immer höher als -60 ansetzen, da 
sonst die Resident-Struktur nicht behandelt würde, weil der 
Resident "strap" (mit Priorität -60), der den Bootvorgang 
auslöst, nicht mehr zurückkehrt. 

Welche residenten Module des Systems welche Prioritäten be¬ 
sitzen, soll die folgende Tabelle zeigen. Dabei sind wir 
wiederum von der Version 2.0 ausgegangen. Man kann aber mit 
einem der bekannten System-Monitoren Xoper, ARTM oder mit 
dem auf der Programmdiskette vorliegenden Programm 
(PrintResident, Prg_8_13.s) die residenten Module auflisten, 
um sich einen Überblick Uber die Prioritäten zu verschaffen. 


Name Pri Typ 


expansion.library 

110 

Library 

exec.library 

105 

Library 

diag.init 

105 

Unknown 

utility.library 

103 

Library 

potgo.resource 

100 

Resource 

cia.resource 

080 

Resource 

FileSystem.resource 

080 

Resource 

disk.resource 

070 

Resource 

misc.resource 

070 

Resource 

graphics.library 

065 

Library 

gameport.device 

060 

Device 

timer.device 

050 

Device 

battclock.resource 

045 

Resource 

keyboard.device 

045 

Device 

battmem.resource 

044 

Resource 

keymap.1ibrary 

040 

Library 

input.device 

040 

Device 

layers.library 

031 

Library 

ramdrive.device 

025 

Device 

trackdisk.device 

020 

Device 

intuition.library 

010 

Library 

alert.hook 

005 

Unknown 

console.device 

005 

Device 

mathieeesingbas.library 

000 

Library 

syscheck 

-035 

Unknown 

romboot 

-040 

Unknown 
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bootmenu 

strap 

filesystem 

ramlib 

audio.device 
dos.library 
workbench.task 
gadtools.library 
icon.library 
mathffp.library 
workbench.library 
con-handler 
Shell 

ram-handler 


-050 

Unknown 

-060 

Unknown 

-081 

Unknown 

-100 

Unknown 

-120 

Device 

-120 

Library 

-120 

Task 

-120 

Library 

-120 

Library 

-120 

Library 

-120 

Library 

-121 

Unknown 

-122 

Unknown 

-123 

Unknown 


8.9.3 Überleben mit den Reset-Vektoren 

Insgesamt gibt es drei sogenannte Reset-Vektoren. Diese Vek¬ 
toren sind in der Exec-Base-Struktur untergebracht und kön¬ 
nen die Adressen von Routinen enthalten, die während des Re¬ 
setablaufs aufgerufen werden sollen. Ist jedoch die Exec- 
Base-Struktur ungültig (Checksumme nicht korrekt), werden 
die Vektoren nicht berücksichtigt. 

ColdCapture (42) 

Der ColdCapture ist der erste der Vektoren, dessen Routine 
ausgeführt wird. Dabei muß man jedoch beachten, daß man 
nichts auf dem Stack ablegen darf, da er zu diesem Zeitpunkt 
noch nicht initialisiert ist. Deshalb muß man auch die Re¬ 
set-Routine über "jmp (a5)" verlassen und kann nicht die 
RTS-Anweisung benutzen. Sie würde die Rücksprungadresse vom 
(noch nicht installierten) Stack holen. Zusätzlich zu der in 
a5 übergebenen Rücksprungadresse wird in aO die Adresse der 
ColdCapture-Routine übergeben. Zu beachten ist noch, daß, 
bevor die Routine angesprungen wird, der Eintrag ColdCapture 
in der ExecBase gelöscht wird. 

CoolCapture (46) 

Der CoolCapture-Vektor wird nach der ColdCapture-Routine an¬ 
gesprungen. Dabei ist der Stack schon initialisiert. Die 
Routine kann also mit einem normalen "rts" verlassen werden, 
da sie durch ein "jsr (aO)" aufgerufen wurde. 

WarmCapture (50) 

Der letzte der Reset-Vektoren, der nach der Behandlung der 
residenten Module angesprungen wird, kann eigentlich nie er¬ 
reicht werden. Dies liegt an der Resident-Struktur BootStrap 
(Priorität -60), die nicht wiederkehrt. Abgesehen davon wird 
der WarmCapture-Vektor bei der Reset-Routine des Kickstart 
ROMs 2.0 ohnehin nicht mehr berücksichtigt. 


Wenn man den Zeiger einer dieser Vektoren "verbogen" hat, 
muß man allerdings die Checksumme über diese Vektoren neu 
berechnen und im Eintrag LowMemChkSum ablegen. Die folgende 
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kleine Routine berechnet die Checksumme neu und trägt sie in 
den Eintrag LowMemChkSum ein. 


move.1 

4,a6 

; Basisadresse der ExecLib 

lea 

34(a6),a0 

; Adresse von SoftVer 

moveg 

#0,dl 

; dl löschen 

move.w 

#22,dO 

; 23 Durchläufe 

add.w 

(aO)+,dl 

; Werte addieren 

dbf 

dO,Loop 

; dO mal wiederholen 

not.w 

dl 

; Wert negieren 

move.w 

dl,82(a6) 

; neuen Wert in ChkSum 


; eintragen 


Bild 8.13: Berechnung der LowMemChkSuni von Exec 


Natürlich soll auch hier das Demonstrationsprogramm nicht 
fehlen. Zunächst wird Speicher für das Vektor-Programm be¬ 
legt, in den dann das Programm kopiert wird. Danach wird die 
Adresse in die ExecBase-Struktur eingetragen und die 
Checksumme neu berechnet. Während eines Resets wird dann das 
Vektor-Programm ausgeführt. Es belegt erneut den Speicherbe¬ 
reich, in dem es steht, damit es nicht vom System als frei 
eingestuft und überschrieben wird. 


* 

* Kapitel 8 

* Demonstrationsprogramm für den CoolCapture-Vektor 

* 


ExecBase = 4 

AllocMem = -198 

AllocAbs = -204 


Start: move.1 
move.1 
moveg 
jsr 

move.1 


ExecBase,a6 

#VPEnd-VPStart,dO 

#o,dl 

AllocMem(a6) ; Speicher für Programm besorgen 
d0,d6 


lea VPStart,aO 

move.l d6,al 

move.l #VPEnd-VPStart-l,d0 
CopyLoop: 

move.b (a0)+,{al)+ ; Programmdaten kopieren 

dbf dO,CopyLoop 

move.l d6,46(a6) ; Vektor eintragen 
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lea 

34(a6),aO 


moveq 

#0,dl 


move.w 

#22,dO 


Loop: add.w 

(aO)+,dl 

; Checksumme neu berechner 

dbf 

dO,Loop 


not.w 

dl 


move.w 

dl,82(a6) 

; und eintragen 

rts 



* Vektor-Programm 


VPStart: 



move.1 

ExecBase,a6 


lea 

VPStart,al 


move.1 

#VPEnd-VPStart, 

,d0 

jsr 

AllocAbs(a6) 

; Speicher neu belegen 

tst. 1 

dO 


beq 

Error 


; ... Programm ... 


move.1 

#$fffff,d0 


VPLoop: move.w 

d0,$dffl80 

; Hintergrundfarbe setzen 

sub.l 

#1 ,d0 


bne 

VPLoop 


rts 



Error: move.l 

#$4000,dO 


VPELoop: 



move.w 

#$d00,$dff180 

; Hitergrundfarbe rot 

dbf 

dO,VPELoop 


move. 1 

#0,46(a6) 

; Vektor löschen 

rts 




VPEnd: 


Programm 8.12: Demonstration CoolCapture-Vektor 


8.9.4 Die Kickstart-Resetroutine 

Bevor wir zur ExecBase-Struktur kommen, wollen wir uns den 
Resetvorgang ansehen. Dabei sind wir von der Kickstart- Ver¬ 
sion 2.0 ausgegangen. Wenn auch einige Unterschiede zu den 
vorangegangenen Versionen bestehen, so sind die Grundzüge 
gleich. 


501 





Kapitel 8 



* 

* Amiga Exec Kickstart 2.0 Reset-Routine 


LF80000 dc.w 1114 ; Erkennung 

JMP LF800D2 ; Reset-Routine anspringen 

dc.w 0 

dc.w -1 

dc.w $25 

dc.w $af 

dc.w $25 ; Version 

dc.w $84 ; Reversion 

dc.l -1 

LF80018 dc.b “exec 37.132 (23.5.91)",$0d ( $0a,0 

dc.b $0a,“AMIGA ROM Operating System " 

dc.b $0a,“Copyright 1985,1986,1987,1988,1989,1990," 

dc.b "1991 Commodore-Amiga, Inc." 

dc.b $0a,''All Rights reserved. ",$0a,$00 

LF800A6 dc.b "exec.library",0,0,0,0 

; Exec-Resident-Modul: 

LF800B6 dc.w $4afc 

dc.l LF800B6 

dc.l LF83BFC 

dc.b $02 

dc.b $25 

dc.b $09 

dc.b $69 

dc.l LF800A6 

dc.l LF80018 

dc.l LF80420 

reset 


; Ab hier beginnt die Reset-Routine 


LF800D2 

LEA 

$400,A7 

; Stackzeiger setzen 


LEA 

$F80000,A0 

; Anfangsadresse des Moduls 


MOVEQ 

#-l,Dl 

; Zähler 1 = -1 ($FF) 


MOVE0 

#1,D2 

; Zähler 2 = 1 


MOVEQ 

10, D5 

; Sum-Register löschen 

LF800E2 

ADD.L 

(A0)+,D5 

/ 

LF800E4 

BCC.S 

LF800E8 

; Carry-Flag clear ? 


ADDQ.L 

# 1, D5 

; sonst d5++ 

LF800E8 

DBF 

D1,LF800E2 

; Schleife 1 


DBF 

D2,LF800E2 

; Schleife 2 


; rt_MatchWord 
; *rt_MatchTag 
; *rt_EndSkip 
; rt_Flags 
; rt_Version 
; rt_Type 
; rt_Pri 
; *rt_Name 
; *rt_ldstring 
; *rt Init 
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LEA 

LF80000(PC),A0 

LF800F4 LEA 

SFOOOOO,Al 

CMPA.L 

A0, Al 

BEQ.S 

LF8010C 

; Externes Modul 

einbinden 

LEA 

LF8010C(PC),A5 

CMPI.W 

#$1111,(Al) 

BNE.S 

LF8010C 

JMP 

2(A1) 

; Hardware-Register initialisiei 

LF801QC CLR.B 

SBFE001 

LF80112 MOVE.B 

#3,$BFE201 

LEA 

$DFF000,A4 

MOVE.W 

#$7FFF,D0 

MOVE.W 

D0,$9A(A4) 

MOVE.W 

D0,$9C(Ä4) 

MOVE.W 

DO,$96(A4) 

MOVE.W 

#$174,$32(A4) 

MOVE.W 

*$200,$100(A4) 

MOVE.W 

#0,$U0(A4) 

MOVE.W 

#$444,$180(A4) 

MOVE.W 

#$F00,D0 

NOT.L 

D5 

BNE 

LF803B6 


Anfangsadresse des Moduls 
al = $F00000 

Modul fängt bei SFOOOOO an ? 
ja, dann nicht initialisieren 


Rücksprungadresse auf Stack legen 
Modul-Kennung gefunden ? 

Nein, dann weiter 
Modul anspringen 


LED einschalten (hell) 

8520 in Ausgabemodus versetzen 

Basisadresse der Customchips 
Wert zum Interrupt löschen 
INTENA löschen 
INTREQ löschen 
DMACON löschen , /'r 
serrielles Kon* /’register 
BPLCONO 
BPL1DAT 

HintergruK&rbe auf grau stellen 
*Sr für F.beh.rout. 


Par' »tfe’r für F.beh.rout. ablegen 
d5».iw ertieren und verzweigen, 

, d5 nicht Null 


; Vektoren 2-47 auf Alert-Ro- richten 


MOVEA.W 

MOVE.W 

LEA 

LF8015E MOVE.L 
DBF 


#8,A0 
#$2D 

LF803M!(PC),A1 

A1,(A0)+ 

Dl,LF8015E 


Adresse der Vektortabelle 
Zählerregister einrichten (45) 
Zeiger auf Fehlerbehand.routine 
Zeiger in Vektortabelle eintragen 
dl > wiederholen 


; Vektoren kontrollieren 


MOVE.W 

#$F0,D0 

MOVE.W 

#$2D,D1 

LF8016C CMPA.L 

-(A0),A1 

BNE 

LF803B6 

DBF 

Dl,LF8016C 

; Register d2-7 

löschen 

MOVEQ 

#0,D2 

MOVEQ 

#0,D3 

MOVEQ 

#0,D4 

MOVEQ 

10 ,D5 

MOVEQ 

#0,D6 

MOVEQ 

#0,D7 


Parameter für eventuellen Aufruf 
der Fehlerroutine einstellen 
zeigt der Vektor auf die Fehler¬ 
behandlungroutine ? Nein, Fehler 
dl > wiederholen 


Register 

löschen 
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; Kontrollieren ob es sich um einen Kaltstart handelt 


MOVE.L 

4.W,D1 

Basisadresse auslesen 

MOVEA.L 

Dl ,A6 
#0,D1 

nach a6 kopieren 

BTST 

0. Bit testen 

BNE.S 

LF801C4 

ungleich dann verzweigen 

; ChkBase-Eintrag kontrollieren. 

eventuell neu einrichten 

ADD.L 

$26(A6),D1 

ChkBase-Eintrag auslesen 

NOT.L 

Dl 

invertieren 

BNE.S 

LF801C6 

Ergebnis Null ? 

; Prüfsumme berechnen 


LEA 

$22(A6),AO 

Anfang der Variblen 

MOVEQ 

#$18,DO 

Anzahl der Worte, die addiert 

LF8019C ADD.W 

(AO)+,D1 

werden sollen. 

DBF 

D0,LF8019C 

Schleife 

NOT .W 

Dl 

Wert invertieren wenn nicht Null 

BNE.S 

LF801C6 

dann verzweigen (Kaltstart) 

; ColdCapture-Vektor Behandlung 


MOVE.L 

$2A(A6),D0 

ColdCapture-Vektor auslesen 

BEQ.S 

LF801B8 

nicht gesetzt? Dann überspringen 

MOVEA.L 

DO, AO 

Sonst Adresse nach aO und Rück¬ 

LEA 

LF801B8(PC),A5 

sprungadresse nach a5 legen. 

CLR.L 

$2A(A6) 

Alten Vektor löschen und ver¬ 

JMP 

(AO) 

zweigen 

LF801B8 MOVEM.L 

$222(A6),D2-4 

KickMemPtr,KickTagPtr,KickChkSum 

MOVEM.L 

$2A(A6),D5-7 

ColdCapture,CoolCapture und 
WarmCapture auslesen 

; Prozessor-Typ 

ermitteln und den Wert für AttnFlags erstellen 

LF801C4 SUBA.L 

A6,A6 

a6 löschen 

LF801C6 MOVEA.L 

A6,A5 

a5 löschen 

BSR 

$F80B30 

Prozessor ermitteln (AttnFlags) 

MOVEA.L 

D0,A2 

AttnFlags nach a2 

; Speicher 



SUBA.L 

A0,A0 

aO löschen 

MOVEA.L 

(AO),A1 

Wert von Adresse 0 nach al 

CLR.L 

(AO) 

Adresse Null löschen 

SUBA.L 

A3,A3 

a3 löschen 

MOVE.L 

#$F2D4B689,D1 

dl mit $F2D4B689 laden 

BRA.S 

LF801E0 

in Schleife einspringen 

LF801DE MOVE.L 

DO,(A3) 

Adresse, auf die a3 zeigt mit 

LF801E0 LEA 

$4000(A3),A3 

Wert von dO laden, a3 += $4000 

CMPA.L 

#$200000,A3 

$200000 = A3 

BEQ.S 

LF801FA 

dann verzweigen 

MOVE.L 

(A3),DO 

Wert auslesen 

MOVE.L 

Dl,(A3) 

neuen Wert eintragen 
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NOP ; no Operation 

CMP.L (AO),D1 ; (AO) = Dl 

BEQ.S LF801FA ; ja, dann verzweigen 

CMP.L (A3),Dl ; (A3) = Dl 

BEQ.S LE801DE ; ja, dann verzweigen 

LF801FA MOVE.L DO,(A3) ; Wert von DO eintragen 

MOVE.L Al,(AO) ; Wert von Adresse 0 eintragen 

MOVE.L D2,-(A7) ; D2 retten 

LEA $400.W,A0 ; Zeiger auf MemList 

LEA LF8031C(PC),A1 ; Name ("chip memory") 

MOVE.L A3,DO ; obere Grenze 

MOVE.L A0,D1 ; untere Grenze 

SUB.L Dl,DO ; Länge des Speicherbereichs 

MOVE.W #$303,Dl ; Attribute 

MOVEQ #-$A,D2 ; Priorität des Speicherbereichs 

BSR SF81F32 ; > AddMemList 

MOVE.L (A7)+,D2 ; D2 restaurieren 

LEA $400.W,A0 ; FreeList 

MOVE.L #$57C,D0 ; ByteSize 

BSR $F81C02 ; > Allocate 

MOVEA.L D0,A6 ; Pointer nach a6 

SUBA.W #$FCE8,A6 ; Basisadresse errechnen 

MOVE.L A6,4.W ; Basisadresse eintragen 

; Library-Struktur löschen ($98 Longs) 

MOVEA.L A6,A0 ; Basisadresse nach aO 

MOVE.W #$98,Dl ; Anzahl der Longs, die gelöscht 

LF80238 CLR.L (A0) + ; werden sollen 

DBF Dl,LF80238 ; Schleife 

; Datenbereich der Exec-Base einrichten 

MOVE.W LF8000E(PC),$22(A6) ; SoftVer eintragen 

MOVE.W A2,$128(A6) ; AttnFlags eintragen 

MOVE.L A3,$3E(A6) ; MaxLocMem 

MOVE.L A5,$26(A6) ; ChkBase 

MOVEM.L D2-4,$222(A6) ; KickMem-, KickTagPtr, KickChkSum 

MOVEM.L DB-7,$2A(A6) ; Cold-/Cool-/WarmCapture 

; Überprüfen ob es einen Alert gab. Wenn ja, dann Daten in ExecBase 
; eintragen, sonst -1 eintragen. 

MOVEQ #-l,D6 ; d6 mit -1 initialisieren 

CMPI.L #$48454C50,0.W ; steht "HELP" ab Adresse 0? 

BNE.S LF80272 ; nein, dann -1 eintragen > 

MOVEM.L $l00.W,D6-7 ; ja, dann Alert-Daten nach d6-7 

BSET #$1F,D6 ; $1F. Bit setzen 

LF80272 MOVEM.L D6-7,$202(A6) ; LastAlert-Werte eintragen 
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; Funktionstabelle aufbauen 


MOVEA.L 

A6, AO 

LEA 

$F81F84(PC),Al 

MOVEA.L 

Al, A2 

BSR 

$F81AD0 

MOVE.W 

D0,$10(A6) 

MOVE.W 

#$264,$12(A6) 


Adresse für Sprungtabelle 
Zeiger auf Vektortabelle 
Offsetwerte relativ zur Vektortab 
> MakeFunction 
lib_NegSize eintragen 
lib_PosSize eintragen 


; Listenköpfe für LibList und MemList initialisieren 


LEA 

$17A(A6),A0 

Adresse des Listenkopfes 

MOVE.L 

A0,8(A0) 

lh TailPred = *lh Head 

ADDQ.L 

#4 ,A0 

aO += 4 

CLR.L 

(AO) 

lh_Tail = 0 

MOVE.L 

A0,-(A0) 

lh Head = *lh Tail 

LEA 

$142(A6),A0 

Adresse des Listenkopfes 

MOVE.L 

AO ,8(AO) 

lh TailPred = *lh Head 

ADDQ.L 

#4,A0 

aO += 4 

CLR.L 

(AO) 

lh Tail = 0 

MOVE.L 

AO,-(AO) 

lh Head = *lh Tail 

Node des belegten Speichers in 

MemList einfügen 

LEA 

$400.W,Al 

Adresse der Node-Struktur 

BSR 

SF81904 

> Enqueue 

MaxExtMem Wert 

berechnen 


LEA 

$COOOOO,AO 

Parameter 1 

LEA 

$DC0000,A1 

Parameter 2 

BSR 

LF80328 

testen 

MOVE.L 

A4,$4E(A6) 

MaxExtMem 


; Ext-Memory in MemListe aufnehmen 


LEA 

$000000,A0 

LEA 

LF80321(PC),Al 

MOVE.L 

A4,DO 

BEQ.S 

LF802E2 

MOVE.L 

A0 ,D1 

SUB.L 

Dl,DO 

MOVE.W 

#$305,Dl 

MOVEQ 

#-5,D2 

BSR 

SF81F26 

; Tabelle der Residenten Module 

LF802E2 MOVE.W 

#$888,$DFF180 

LEA 

LF80308(PC),A0 

BSR 

$F80D22 

MOVE.L 

DO,$ 12C(A6) 


; aO = Basisadresse des Speichers 
; al = Name des Speicherbereichs 
; MaxExtMem nach do 
; nicht vorhanden, dann verzweigen 
; Basisadresse nach dl 
; dO-dl = dO = Länge des Bereichs 
; dl = Attibute des Speichers 
; d2 = Priorität 
; > AddMemList 

einrichten 

; Hintergrundfarbe auf grau stellen 
; Zeiger auf Suchbereichtabelle 
; Resident-Liste erzeugen 
; Zeiger in ResModules einträgen 
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; Residentes Modul mit der StartClass 2 ausführen. (Exec-Resident) 

MOVEQ #2,DO ; StartClass 

MOVEQ #0,D1 ; Version 

JSR -$48(A6) ; > InitCode 

; Sollte ein Fehler bei der Behandlung der Exec-Resident-Struktur 
; auftreten, wird die Hintergrundfarbe auf lila gestellt und die 
; Abarbeitung angehalten. 

MOVE.W #$F0F,$DFF180 ; Hintergrund lila einfärben 

LF80306 BRA.S LF80306 ; tote Schleife 


; Tabelle der Adressbereiche, in denen nach Resident-Strukturen gesucht 
; werden soll 


LF80308 

dc.l 

$F80000 


dc.l 

$1000000 


dc.l 

$fooooo ; 


dc.l 

SF80000 ; 


dc.l 

-1 

LF8031C 

dc.b 

"chip memory",0 

; MaxExtMem berechnen 

LF80328 

MOVEA.L 

A0, A4 


ADDA.L 

#$40000,A0 

LF80330 

MOVEA.L 

A4,A2 


ADDA.L 

#$40000,A2 


MOVE.W 

#$3FFF,-$F66(A2) 


TST.W 

-$FE4(A2) 


BNE.S 

LF80352 


MOVE.W 

#$BFFF,-$F66(A2) 


CMPI.W 

#$3FFF,-$FE4(A2) 


BEQ.S 

LF8038A 

LF80352 

MOVE.W 

#0,-$F66(A0) 


MOVE.L 

#$F2D4,D1 


MOVE.W 

Dl,-$F66(A2) 


CMP.W 

-$F66(A2),D1 


BNE.S 

LF80390 


CMP.W 

-$F66(A0),D1 


BEQ.S 

LF80380 

LF8036E 

MOVE.L 

#$B698,D1 


MOVE.W 

Dl,-$F66(A2) 


CMP.W 

-$F66(A2),D1 


BNE.S 

LF80390 


BRA.S 

LF80384 

LF80380 

CMPA.L 

A0,A2 


BEQ.S 

LF8036E 

LF80384 

MOVEA.L 

A2,A4 

LF80386 

CMPA.L 

A4, Al 


BHI.S 

LF80330 


Speicherbereich 1 
Speicherbereich 2 
Endkennung 


Berechnungsroutine des 

MaxExtMem-Wertes, auf die 

wir nicht näher eingehen wollen. 
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LF8038A MOVE.W 
LF80390 SUBA.L 
CMPA.L 

LF80398 BNE.S 
SUBA.L 
LF8039C RTS 


#$7FFF,-$F66(A2) 

#$40000,AO 

AO, A4 

LF8039C 

A4, A4 


Routine beenden 


; Fehlerbehandlungsroutine für die Vektoren 2-47 


LF8039E 

MOVEM.L 

D0-7/A0-7,$180.W 

; Register retten 


LEA 

$1C0.W,A0 ; 

Zeiger auf Datenbereich setzen 


MOVE.L 

USP,A1 ; 

User-Stack-Pointer nach al 


MOVE.L 

Al,(A0)+ 

USP im Speicher ablegen 


MOVE.L 

(A7),(A0)+ 

Rücksprungadressen vom Stackwerte 


MOVE.L 

4(A7),(A0)+ 

im Datenbereich ablegen 


MOVE.W 

#$FE5,D0 

Code für Hintergrundfarbe 

; "normale"-Fehlerbehandlungsroutine 

LF803B6 

LEA 

$DFF000,A4 ; 

Basisadresse der Customchips 


MOVE.W 

#$200,$100(A4) ; 

Bitplane Kontrollregister setzen 


MOVE.W 

#0,$110(A4) ; 

Bitplane Daten 1 löschen 


MOVE.W 

DO,$180(A4) ; 

übergebene Hintergr.färbe setzen 

; 10 mal LED blinken lassen 



MOVEQ 

#$A,D1 

Schleifenzähler dl einrichten 


MOVEQ 

#-l,D0 
#1,$BFE001 

Schleifenzähler dO einrichten 

LF803D0 

BSET 

LED ausschalten (dunkel) 


DBF 

DO,LF803D0 

Schleife (ca. 0.15 sec) 


LSR.W 

#2,DO ; 

dO vorbereiten 

LF803DE 

BCLR 

#1,$BFE001 

LED anschalten (hell) 


DBF 

DO,LF803DE 

Schleife 


DBF 

Dl,LF803D0 ; 

Schleife 10 mal durchlaufen 


MOVE.L 

#$15000,DO 

Schleifenzähler initialisieren 

LF803F4 

MOVE.W 

#0,$DFF180 ; 

Hintergrund schwarz einfärben 


SUBQ.L 

#1,D0 ; 

dO— 


BGT.S 

LF803F4 

Schleife (ca. 0.15 sec) 


MOVE.W 

#$4000,$DFF09A ; 

Interrupt-Enabel-Register setzen 


BRA 

LF80CC8 ; 


; Tabelle der Speicherbereiche 


LF8040C 

dc.l 

$F80000 

Anfang 


dc.l 

$1000000 ; 

Ende 


dc.l 

$FOOOOO ; 

Anfang 


dc.l 

$F80000 ; 

Ende 


dc.l 

-1 

Endmarkierung 
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Ab hier steht die Initialisierungsroutine der Exec-Resident-Struktur. 
Sie übernimmt die weitere Initialisierung des ExecBase-Datenbereichs 
und richtet unter anderem den Exec-Task ein. 


LEA $DFF000,AO ; Basisadresse der Customchips 

MOVE.W #$AAA,$180(A0) ; Hintergrund hellgrau einfärben 

; Jetzt wird erneut eine Liste aller residenten Module erzeugt. Dabei 
; werden jedoch auch die, im Eintrag KickTagPtr vermerkten, Module 
; berücksichtigt. 

LEA LF8040C(PC),A0 ; Zeiger auf Speicherbereichtabelle 

BSR $F80CDC ; Tabelle der residenten Module er- 

MOVE.L D0,$12C(A6) ; stellen & in ResModules eintragen 

; Speicher für die Exec-Base belegen. 

MOVE.L #$57C,D0 ; Größe des Speicherblocks 

MOVE.L #$10001,Dl ; Attribute des Speichers 

JSR -$C6(A6) ; > AllocMem 

TST.L DO ; Speicher erhalten ? 

BEQ LF8051A ; Nein, dann verzweigen 

MOVEA.L DO,A5 ; Adresse nach a5 

SUBA.W #$FCE8,A5 ; Basis errechnen 

; Daten der Library-Struktur in die Exec-Base übertragen 

LEA 8(A5),A1 ; Zieladresse setzen 

LEA LF80744(PC) ,A0 ; Zeiger auf Daten nach aO 

MOVEQ #$C,D0 ; Anzahl Worte die übertragen 

LF8045E MOVE.W (A0)+,(Al)+ ; werden sollen 

DBF DO,LF8045E ; > wiederholen 

; Funktiostabelle anlegen 

MOVEA.L A5,AO ; Basisadresse nach aO 

LEA $F81F84(PC),A1 ; Zeiger auf Vektortabelle 

MOVEA.L Al,A2 ; Basisadresse für Offsetwerte 

JSR -$5A(A6) ; > MakeFunctions 

; Weitere Daten in die Exec-Base eintragen 

MOVE.W DO,$10(A5) ; lib_NegSize eintragen 

MOVE.W $22(A6),$22(A5) ; SoftVer übernehmen 

MOVE.L $3E(A6),$3E(A5) ; MaxLocMem übernehmen 

MOVE.L $4E(A6),$4E(A5) ; MaxExtMem übernehmen 

MOVEM.L $202(A6),D0-1 ; LastAlert-Daten 

MOVEM.L D0-1,$202(A5) ; übernehmen 

MOVE.W $128(A6),$128(A5) ; AttnFlags übernehmen 

MOVE.L $12C(A6),$12C(A5) ; ResModuls Zeiger übernehmen 

MOVEM.L $222(A6),D0-2 ; KickMemPtr-, KickTagPtr- und 

MOVEM.L DO-2,$222(A5) ; KickChkSum-Werte übernehmen 

MOVE.L $2E(A6),$2E(A5) ; CoolCapture-Vektor übernehmen 
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; Nun werden die Einträge der "alten" System-Listen in die neuen 
; eingetragen 



LEA 

$142(A6),A2 

Adresse der MemList-Struktur alt 


LEA 

$142(A5),A3 

Adresse der MemList-Struktur neu 


MOVEA.L 

(A2),A0 

Zeiger auf ersten Knoten nach aO 


MO VE. L 

AO,(A3) 

Adresse in neuen Kopf eintragen 


MOVE.L 

A3,4(AO) 

neuen Vorgänger setzen 


MOVEA.L 

8(A2),A0 

Zeiger auf letzten Knoten nach aO 


MOVE.L 

A0,8(A3) 

Adresse in neuen Kopf eintragen 


MOVE.L 

A3,(AO) 

Nachfolger auf den ln Tail Ein¬ 


ADDQ.L 

#4,(AO) 

trag des Kopfes setzen 


LEA 

$17A(A6),A2 

Adresse der LibList-Struktur alt 


LEA 

$17A(A5),A3 

Adresse der LibList-Struktur neu 


MOVEA.L 

(A2),AO 

Zeiger auf ersten Knoten nach aO 


MOVE.L 

AO,(A3) 

Adresse in neuen Kopf eintragen 


MOVE.L 

A3,4(AO) 

neuen Vorgänger setzen 


MOVEA.L 

8(A2),A0 

Zeiger auf letzten Knoten nach aO 


MOVE.L 

AO,8(A3) 

Adresse in neuen Kopf eintragen 


MOVE.L 

A3,(AO) 

Nachfolger auf den ln Tail Ein¬ 


ADDQ.L 

#4,(AO) 

trag des Kopfes setzen 

; Stack belegen und Bereich im Datenteil der Exec-Base eintragen 


EXG 

A5,A6 
#$1800,D2 

Inhalt von a5 und a6 austauschen 


MOVE.L 

Größe des Stacks 


MOVE.L 

D2,D0 

#$10000,Dl 

nach do kopieren 


MOVE.L 

Attribute des Speichers 


JSR 

-$C6(A6) 

> AllocMem 


MOVE.L 

D0,$3A(A6) 

SysStackLower Eintrag setzen 


ADD.L 

D2,D0 

DO,$36(A6) 

SysStacküpper Eintrag ausrechnen 


MOVE.L 

und im Datenbereich ablegen 


MOVEA.L 

DO ,A7 

Stackregister auf Speicherbereich 
setzen 

; Alte 

(vorläufige) Funktionstabelle und Library-Struktur freigeben 


MOVEA.L 

A5, Al 
#0,D0 

Basisadresse nach al 


MOVEQ 

do löschen 


MOVE.W 

$ 10(A5),D0 

lib NegSize nach dO 


SUBA.L 

DO, Al 

Anfangsadresse ausrechnen al-do 


ADD.W 

$ 12(A5),D0 

Länge = do + lib_PosSize 


JSR 

-$D2(A6) 

> FreeMem 

; chkBase errechnen und neu setzen 

LF8051A 

MOVE.L 

A6,4.W 

neue Basisadresse eintragen 


MOVE.L 

A6,D0 

neuen ChkBase-Eintrag 


NOT.L 

DO 

errechnen 


MOVE.L 

DO,$26(A6) 

und in Exec-Base ablegen 

; System-Listen 

im Exec-Datenbereich einrichten 


LEA 

LF80712(PC),A1 

Zeiger auf Daten 

LF8052A 

MOVE.W 

(Al)+,DO 

Offset auslesen 
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BEQ.S 

LF80544 

Ende der Datentabelle erreicht? 

LEA 

0(A6,DO.W),AO 

Adresse der Liste im Datenbereich 
nach aO und Listenkopf anlegen 

MOVE.L 

A0,8(A0) 

ln TailPred = *ln Head 

ADDQ.L 

#4, AO 

aO += 4 

CLR.L 

(AO) 

ln Tail = 0 

MOVE.L 

AO,-(AO) 

ln Head = *ln_Tail 

MOVE. W 

(A1)+,D0 

Priorität aus der Datentabelle in 

MOVE.B 

D0,$C(A0) 

den Listenkopf kopieren 

BRA.S 

LF8052A 

Schleife 


; Weitere Einträge der Exec-Base initialisieren 


LF80544 LEA 

MOVE.L 
MOVE.L 
MOVE.L 
MOVE.L 
MOVE.W 
MOVEQ 
MOVE.W 
MOVE. W 


$F83988(PC),A0 ; Adresse der Routine, die für die 
AO,$130(A6) ; Einträge TaskTrapCode und Task- 

A0,$134(A6) ; ExceptCode benutzt werden soll 

#$F822C6,$ 138(A6) ; TaskExitCode setzen 
#$FFFF,$13C(A6); TaskSigAlloc (Signalmaske) setzen 
#$8000,$140(A6); TaskTrapAlloc (Trapmaske) setzen 
#4,DO ; Wert für Quantum und Elapsed 

D0,$120(A6) ; Quantum-Eintrag setzen 

DO,$122(A6) ; Elapsed-Eintrag setzen 


; Vektortabelle für Ausnahmebehandlungen einrichten 


LEA 

MOVEA.L 

MOVEA.W 

BRA.S 


$F80960(PC),A0 ; 
A0,A1 ; 
#8,A2 ; 
LF80582 


Adresse des Datenbereichs nach aO 
Adresse nach al 
Zeiger auf Bus-Error-Vektor 
einspringen in Schleife 


LF8057C LEA 

MOVE.L 
LF80582 MOVE.W 
BNE.S 


0(A0,D0.W),A3 
A3,(A2)+ 

(Al)+,D0 
LF8057C 


; Adresse der Vektorrout. = aO + dO 
; Adresse in Tabelle eintragen 
; Offset nach do laden 
; Tabelle beendet ? 


; Flag-Eintrag der Library-Struktur verändern 


BSET #1,$E(A6) ; libf_summing setzen 


MOVE.L #$40C04E75,-$210(A6) ; MOVE SR,DO / RTS nach -$210 

MOVE.L #$F80AD2,-$1C(A6) ; Supervisor 

MOVE.L #$F813F6,$230(A6) ; Daten in ExecBaseNewReserved- 

; Datenbereich eintragen 


; Untersuchung 

der AttnFlags 

MOVE. W 

$ 12 8(A6),D0 

BTST 

#0,D0 

BEQ.S 

LF80622 

LEA 

$F80A22(PC),AO 

MOVEA.W #8,Al 

MOVE.L 

AO,(Al)+ 

MOVE.L 

AO,(Al)+ 


; AttnFlags auslesen 
; Bit 0 testen 
; Null, dann verzweigen 

; Zeiger auf Routine für die 

; Vektoren 2 und 3 nach aO. 

; Vektor für Bus-Error 
; Vektor für Address-Error 
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MOVE.L #$F80B0C,$20.w ; Vektor für Privilege-Violation 

MOVE.L #$F80AF4,-$1C(A6) ; Sprung für Supervisor ändern 

MOVE.L #$42C04E75,-$210(A6) ; Sprung für Gettcc ändern 


BTST #1,D0 ; Handelt es sich um einen MC68010? 

BEQ.S LF80622 ; Dann verzweigen. 


MOVE.L 

#$F80BE6,-$27A(A6) 

MOVE.L 

#$F80BFC,-$280(A6) 

MOVE.W 

DO,Dl 

ANDI.W 

#$18,Dl 

BEQ.S 

LF80616 

MOVE.L 

#$F814CE,-$34(A6) 

MOVE.L 

#$F81526,$230(A6) 

BSET 

#6,$129(A6) 


Änderungen für höhere Prozessor 
Versionen. 


Sprung für Switch ändern 
Daten ablegen in Reserved... 


BTST #3,DO ; Steht ein MC68881 zur Verfügung? 

BEQ.S LF80616 ; Nein, dann verzweigen 


MOVE.L 
DC.W 
LF80616 DC.W 
DC.W 
DC.W 
DC.W 


#$F80C38,-$2F8(A6) 
$F4F8 ;-i 

$4E7A 

$0002 ; 

$0040 

$0808 


; Vektor ändern 


MatheCoProz-Befehle 


; Library-Checksumme berechnen und Library in die Lib.-Liste aufnehmen 


LF80622 MOVE.L A6,A1 

JSR -$1AA(A6) 

MOVEA.L A6,A1 

BSR $F819E6 

; Debugger initialisieren 

BSR $F8167C 


; Zeiger auf Library-Base 
; > SumLibrary 
; Library-Base nach al 
; > AddLibrary 


; > Debugger initialisieren 


; TD/ID NestCnt setzen und Interrupt-Vektoren im Exec-Datenbereich 
; einrichten 


MOVE.W #$FFFF,$ 126(A6); TD/ID NestCnt setzen 


LEA $DFF000,A0 

MOVE.W #$8200,$96(A0) 

MOVE.W #$COOO,$9A(AO) 

BSR $F82D12 

; ChkSum-Eintrag berechnen und 

MOVEQ #0,D1 

LEA $22(A6),A0 

MOVE.W #$17,DO 

LF80658 ADD.W (A0)+,D1 

DBF D0,LF80658 

NOT.W Dl 

MOVE.W Dl,$52(A6) 


; Basisadresse der Customchips 
; DMACON setzen 
; 1NTENA setzen 
; Interrupts einrichten 

eintragen 

; dl löschen 

; Anfangsadresse der Exec-Daten 
; 24 Datenwerte addieren 
; addieren 
; Schleife 

; dl invertieren und 
; Wert in ChkSum eintragen 
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; Speicher reservieren, in dem die Task-Struktur für den Exec-Task 
; entstehen soll. 

LEA LF8075E(PC),A0 ; Zeiger auf Entry-Daten 
JSR -$DE(A6) ; > AllocEntry 

MOVEA.L DO,Al ; Adresse nach al 

TST.L DO ; auf Fehler testen 

BPL.S LF80688 ; kein Fehler, dann weiter 

; Fehler beim Speicherreservieren aufgetreten, dann Alert ausgeben 

MOVEM.L D7/A5-6,-(A7) ; Register retten 

MOVE.L #$80018001,D7 ; Alertnummer übergeben 

MOVEA.L 4.W,A6 ; Basisadresse von Exec 

JSR -$6C(A6) ; > Alert 

MOVEM.L (A7)+,D7/A5-6 ; Register restaurieren 


; Task-Struktur einrichten 

LF80688 MOVEA.L $10(A1),A0 ; Zeiger auf Speicherbereich holen 

LEA $1008(A0),A2 ; Adresse der Task-Struktur nach a2 

MOVE.L A0,$3A(A2) ; tc_SPLower = Stackadresse-1000 

LEA $1000(AO),AO ; Stackobergrenze nach aO 

MOVE.L AO,$3E(A2) ; tc_SPUpper = Stackadresse 

MOVE.L AO,$36(A2) ; tc_SPReg = Stackadresse 

MOVE.L AO,USP ; UserStackPointer (a7) setzen 

MOVE.W #$100,8(A2) ; tc_Type = 1 (nt_Task) tc_Pri = 0 

MOVE.L #LF800A6,$A(A2); tc_Name = "exec.library" 

; Listenkopf des belegten Speichers (tcMemEntry) in der Task-Struktur 
; initialisieren 

LEA $4A(A2),A0 ; Adresse des tc_MemEntry-Eintrags 

MOVE.L A0,8(A0) ; ln_TailPred = *ln_Tail 

ADDQ.L #4,A0 ; aO += 4 

CLR.L (AO) ; ln_Tail = 0 

MOVE.L A0,-(A0) ; lnHead = *ln_Tail 

; Jetzt wird die Kode-Struktur, deren Adresse im Adreßregister al 
; zwischengespeichert worden, ist in die MemEntry-Liste aufgenommen. 

JSR -$F0(A6) ; > AddHead 

; Adresse des Task im ThisTask-Eintrag ablegen und ihn mit AddTask 
; "starten" 


MOVEA.L A2,Al 
MOVE.L A2,$114(A6) 
SUBA.L A2,A2 
MOVEA.L A2,A3 
JSR -$11A(A6) 


; Adresse der Task-Struktur nach al 
; ThisTask = "exec.Iibrary"-Task 
; a2 löschen (initialPC = 0) 

; a3 löschen (finalPC = 0) 

; > AddTask 
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; Da sich der Exec-Task durch AddTask in einer der System-Listen 
; befindet, er jedoch als laufender Task eingesetzt werden soll, müssen 
; wir ihn dort entnehmen. Außerdem müssen wir ihn in den Eintrag 
; ThisTask eintragen. 


MOVEA.L 

$114(A6),Al 

; Adresse des laufenden Tasks 

MOVE.B 

#2,$F(Al) 

; ts Run = 2 

JSR 

-$FC(A6) 

; > Remove 

ANDI.W 

#0,SR 

; SR bearbeiten 

ADDQ.B 

#1,$127(A6) 

; TDNestCnt erhöhen 

JSR 

-$8A(A6) 

; > Permit 

; CoolCapture-Vektor 


MOVE.L 

$2E(A6),D0 

; CoolCapture-Vektor auslesen 

BEQ.S 

LF806F4 

; nicht gesetzt? 

MOVEA.L 

DO, AO 

; Adresse nach aO kopieren 

JSR 

(AO) 

; verzweigen zur CoolC-Routine 

; Hintergrundfarbe erneut ändern und dann alle residenten Module 
; abarbeiten, bei denen das ColdStart-Flag gesetzt wurde. 

LF806F4 LEA 

$DFFOOO,ao 

; Basisadresse der Customchips 

MOVE.W 

#$CCC,$180(A0) 

; Hintergrund hellgrau einfärben 

MOVEQ 

fl,DO 

; StartClass 

MOVEQ 

#0 ,D1 

; Version 

JSR 

-$48(A6) 

; > InitCode 


; Sollte ein Fehler bei der Bearbeitung der Module auftreten, so wird 
; der Hintergrund lila eingefärbt und die Abarbeitung angehalten. 

MOVE.W #$F0F,SDFF180 ; Hintergrund lila einfärben 

LF80710 BRA.S LF80710 ; tote Schleife 

; Daten zur Initialisierung der System-Listen. Dabei gibt der erste 
; Datenwert den Offset von der Basisadresse aus an und der zweite den 
; Typ der Liste. 


LF80712 dc.W 

$0150 

; Resource-List 

dc.w 

$0008 

; nt Resource 

dc.w 

$015E 

; Device-List 

dc.w 

$0003 

; nt Device 

dc.w 

$0188 

; Port-List 

dc.w 

$0004 

; nt MsgPort 

dc.w 

$0196 

; TaskReady-List 

dc.w 

$0001 

; nt Task 

dc.w 

$01A4 

; TaskWait-List 

dc.w 

$0001 

; nt Task 

dc.w 

$016c 

; Interrupt-List 
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dc.w 

$0002 

nt Interrupt 

dc.w 

$01b2 

Softlnt-List (Pri 

dc.w 

$000b 

nt Softint 

dc.w 

$01c2 

Softlnt-List (Pri 

dc.w 

$000b 

nt Softint 

dc.w 

$01d2 

Softlnt-List (Pri 

dc.w 

$000b 

nt Softint 

dc.w 

$01e2 

Softlnt-List (Pri 

dc.w 

$000b 

nt Softint 

dc.w 

$ 01 f 2 

Softlnt-List (Pri 

dc.w 

$000b 

nt Softint 

dc.w 

$0214 

Semaphore-List 

dc.w 

$000f 

nt SignSem 

; Daten für die Library-Struktur der Exec-Library 

LF80744 dc.b 

$09 

ln Type 

dc.b 

$9c 

ln Pri 

de. 1 

$00f800a6 

*ln Name 

dc.b 

$0600 

lib Flags 

dc.b 

$00 

lib Pad 

dc.w 

$0000 

lib_NegSize 

dc.w 

$0264 

lib PosSize 

dc.w 

$0025 

lib Version 

dc.w 

$0084 

lib Reversion 

dc.l 

$00f80018 

*lib IDString 

dc.l 

$00000000 

lib Sum 

dc.w 

$0001 

lib OpenCnt 


Bild 8.14: Die RESET-Routine 


8.10 Sonderfunktionen 

Nachdem wir alle wichtigen Bereiche besprochen und die rele¬ 
vanten Funktionen aufgeführt haben, folgt nun noch eine 
Reihe von Funktionen, die nicht kategorisiert werden konn¬ 
ten . 

Anfängen wollen wir mit der Funktion InitStruct, die wir 
schon im Library-Kapitel erwähnt haben. 

Die Funktion initialisiert selbständig eine Struktur. Dabei 
wird lediglich ein Zeiger auf einen Speicherbereich benö¬ 
tigt, der die Struktur aufnehmen soll, sowie eine Tabelle, 
nach deren kodierten Einträgen die Struktur entstehen soll. 


515 




Kapitel 8 


Die Tabelle mit den kodierten Anweisungen besteht aus belie¬ 
big vielen Befehlsbytes, gefolgt von Datenwerten. Dabei ist 
die Länge und die Bedeutung der Daten abhängig von dem Be¬ 
fehlsbyte. Die Tabelle wird durch ein Null-Wort beendet. 


dc.b Befehlsbyte 

dc.b Daten,Daten,Daten,... 

dc.b Befehlsbyte 

dc.w Daten,Daten,Daten,... 

dc.b Befehlsbyte 

dc.l Daten,Daten,Daten,... 

dc.w 0 


Das Befehlsbyte läßt sich in zwei Nibbels unterteilen. Das 
erste Nibble (Bits 4-7 des Bytes) enthält zum einen die bei¬ 
den Befehlsbits (6-7) und zwei weitere Bits (4-5), welche 
die Datengröße festlegen. Das untere (zweite) Nibbel (Bits 
0-3 des Befehlsbytes) nimmt den Zähler für die Wiederholung 
auf. 


76543210 



■> Anzahl der Wiederholungen 
-> Größe der Daten 
-> Befehlskodierung 


Befehlskodierung (Bits 6, 7) 


00 ( 000 ) 


01 (064) 


10 (128) 


11 (192) 


Die Daten, die dem Befehlsbyte folgen, werden 
in die Struktur übernommen. Dabei wird die 
Anzahl der Werte, die übertragen werden sol¬ 
len, durch den Zähler im unteren Nibbel fest¬ 
gelegt . 

Der nachfolgende Datenwert wird in die Struk¬ 
tur kopiert. Die Anzahl, wie oft dieser Wert 
kopiert werden soll, enthält wiederum das un¬ 
tere Nibbel des Befehlsbytes. 

Das, dem Befehlsbyte folgende Byte dient als 
Offsetwert, der zu der angegebenen Basis¬ 
adresse addiert wird. Danach werden die fol¬ 
genden Datenwerte an die errechnete Position 
kopiert. Alle weiteren Befehle beziehen sich 
dann auf die Adresse nach dem letzten kopier¬ 
ten Datenwert. 

In der Form ist dieser Befehl identisch mit 
dem vorangegangenen. Es werden lediglich 
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statt eines Offsetbytes drei Bytes als Off¬ 
setwerte benutzt. 

Größe der Daten (Bits 4, 5) 


00 ( 000 ) 


01 (016) 


10 (032) 


Der Befehl bezieht sich auf Langwort-Größe 
(das Daten-Langwort muß an einer geraden 
Adresse liegen). 

Der Befehl bezieht sich auf Wort-Größe (das 
Daten-Wort muß an einer geraden Adresse lie¬ 
gen) . 

Der Befehl bezieht sich auf Byte-Größe. 


11 (048) 


Diese Kodierung wird nicht benutzt. 


Anzahl der Wiederholungen (Bits 0-3) 

Die letzten vier Bits werden, wie schon erwähnt, als Zähler 
benutzt. Dabei wird der Zähler bis -1 heruntergezählt. Das 
bedeutet, daß die Anzahl der Wiederholungen durch n-1 ange¬ 
geben werden muß. 

Zu beachten ist, daß nach dem Befehlsbyte immer ein Füllbyte 
folgen muß, wenn die Operation sich auf Daten bezieht, die 
größer sind als ein Byte (Word/Longword). Außerdem müssen 
alle Befehlsbytes auf einer geraden Adresse liegen. 

Als Beispiel dieser relativ komplizierten Möglichkeit soll 
eine Struktur aufgebaut werden: 


dc.b 

%00000011 ; 

Befehlsbyte 

dc.b 

0 

Füllbyte 

de. 1 

0974,6222,0,1910 

; Datenwert 

dc.b 

%01010100 ; 

Befehlsbyte 

dc.b 

0 

Füllbyte 

dc.w 

4711 

Datenwert 

dc.b 

%10100001 

Befehlsbyte 

dc.b 

40 

Offsetwert 

dc.b 

46,12 ; 

Datenwert 

dc.b 

%11000001 ; 

Befehlsbyte 

dc.b 

0,12,03 

24 Bit Offsetwert 

de. 1 

3344,5566 

Datenwert 


Bild 8.15: Beispiel für InitStruct-Strukturaufbau 

Die vorangegangene Befehlstabelle legt, unter Anwendung al¬ 
ler zur Verfügung stehenden Kombinationsmöglichkeiten, eine 
Struktur mit folgendem Aufbau an. 
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0000 

dc.l 

0974,6222,0,1910 


0016 

dc.w 

4711,4711,4711,4711,4711 


0026 

dcb.b 

14,0 

14 Null-Bytes 

0040 

dc.b 

46,12 

0042 

dcb.b 

4569,0 

4569 Null-Bytes 

4611 

dc.l 

3344,5566 


Bild 8.16: Ergebnis des 

InitStruct- 

-Strukturaufbaus 

InitStruct 

= -78 

(Exec-Library) 


initTable 

al 

memory 

a2 

size 

do 

Erklärung 



< Zeiger auf eine Tabelle mit kodierten 
Befehlsworten und Daten, mit deren Hilfe 
die Struktur erstellt werden soll. 

< Zeiger auf den Speicherbereich, in der 
die Struktur erstellt werden soll. 

< Die Anzahl der durch size angegebenen 
Bytes wird ab der in memory übergebenen 
Adresse gelöscht. 

Durch die Funktion InitStruct kann mit 
Hilfe einer Tabelle mit kodierten Be¬ 
fehlsbytes und Daten, sowie der Länge 
und der Anfangsadresse, eine Struktur 
erstellt werden. 


Die folgenden vier Funktionen werden hauptsächlich von dem 
integrierten Debugger ROM-Wack benutzt, der durch sie die 
Ausgabe erledigt. 


RawIOInit 

= 

-504 (Exec-Library) 

Erklärung 

Mit der 

Funktion RawIOInit wird die 


Baudrate 

eingestellt. 

RawMayGetChar 

= 

-510 (Exec-Library) 

Char do > 

Gelesenes 

Zeichen oder -1. 


Erklärung Die Funktion testet, ob im seriellen Da¬ 

tenpuffer ein Zeichen anliegt. Ist dies 
der Fall, wird in do das gelesene Zei¬ 
chen zurückgegeben oder -1. 
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RawPutChar 


= -516 (Exec-Library) 

— 

Char 

dO 

< 

Zeichen, welches gesendet werden soll. 

Erklärung 



Das angegebene Zeichen wird über die se¬ 
rielle Schnittstelle gesendet. 

RawDoFmt 



= -522 (Exec-Library) 

Format 

aO 

< 

Zeiger auf eine formatierte Zeichen¬ 
kette. 

Data 

al 

< 

Zeiger auf die Daten, die in die Zei¬ 
chenkette eingefügt werden sollen. 

PutProc 

dO 

< 

Zeiger auf eine Routine, die die Daten 
ausgibt 

PutData 

dl 

< 

Zeiger auf eine Routine, die für das 
Einsetzen der Daten zuständig ist. 

Erklärung 



Mit Hilfe der Funktion RawDoFmt kann man 
eine Zeichenkette ausgeben (senden). 

Alert 



= -108 (Exec-Library) 

Parameters 

a5 

< 

Zeiger auf den Task, von dem der Alert 
aufgerufen wird. 

AlertNum 

d7 

< 

Alertnummer (Fehlernummer, siehe An¬ 

hang) . 

Erklärung 



Durch die Alert-Funktion wird ein Alert 
mit der angegebenen Fehlernummer er- 




zeugt. Zusätzlich zu der Fehlernummer 
wird noch die Adresse des Tasks benötigt 




(die Fehlernummern für "Gurus" sind im 
Anhang aufgelistet). 

SetSR 



= -144 (Exec-Library) 


NewSR 

dO 

< Neuer Wert des Statusregisters. 


Mask 

dl 

< Wert für die Maskierung der Werte 
der Erneuerung des Statusregisters. 

bei 

OldSR 

dO 

> Alter Wert des Statusregisters. 


Erklärung 


Durch die Funktion SetSR kann man den 
Wert des Statusregisters neu setzen. Da¬ 
bei werden nur die durch die Maske ange¬ 
gebenen Bits verändert. 
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GetCC 

= -528 (Exec-Library) 

Conditions dO 

> Werte der Statusflags (X,N,Z,V,C). 

Erklärung 

Die Funktion GetCC kann benutzt werden 
um den Zustand der Statusflags auszu¬ 
lesen. 

SuperState 

= -150 (Exec-Library) 

OldSysStack dO 

> Alter Systemstackzeiger. 

Erklärung 

Durch SuperState wird der Prozessor in 
den Supervisormodus versetzt. Dabei wird 
der alte Systemstack zurückgegeben. 

UserState 

= -156 (Exec-Library) 

OldSysStack dO 

< Alter Stackzeiger 

Erklärung 

Durch die Funktion UserState wird der 
Prozessor wieder in den Usermode zurück¬ 
versetzt. 

Debug 

= -114 (Exec-Library) 

Erklärung 

Der Debugger ROM-Wack wird aufgerufen. 

CopyMem 

= -624 (Exec-Library) 


Source 

aO 

< 

Zeiger auf Quelle. 

Dest 

al 

< 

Zeiger auf Ziel. 

Size 

dO 

< 

Länge des Bereichs, der kopiert werden 
soll (Bytes). 

Erklärung 



Der angegebenen Datenbereich wird ko- 


piert. 


CopyMemQuick = -630 (Exec-Library) 


Source 

aO < Zeiger 
sein). 

auf 

Quelle 

(muß 

durch 4 

teilbar 

Dest 

al < Zeiger 
sein). 

auf 

Ziel 

(muß 

durch 4 

teilbar 
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Size dO < Länge des Bereichs, der kopiert werden 

soll (in Bytes, muß durch 4 teilbar 
sein). 

Erklärung CopyMemQuick ist eine verbesserte Ver¬ 

sion des CopyMem-Befehls. Wenn der 
Quell- und der Zielbereich sich über¬ 
schneiden, kann nur nach unten kopiert 
werden (al < aO). 


Auf die Funktionen Procure, Vacate, InitSemaphore, Obtain- 
Semaphore, ReleaseSemaphoreList, FindSemaphore, AddSemaphore 
sowie RemSemaphore wollen wir nicht eingehen, da ihre Anwen¬ 
dung auf sog. "Semaphores" zugeschnitten ist, die für Sy- 
stem-Porgrammierer kaum interessant sind. 


8.11 Die Basisstruktur der Exec-Library 

Wie schon im Kapitel über Libraries erklärt wurde, kann 
sich, je nach Library, an die Grundstruktur ein Datenteil 
anschließen. Bei Exec sind hier wichtige Daten zur Verwal¬ 
tung abgelegt. Auf diese Daten kann über positive Offsets 
zugegriffen werden. 

ExecBase-Struktur: 


000 

dc.l 

»In Succ ; 



004 

dc.l 

*ln Pred ; 



008 

dc.b 

ln Type ; 

Node 


009 

dc.b 

ln_Pri ; 



010 

dc.l 

*ln Name ; j 



014 

dc.w 

lib Flags ; 



016 

dc.w 

lib NegSize ; 


Library-Struktur 

018 

dc.w 

lib PosSize ; 



020 

dc.w 

lib_Version ; 



022 

dc.w 

lib Revison ; 



024 

dc.l 

*lib idstring ; 



028 

dc.l 

lib Sum ; 



032 

dc.w 

lib OpenCnt ; 



; Anfang der ExecBase-Daten 



034 

dc.w 

SoftVer ; 

Kickstart release number 

036 

dc.w 

LowMemChkSum ; 

Checksumme von 34 bis 78 

038 

dc.l 

ChkBase ; 

Sys-Ptr Komplement 

042 

dc.l 

‘ColdCapture ; 

Zeiger auf ColdCapture 

046 

dc.l 

‘CoolCapture ; 

Zeiger auf CoolCapture 

050 

dc.l 

«WarmCapture ; 

Zeiger auf WarmCapture 

054 

dc.l 

SysStkUpper ; 

obere Stackgrenze 
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058 

dc.l 

SysStkLower 

062 

dc.l 

MaxLocMem 

066 

dc.l 

DebugEntry 

070 

dc.l 

DebugData 

074 

dc.l 

AlertData 

078 

dc.l 

MaxExtMem 

082 

dc.w 

ChkSum 

; Interrupt-Vektoren 

084 

dc.l 

iv Data 

088 

dc.l 

iv_Code 

092 

dc.l 

iv Node 

096 

dc.l 

iv Data 

100 

dc.l 

iv Code 

104 

dc.l 

iv Node 

108 

dc.l 

iv Data 

112 

dc.l 

iv Code 

116 

dc.l 

iv Node 

120 

dc.l 

iv Data 

124 

dc.l 

iv Code 

128 

de. 1 

iv Node 

132 

dc.l 

iv Data 

136 

dc.l 

iv Code 

140 

dc.l 

iv Node 

144 

dc.l 

iv Data 

148 

dc.l 

iv Code 

152 

dc.l 

iv Node 

156 

dc.l 

iv Data 

160 

dc.l 

iv Code 

164 

dc.l 

iv Node 

168 

dc.l 

iv Data 

172 

dc.l 

iv Code 

176 

dc.l 

iv Node 

180 

dc.l 

iv Data 

184 

dc.l 

iv Code 

188 

dc.l 

iv Node 

192 

dc.l 

iv Data 

196 

de. 1 

iv Code 

200 

de. 1 

iv Node 

204 

dc.l 

iv Data 

208 

dc.l 

iv Code 

212 

dc.l 

iv~Node 

216 

dc.l 

iv Data 


; untere Stackgrenze 
; Obergrenze Chip-Ram 

; Zeiger auf ROM-Wack 
; Zeiger auf ROM-Wack Daten 
; AlertData 

; Obergrenze Fast-Ram 
; Checksumm 34 bis 78 


; intVector-Struktur 
; für seriellen Port 
; (TBE) 

; IntVector-Struktur 
; für Disk-Block fertig 
; (DskBlk) 

; IntVector-Struktur 
; für Soft-Interrupt 
; (Softint) 

; IntVector-Struktur 
; für CIAA-Interrupt 
; (Ports) 

; IntVector-Struktur 
; für Copper-Interrupts 
; (Coper) 

; IntVector-Struktur 
; für Bildwechsel-Interrupt 
; (VertB) 

; IntVector-Struktur 
; für Blitter-Interrupt 
; (Blit) 

; IntVector-Struktur 
; für Audio-Kanal-Interrupt 
; (AudO) 

; IntVector-Struktur 
; für Audio-Kanal-Interrupt 
; (Audi) 

; IntVector-Struktur 
; für Audio-Kanal-Interrupt 
; (Aud2) 

; IntVector-Struktur 
; für Audio-Kanal-Interrupt 
; (Aud 3) 

; IntVector-Struktur 
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220 

dc.l 

iv Code 

224 

dc.l 

iv Node 

228 

dc.l 

iv Data 

232 

dc.l 

iv Code 

236 

dc.l 

iv Node 

240 

dc.l 

iv Data 

244 

dc.l 

iv Code 

248 

dc.l 

iv Node 

252 

dc.l 

iv Data 

256 

dc.l 

iv Code 

260 

dc.l 

iv Node 

264 

dc.l 

iv Data 

268 

dc.l 

iv Code 

272 

dc.l 

iv Node 

; System-Variablen 

276 

dc.l 

»ThiskTask 

280 

dc.l 

IdleCount 

284 

dc.l 

DispCount 

288 

dc.w 

Quantum 

290 

dc.w 

Elapsed 

292 

dc.w 

SysFlags 

294 

dc.b 

IDNestCnt 

295 

dc.b 

TDNestCnt 

296 

dc.w 

AttnFlags 

298 

dc.w 

AttnResched 

300 

dc.l 

ResModules 

304 

dc.l 

TaskTrapCode 

308 

dc.l 

TaskExceptCode 

312 

dc.l 

TaskExitCode 

316 

dc.l 

TaskSigAlloc 

320 

dc.w 

TaskTrapAlloc 

; Header-Strukturen der Daten 

322 

dc.l 

*lh Head 

326 

dc.l 

*lh Tail 

330 

dc.l 

*lh TailPred 

334 

dc.b 

lh Type 

335 

dc.b 

lh Pad 

336 

dc.l 

*lh Head 

340 

dc.l 

*lh_Tail 

344 

dc.l 

*lh TailPred 

348 

dc.b 

lh Type 

349 

dc.b 

lh_Pad 

350 

dc.l 

*lh Head 

354 

dc.l 

*lh_Tail 

358 

dc.l 

*lh TailPred 

362 

dc.b 

lh Type 


; für seriellen Port 
; (RBF) 

; IntVector-Struktur 
; für Diskettensyncronisation 
; (DskSyn) 

; IntVector-Struktur 
; für Externe Bausteine 
; (Exter) 

; IntVector-Struktur 
; für den Master Interrupt 
; (INTEN) 

; IntVector-Struktur 
; für nicht maskierbare Int. 

; (NMI) 


; Zeiger auf laufenden Task 
; Warte-Zähler 
; Dispatch-Zähler 
; Zeitscheibengröße 
; vergangene Zeit 
; System-Flags 

; Zähler (Interrupt Disable) 
; Zähler (Task Disable) 

; Flags für Prozessor 
; Flags für Reschedule 
; Adresse der Resident-List 
; Trap-Handler 
; Exception-Handler 
; Exit-Routine 
; belegte Signale des Tasks 
; belegte Traps 


Listenheader 

für 

Memory 


; Listenheader 
; für 

; Resources 


; Listenheader 
; für 

; Devices 
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363 

dc.b 

lh Pad 

364 

dc.l 

*lh Head 

368 

dc.l 

*lh Tail 

372 

dc.l 

*lh TailPred 

376 

dc.b 

lh Type 

377 

dc.b 

lh_Pad 

378 

dc.l 

*lh Head 

382 

dc.l 

*lh Tail 

386 

dc.l 

*lh_TailPred 

390 

dc.b 

lh Type 

391 

dc.b 

lh_Pad 

392 

dc.l 

*lh Head 

396 

dc.l 

*lh_Tail 

400 

dc.l 

*lh TailPred 

404 

dc.b 

lh Type 

405 

dc.b 

lh_Pad 

406 

dc.l 

*lh Head 

410 

dc.l 

*lh Tail 

414 

dc.l 

*lh TailPred 

418 

dc.b 

lh Type 

419 

dc.b 

lh_Pad 

420 

dc.l 

*lh Head 

424 

dc.l 

*lh_Tail 

428 

dc.l 

*lh TailPred 

432 

dc.b 

lh Type 

433 

dc.b 

lh_Pad 


; Softinterrupt 


434 

dc.l 

*is Head 

438 

dc.l 

*is Tail 

442 

dc.l 

*is TailPred 

446 

dc.b 

is Type 

447 

dc.b 

is Pad 

448 

dc.w 

is Pad 

450 

dc.l 

*is Head 

454 

dc.l 

*is Tail 

458 

dc.l 

*is TailPred 

462 

dc.b 

is Type 

463 

dc.b 

is Pad 

464 

dc.w 

is Pad 

468 

dc.l 

*is Head 

438 

dc.l 

*is Tail 

442 

dc.l 

*is TailPred 

446 

dc.b 

is Type 

447 

dc.b 

is Pad 

448 

dc.w 

is Pad 


Listenheader 

für 

Interrupts 


Listenheader 

für 

Libraries 


Listenheader 

für 

Ports 


Listenheader 

für 

ready Tasks 


Listenheader 

für 

wait Tasks 


Softint (Priorität -32) 


Softint (Priorität -16) 


Softint (Priorität 00) 
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434 

dc.l 

*is Head 



438 

dc.l 

*is Tail 



442 

dc.l 

*is TailPred 



446 

dc.b 

is Type 


Softint (Priorität 16) 

447 

dc.b 

is Pad 



448 

dc.w 

is Pad 



434 

dc.l 

*is Head 



404 

dc.l 

*is Tail 



506 

dc.l 

*is TailPred 



510 

dc.b 

is Type 


Softint (Priorität 32) 

511 

dc.b 

is Pad 



512 

dc.w 

is Pad 



; Informationen 


514 

ds.l 

4 

AlertData 

530 

dc.b 

VBlanckFrequency ; 

Freq.(Bildaufbau) 

531 

dc.b 

PowerSupplyFrequency ; 

Freq.(Netzspannung) 

; SemaphoreList 


532 

dc.l 

*lh Header 



536 

dc.l 

*lh Tail 


Listenkopf 

540 

dc.l 

*lh TailPred 


für 

544 

dc.b 

lh Type 


SemaphoreList 

545 

dc.b 

lhPad 



546 

dc.l 

KickMemPtr ; 

Zeiger auf MemList-Struktur 

550 

dc.l 

KickTapPtr ; 

Zeiger auf Resident-Tabelle 

554 

dc.l 

KickChkSum ; 

Prüfsumme (SumKickData) 

558 

ds.b 

10 ; 

ExecBaseReserved 

568 

ds.b 

20 ; 

ExecBaseNewReserved 

*ln 

Succ - 

lib OpenCnt 



Wie jede Library fängt auch die Exec-Library mit einer Li¬ 
brary-Struktur an. 

SoftVer 

überarbeitungsnummer des Kickstarts. 

LowMemChkSum 

Hier steht der Wert der Prüf summe, die über die Einträge 
SoftVer bis MaxExtMem berechnet wird. Wenn man Werte, die in 
diesem Bereich liegen, verändert hat, sollte man die 
Checksumme neu berechnen. Eine entsprechende Routine finden 
Sie im Abschnitt über die Reset-Vektoren. 

ChkBase 

Durch den ChkBase Eintrag wird überprüft, ob nach einem Re¬ 
set die ExecBase-Struktur neu erstellt werden soll. Dazu 
wird die Addresse der ExecBase zu dem gespeicherten Wert ad¬ 
diert. Erhält man den Wert $FFFFFFFF (-1L), ist es nicht nö¬ 
tig, die Struktur neu zu installieren. 
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ColdCapture, CoolCapture, WarmCapture 

Hier stehen drei Vektoren, die während eines Resets ange¬ 
sprungen werden können. Damit ist die Möglichkeit gegeben, 
resetfeste Programme zu realisieren. 

SysStkUpper, SysStkLower 

Durch SysStkUpper und SysStkLower sind die Grenzen des Su¬ 
pervisor-Stacks angegeben. 

MaxLocMem 

Maximal erreichbarer Chip-Mem-Bereich. 

DebugEntry, DebugData 

Durch DebugEntry ist der Anfang des integrierten Debuggers 
angegeben. Sinngemäß enthält DebugData den Zeiger auf den zu 
verwendenden Speicherbereich für die Daten des Debuggers. 

AlertData 

Daten des, nach einem Reset darzustellenden Alerts. 

MaxExtMem 

Maximal erreichbarer Bereich der Speichererweiterung. 

ChkSum 

ChkSum enthält eine Checksumme über die Einträge 34 bis 78. 
Für die Berechnung gilt die gleiche Routine wie bei LowMem- 
ChkSum. 

IntVects 0-15 

(IVTBE, IVDSKBLK, IVSOFTINT, IVPORTS, IVCOPER, IWERTS, IV- 
BLIT, IVAUDO, IVAUD1, IVAUD2, IVAUD3, IVRBF, IVDISKSYNC, 
IVEXTER, IVINTEN, IVNMI) 

IntVektor-Strukturen der folgenden Interrupts: 

Serieller Port T-Buffer, Disk Block Fertig, Software Inter¬ 
rupt, IO-Ports und Timers, Copper, Start Vertical Blank, 
Blitter fertig, Audio Kanal 0 fertig, Audio Kanal 1 fertig, 
Audio Kanal 2 fertig, Audio Kanal 3 fertig, serieller Port 
R-Buffer, Disk Sync Reg, Externer Interrupt, Master Inter¬ 
rupt, Nicht maskierbarer Interrupt. 

♦ThisTask 

Zeiger auf die TaskControl-Struktur des laufenden Tasks. 

IDNestCnt, TDNestCnt 

Die Einträge IDNestCnt (Interrupt Disable Nesting Counter) 
und TDNestCnt (Task Disable Nesting Counter) dienen als Zäh¬ 
ler für die Funktionsaufrufe Forbid und Disable. Diese Werte 
gelten für den laufenden Task und werden beim Taskswitching 
in die TaskControl-Struktur eingetragen. Dabei können die 
Aufrufe auch verschachtelt werden. Die Funktion des 
Taskswitching bzw. die Interrupts werden erst zugelassen, 
wenn der Zähler auf -1 steht. 

AttnFlags 

Durch die Kombination der Bits des Eintrags AttnFlags ist 
festgelegt, welcher Prozessor benutzt wird. 
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1 68010 

2 68020 

16 68881 

ResModules 

Zeiger auf eine Tabelle, welche die Adressen der residenten 
Module enthält (siehe Resident-Struktur). 

MemList 

Listenkopf einer Kette, in der die freien Speicherbereiche 
enthalten sind. 

ResourceList 

Listenkopf einer Kette, in der alle Resource-Strukturen ent¬ 
halten sind. 

DeviceList 

Listenkopf einer Kette, in der alle Device-Strukturen ent¬ 
halten sind. 

LibList 

Listenkopf einer Kette, in der alle Library-Strukturen ent¬ 
halten sind. 

PortList 

Listenkopf einer Kette, in der alle Port-Strukturen enthal¬ 
ten sind. 

TaskReady 

Listenkopf einer Kette, in der alle Task-Strukturen enthal¬ 
ten sind die darauf warten, den Prozessor wieder zu überneh¬ 
men . 

TaskWait 

Listenkopf einer Kette, in der alle Task-Strukturen enthal¬ 
ten sind, die auf ein Signal eines anderen Tasks warten. 

Softlnts (-32,-16,0,+16,+32) 

Listenköpfe für Software-Interrupts der Prioritäten -32, 
-16, 0, +16 und +32. 

LastAlert 

Diese vier Langworte enthalten die Daten für den, nach einem 
Reset darzustellenden Alert. 

VBlankFrequency 

Der Eintrag VBlankFrequency gibt die Frequenz des Bildauf- 
baus an. 

PowerSupplyFrequency 

enthält die Frequenz der Netzspannung. Anhand dieser Fre¬ 
quenz wird z.B. auch zwischen 200 und 256 Punkten in der 
Bildschirm-Y-Auflösung (PAL/NTSC) unterschieden. 


527 



Kapitel 8 


SemaphoreList 

Listenkopf einer Kette, in der alle Semaphore-Strukturen 
enthalten sind. Semaphore-Strukturen sind Erweiterungen des 
Message-Systems. Da sie aber sehr selten benötigt werden, 
haben wir auf eine nähere Erklärung verzichtet. 

KickMemPtr 

Der Zeiger der im Eintrag KickMemPtr steht verweist auf eine 
MemList-Struktur, welche die Speicherbereiche enthält, die 
nach einem Reset wieder als belegt eingetragen werden 
sollen. 

KickTagPtr 

Zeiger auf eine Tabelle mit Zeigern auf Resident-Strukturen, 
die vom Programmierer eingesetzt werden können (siehe reset¬ 
feste Programme). 

KickChkSum 

Hier steht die Checksumme, die über die KickMemPtr- und 
KickTagPtr-Einträge von SumKickData berechnet werden kann. 

ExecBaseReserved 

Dieser Bereich (10 Byte) ist für Exec reserviert, um Daten 
zwischenzuspeichern. 

ExecBaseNewReserved 

Dieser Bereich (20 Byte) ist für Exec reserviert, um Daten 
zwischenzuspeichern. 


Einige Bereiche von Exec sind recht interessant und helfen 
die Arbeit von Exec zu verstehen. Deshalb sollte man sich 
die Routinen, wenn man sich für sie interessiert, mit dem 
Debugger, oder besser noch in einem Buch mit dem kommentier¬ 
ten ROM-Listing ansehen. Die meisten Funktionen sind nämlich 
sehr einfach gebaut (z.B. der Forbid- bzw. Permit-Befehl). 
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Nachdem wir so viel über den Aufbau der im Speicher befind¬ 
lichen Libraries und ihre Anwendung gelernt haben, wollen 
wir uns nun daran machen, eine eigene Library zu konstruie¬ 
ren . 

Grundsätzlich ist ein Library ein normales ausführbares 
Programm. Ein Grund dafür ist, daß die Routinen, nach der 
Ladung, relokiert werden müssen. Das geht am schnellsten, 
wenn man sie als ausführbares Programm anlegt. 


9.1 Aufbau einer Library-Datei 


Ausführbarer Teil der Library 


*rt_MatchWord 
*rt_MatchTag 
*rt_EndSkip 
rt_Flags 
rtVersion 
rt_Type 
rt_Pri 
*rt_Name 
*rt_IdString 
*rt Init 


!] 



—> 


Name der Library 


Identifikationszeichenkette 



LibBase-Größe 
Funktionstab. 
InitTabelle 
InitRoutine 


Zeiger/Offsets 





lib Open 
lib Close 
lib Expunge 
lib ExtFunc 

1 — 

— 


Standard¬ 

funktionen 

-> 

-> 





-> 

Initia- 



Zusatz- 

-> 



lisierungs- 



funktionen 

-> 

Funktionen 


Routine 




-> 







-> 



Datenbereich für den Aufruf der 
InitStruct-Routine 


Dabei besteht das Programm aus zwei Teilen. Zunächst ist da 
der Programmteil, der am Anfang der Datei stehen muß. Er 
wird ausgeführt, wenn die Library normal (durch Angabe ihres 
Namens) aufgerufen wurde. Diese Routine kann z.B. Auskunft 
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über Version und die Funktionen der Library geben. Zum ande¬ 
ren enthält die Datei eine Resident-Struktur, die mit ihrem 
Eintrag *rt_EndSkip alle Daten umfaßt, die zur Library gehö¬ 
ren. Diese Resident-Struktur wird benutzt, um die Library 
beim Laden im Speicher richtig zu installieren. 

Das Laden und Einrichten verläuft dann wie folgt. Zunächst 
wird die Library-Datei mit der Funktion LoadSegment in den 
Speicher geladen und relokiert (dies geht, da es sich um 
eine ausführbare Datei handelt). Danach wird die geladene 
Datei nach der Resident-Struktur durchsucht. Ist sie gefun¬ 
den worden, wird die InitResident-Funktion aufgerufen, um 
die Library einzubinden. Dabei muß der BCPL-Zeiger, der von 
der LoadSegment-Funktion zurückgegeben wird, als Parameter 
übergeben werden. 

Wie man sieht, ist das wichtigste an einer Library-Datei die 
Resident-Struktur. Dabei gibt es zwei Möglichkeiten, die Li¬ 
brary mit Hilfe der Resident-Struktur zu initialisieren. Zum 
einen kann man rt Init auf eine Routine zeigen lassen, die 
durch die InitResident-Funktion aufgerufen wird und die Li¬ 
brary "von Hand" einrichtet. Zum anderen kann man das Flag 
Autolnit setzen, welches die InitResident-Funktion veran¬ 
laßt, den Eintrag rt_Init als Zeiger auf eine Tabelle mit 
Registerinhalten für den MakeLibrary-Aufruf zu interpretie¬ 
ren. Nachdem dann die MakeLibrary-Funktion aufgerufen wurde, 
wird die erstellte Struktur, je nach Typ, in eine der 
zuständigen System-Listen aufgenommen. Da die zweite 
Möglichkeit etwas komfortabler ist, haben wir uns bei 
unserer Library für diese entschieden. 


9.2 Die Routine MakeLibrary 

An dieser Stelle ist es notwendig, sich die Funktion MakeLi¬ 
brary, die schon im Kapitel Exec/Library erwähnt wurde, et¬ 
was genauer anzusehen. Sie legt eine, durch die angegebenen 
Parameter definierte Library-Struktur sowie eine Sprungta¬ 
belle an. 

MakeLibrary = -84 
♦funclnit (aO) 

Beim ersten Parameter, welcher im Adreßregister 0 übergeben 
werden muß, handelt es sich um einen Zeiger auf eine Vekto¬ 
rentabelle, die dazu benutzt wird, die Sprungtabelle anzule¬ 
gen. Dies geschieht mit MakeFunction (siehe Exec/Libraries) . 
Sie bietet zwei Möglichkeiten, die in der Tabelle abgelegten 
Daten zu verwenden. Entweder kann die Tabelle aus 4 Byte 
langen Adressen bestehen, welche auf die Routinen zeigen, 
oder aus 2-Byte-0ffsetwerten, die, zur Anfangsadresse der 
Vektorentabelle addiert, die Adresse der Funktionen ergeben. 
Beide Tabellen müssen durch eine -1L ($FFFFFFFF) abgeschlos- 
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sen sein. Zur Erkennung der Offsettabelle muß sie mit dem 

Wert -IW ($FFFF) beginnen. 

Absolute Zeiger: 

VektorAbsTab: 

dc.l Funktion_l 
dc.l Funktion_2 
dc.l Funktion_3 
dc.l Funktion_n 
dc.l -1 

Offsetwerte: 

VektorOffTab: 


dc.w 

-1 

/ 

Erkennungsmarke f. Offs 


dc.w 

Funktion 

1-VektorOffTab 

; Offset f. 

Funkt. 

1 

dc.w 

Funktion" 

"2-VektorOffTab 

; Offset f. 

Funkt. 

2 

dc.w 

Funktion 

3-VektorOffTab 

; Offset f. 

Funkt. 

3 

dc.w 

Funktion" 

n-VektorOffTab 

; Offset f. 

Funkt. 

n 

dc.l 

-1 

t 

Endmarkierung 




*structlnit (al) 

Beim zweiten Parameter handelt es sich wiederum um einen 
Zeiger auf eine Tabelle. Diese Tabelle wird benutzt, um mit 
Hilfe der Funktion InitStruct eine Library-Struktur anzule¬ 
gen. Wie die Tabelle aufgebaut werden muß, haben wir im Ka¬ 
pitel Exec gesehen. 

*liblnit (a2) 

Beim letzten Wert handelt es sich um die Adresse einer Rou¬ 
tine, welche von MakeLibrary aufgerufen werden soll, nachdem 
die Library-Sruktur angelegt worden ist. Ihr werden in den 
Registern do und aO Werte übergeben, die sie nutzen kann, um 
private Initialisierungen vorzunehmen. Dabei muß sie den 
Zeiger auf die Segment-Liste (aO), den die Funktion LoadSeg- 
ment beim Einladen der Library zurückgegeben hat, Zwischen¬ 
speichern, um den belegten Speicher der gesamten Library 
später wieder freigeben zu können. Bei dem Wert im Datenre¬ 
gister dO handelt es sich um die Basisadresse der Library- 
Struktur. Der Wert sollte nicht verändert werden, da er di¬ 
rekt als Rückgabeparameter der OpenLibrary-Funktion benutzt 
wird! 

dataSize (dO) 

Neben den vorangegangenen Parametern wird auch noch die 
Länge des Speicherbereichs benötigt, in der die Library- 
Struktur abgelegt werden soll. Dieser Bereich, der länger 
sein kann als die eigentliche Library-Struktur, wird 
zunächst von der MakeLibrary-Funktion gelöscht. 

codeSize (dl) 

Der letzte Wert, der übergeben werden muß, ist ein Zeiger 
auf die Segmentliste. Dieser Zeiger wird bei der Parameter- 


; Adresse Funkt. 1 
; Adresse Funkt. 2 
; Adresse Funkt. 3 
; Adresse Funkt, n 
; Endmarkierung 
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tabeile einer Resident-Struktur nicht mit übergeben. Erst 
die OpenLibrary-Funktion, die die Library mittels des Load- 
Segment-Bef ehls geladen hat, setzt diesen Parameter. 

♦libNode (dO) 

Nachdem die Funktion MakeLibrary aufgerufen worden ist, er¬ 
hält man in dO die Adresse der Library-Struktur. Zu diesem 
Zeitpunkt ist sie jedoch noch nicht in eine der System-Li¬ 
sten aufgenommen worden. Dazu dienen die Funktionen 
AddLibrary, AddDevice oder AddResource. Die InitResident- 
Funktion erledigt dies auch direkt. 


9.3 Die Bestandteile unserer Library 

Nach diesem kleinen Exkurs in die Tiefen der MakeLibrary- 
Funktion sollten wir uns wieder etwas mehr um unsere eigene 
Library kümmern. 


Anfängen wollen wir mit der Resident-Struktur. 


LibResident: 

dc.w 

$4AFC 

dient zur Erkennung der 

dc.l 

LibResident 

Resident-Struktur 

dc.l 

EndResident 

; Ende der Resident-Daten 

dc.b 

%10000000 

; Autolnit-Flag setzen 

dc.b 

1 

; Version 

dc.b 

9 

; Typ = nt Library 

dc.b 

0 

; Priorität soll Null sein 

dc.l 

LibName 

; Zeiger auf Librarynamen 

dc.l 

LiblDString 

; Zeiger auf ID-String 

dc.l 

LiblnitTab 

; Zeiger auf Tabelle mit den 



; Parametern für den 
; MakeLibrary-Aufruf 


LibName: dc.b "test.library",0 

even 

LiblDString: dc.b "Test-Library (Ron) v0.1",0 

even 


Bild 9.1: Resident-Struktur der Library 


Die Bedeutung der einzelnen Einträge der Resident-Struktur 
dürfte eigentlich kein Problem mehr darstellen. Deshalb spa¬ 
ren wir uns weitere Erklärungen. Jedoch müssen wir auf die 
Parameter-Tabelle für den MakeLibrary-Aufruf etwas näher 
eingehen. 


LiblnitTab: 

dc.l 42 


; LibSize (34) + 
; SegList (4) + 
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dc.l FuncTab 
dc.l DataTab 
dc.l LiblnitRout 


; DosBase (4) =42 

; Tabelle der Vektoren 
; Initialsierungstabelle 
; Initialisierungroutine 


Bild 9.2: Parametertabelle für MakeLibrary 


Der erste Wert der LiblnitTabelle gibt die Größe der Basis- 
Struktur der Library an. Hierbei muß beachtet werden, daß 
man die Länge der eigentlichen Library-Struktur nicht ver¬ 
gißt. Für unsere Library wollen wir noch zwei weitere Werte 
ablegen. Zum einen die Adresse der Segment-Liste, die unse¬ 
rer Initialisierungs-Routine übergeben worden ist 
(LiblnitRout). Zum anderen den Zeiger auf die Dos-Library, 
deren Funktionen von unserer Routine benutzt werden. Daraus 
ergibt sich eine Länge von 42 Byte für die Basis-Struktur 
unserer Library. 

Als nächstes wird ein Zeiger auf die Vektorentabelle erwar¬ 
tet, deren Aufbau wir schon beschrieben haben. 


FuncTab: 


dc.l 

Open 

; -6 i 


dc.l 

Close 

; -12 

Standardfunktionen 

dc.l 

Expunge 

; -18 

der Library 

dc.l 

ExtFunc 

; -24 - 


dc.l 

WriteLn 

; -30 

Erste Spezialfunktion 

dc.l 

-1 

; Endkennung 


Bild 9.3: Vektorentabelle der Library 


Neben den vier Standardfunktionen, die jede Library benö¬ 
tigt, bauen wir nur eine weitere Funktion ein (WriteLn - 
TurboPascal läßt grüßen ! ! !). Sie soll lediglich eine mit 
einem Null-Byte beendete Zeichenkette ausgeben. Dies sollte 
zur Demonstration für unsere Library vorerst ausreichen. 

Nun aber wieder zurück zur Liblnit-Tabelle. Der nächste Ein¬ 
trag ist der Zeiger auf die Daten-Tabelle, die für das Anle¬ 
gen der Library-Struktur verwendet wird. 


DataTab: 


de .b 

%11100000,0 

; 24-Bit Offset-Befehl 

dc.w 

8 

; Offset 

dc.b 

9,0 

; Datenwert (Typ des Knotens) 

dc.b 

%11000000,0 

; 24-Bit Offset-Befehl 

dc.w 

10 

; Offset 

dc.l 

LibNatne 

; Datenwert (Name der Lib) 
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dc.b 

%11100000, 

0 


; 24-Bit Offset-Befehl 



dc.w 

14 



; Offset 



dc.b 

6,0 



; Datenwert (Library-Flags) 



dc.b 

%11010001 

0 


; 24-Bit Offset-Befehl 



dc.w 

20 



; Offset 



dc.w 

3,4 



; Datenwert (Version, Rever.) 



dc.l 

0 



; Endkennung 


Bild 

9.4: 

Datentabelle 

für Liblnit-Tabelle 


Auch 

hier 

gehen wir 

nicht 

auf den Aufbau der Tabelle ein 

, da 

sie 

im Kapitel Exec 

schon 

ausführlich beschrieben wurde. 

Je- 

doch 

muß 

man darauf 

achten, daß man nicht die Einträge 

lib 

NegSize und lib 

PosSize überschreibt, da sie zuvor schon 

initialisiert worden 

sind. Zur Kontrolle folgt nun 

die 

Struktur, 

die durch die 

Initialisierungs-Tabelle erstellt 

werden soll. 





TestLib-Struktur: 





00 

ds.l 

1 



Platz für lib Succ 


04 

ds.l 

1 



Node- und lib Pred 


08 

dc.b 

9 


r 

Struktur lib Type 


09 

dc.b 

0 


r 

lib Pri 


10 

dc.l 

LibName 

. I 

i 

lib Name 


14 

dc.b 

6 

• 1 

t 

lib Flags 


15 

dc.b 

0 



lib Pad 


16 

ds ,w 

1 


r 

Library- Platz für lib NegSize 


18 

ds .w 

1 



Struktur und lib PosSize 


20 

dc.w 

3 


i 

lib Version 


22 

dc.w 

4 



lib Reversion 


24 

ds.l 

1 


! 

Platz für lib IDString 


28 

ds.l 

1 



lib Sum 


32 

ds.w 

1 


t 

und lib OpenCnt 


38 

ds.l 

1 


;-i private Zeiger auf Segment-Liste 


42 

ds.l 

1 


;J Daten Basisadresse der DosLib. 


; Alle Werte, die 

nur 

Speicher belegen (ds.x x) und keinen 

; bestimmten Wert haben 

(dc.x x), benötigen zur Zeit nur 

den 

; vordefinierten Wert Null. 





Bild 9.5: Teststruktur für Library 


Nach den Initialisierungsdaten bleibt jetzt nur noch der 
Zeiger auf die Initialisierungs-Routine, welche von MakeLi- 
brary aufgerufen wird. Dabei erhält man als Parameter in do 
den Zeiger auf die Library-Struktur und in aü die Adresse 
der Segment-Liste. 
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Zunächst retten wir die Adreßregister 4-6 auf den Stack und 
legen dann die Basisadresse unserer Library in a5 ab. 

move.l a4-a6,-(a7) 
move.1 dO,a5 

Nun können wir mit dem Offsetwert 34 über das Adreßregi¬ 
ster 5 die Adresse der Segment-Liste in unsere Library- 
Struktur eintragen. 

move.l a0,34(a5) 

Jetzt öffnen wir die Dos-Library und legen den Zeiger auf 
die Basis-Struktur ebenfalls in unserer Library-Struktur ab. 
Sollte ein Fehler auftreten, so wird die Routine umgehend 
verlassen und in dO eine Null übergeben. 


move.1 

ExecBase,a6 

; Exec-Base nach a6 

moveq 

#0,d0 

; Version ist bedeutungslos 

lea 

DosName(pc) ,al 

; Zeiger auf Zeichenkette 

jsr 

0penLib(a6) 

; Library öffnen 

move.1 

d0,38(a5) 

; DosBase eintragen 

beq 

LiblnitEnd 

; Fehler aufgetreten ? 


Zum Schluß müssen wir die Basisadresse unserer Library nach 
dO kopieren, da dieser Wert nachher zurückgegeben werden 
soll. Außerdem müssen wir noch die Register (a4-a6) restau- 


rieren. 



move. 1 

a5,d0 

; Lirary-Basis übergeben 

LiblnitEnd: 

movem. 1 
rts 

(a7) + f a4-a6 

; Register restaurieren 

Nachdem wir uns um die Initialisierung der Library gekümmert 
haben, sollten wir uns die Standard-Funktionen ansehen. Wie 
wir schon im Library-Kapitel beschrieben haben, sind die er- 


sten vier Offsetwerte (-6, -12, -18, -24) durch Standard¬ 
funktionen belegt. Dabei werden die Funktionen von den Sy¬ 
stem-Routinen OpenLibrary, CloseLibrary und RemLibrary auf- 
gerufen, um der Library die Chance zu geben, auf das Öffnen, 
Schließen und Entfernen selbst zu reagieren. 


Open-Funktion 

Die Open-Funktion hat nur einen kleinen Aufgabenbereich. Sie 
muß das DelayExpunge-Bit im Flag-Eintrag der Library-Struk¬ 
tur löschen, damit die Library nicht entfernt wird. Außerdem 
erhöht sie den OpenCnt-Wert, der die Anzahl der zugreifenden 
Tasks festhält. Schließlich muß sie noch den Zeiger auf die 
Library-Struktur ins Datenregister 0 kopieren. 
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; Die Open-Funktion der Library erhält von der OpenLibrary- 
; Funktion von Exec zwei Parameter. Zum einen die Version 
; (dO) und zum anderen den Zeiger auf die Library- 
; Struktur (a6) 

Open: 


bclr 

#3,14(a6) 

; Expunge-Bit löschen 

addq.w 

#l,32(a6) 

; OpenCnt erhöhen 

move.1 

a6 ,d0 

; Zeiger auf Basis in dO 



; übergeben. 

rts 


; Fertig ! 


____ Close-Funktion - 

Auch die Close-Funktion muß verhältnismäßig wenig erledigen. 
Zunächst wird der OpenCnt-Wert erniedrigt. Sollte kein Be¬ 
nutzer mehr vorhanden sein, wird kontrolliert, ob die Li¬ 
brary entfernt werden darf (DelayExpunge-Bit = 1). Ist dies 
der Fall, wird sie mit Hilfe der Expunge-Funktion entfernt. 
Wichtig ist dabei, daß das Datenregister 0 beim Verlassen 
der Funktion unbedingt mit Null initialisiert ist. Die 
CloseLibrary-Funktion, die "uns" gerufen hat, würde sonst 
den Wert als Zeiger für die Segment-Liste interpretieren und 
den Speicher mittels UnLoadSeg freigeben. 

; Die Close-Funktion erhält Parameter von der CloseLibrary- 
; Funktion. Es handelt sich hierbei um die Basisadresse der 
; Library, die in a6 übergeben wird. 

Close: 


moveq 

#0,d0 

; dO löschen, da hier ein 
; Zeiger auf die Segment- 
; Liste erwartet wird. 

subq.w 

#l,32(a6) 

; OpenCnt erniedrigen 

bne 

CloseEnd 

; Wert ist > Null 

btst 

#3,14(a6) 

; darf die Library entfernt 

beq 

CloseEnd 

; werden ? 

bsr 

Expunge 

; Ja, dann entfernen 

CloseEnd: 

rts 


; Ende 


_ Expunge-Funktion - 

Die Expunge-Funktion (von RemLibrary aufgerufen) fällt etwas 
länger aus, da sie die Library aus dem System entfernen muß. 
Dabei werden auch hier zunächst die Register gerettet (d2, 
a5, a6). Dann wird kontrolliert, ob die Library von einem 
Benutzer noch benötigt wird (OpenCnt>=0 ?). Sollte sie jetzt 
noch nicht entfernt werden können, wird das Expunge-Bit ge¬ 
setzt. Dadurch wird angemeldet, daß die Library entfernt 
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werden soll. Schließt nun der letzte Benutzer die Library, 
so wird automatisch aus der Close-Funktion die Expunge-Funk- 
tion aufgerufen, welche die Library endgültig aus dem System 
"wirft". Diese Methode erinnert ein bißchen an: "Der letzte 
macht die Tür zu!". 


; Die Expunge-Funktion benötigt in a6 die Basisadresse. 


Expunge: 

movem.l dl-d2/a5-a6,-(a7) ; Register retten 

tst.w 32(a6) ; kein Benutzer mehr ? 

beq ExpungeBranch ; doch, dann verzweigen 

Zuerst wird kontrolliert, ob die Library noch benutzt wird. 
Sollte das der Fall sein, so wird das Delay-Expunge-Bit 
("verzögerte Entfernung") gesetzt, um die Library bei näch¬ 
ster Gelegenheit zu entfernen. Außerdem wird das Datenregi¬ 
ster 0 gelöscht, in dem sonst ein Zeiger auf die Segment-Li¬ 
ste erwartet wird. Dann wird die Expunge-Routine verlassen. 

moveq #0,d0 ; Segment-List = 0 

bset #3,14(a6) ; Delay-Expunge-Bit setzen 

bra ExpungeEnd ; jetzt noch nicht entfernen 

Soll die Library wirklich entfernt werden, so wird zunächst 
die Dos-Library geschlossen, die wir ja beim Initialisieren 
geöffnet haben. 


ExpungeBranch: 

move.l a6,a4 
move.l 38(a4),al 
move.l ExecBase,a6 
jsr CloseLib(a6) 


; Zeiger auf Base retten 
; Adresse der DosBase lesen 
; um sie anschließend zu 
; schließen 


Jetzt wird die Library aus der Library-Liste gelöscht, und 
der Zeiger auf die Segment-Liste ins Datenregister 2 
gerettet. 


move.l a4,al 
jsr Remove(a6) 
move.l 34(a4),d2 


; Zeiger auf Library-Node 
; Remove 

; SegmentList retten 


Zwar wird der Speicher, den die Funktionen belegen, von Exec 
durch UnLoadSeg freigegeben, jedoch muß er für die Sprungta¬ 
belle und die Library-Struktur "von Hand" befreit werden. 
Hierzu berechnet man die Anfangsadresse (Library-Base 
lib_NegSize) und die Länge (lib_NegSize + lib_PosSize) mit 
Hilfe der abgelegten Werte. 


moveq 

# 0 ,do 

; do löschen 

move.w 

16(a4),d0 

; lib NegSize auslesen 

move.1 

a4,al 

; Basisadresse nach al 

sub.l 

d0,al 

; lib NegSize abziehen 

add.w 

18(a4),d0 

; lib PosSize + lib NegSize 

jsr 

FreeMem(a6) 

; FreeMem 
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Zum Schluß muß der gerettete Zeiger auf die Segment-Liste in 
dO kopiert werden, da er von Exec benötigt wird, um den 
Speicher, den die Library belegt hat, mit der UnLoadSeg- 
Funktion freizugeben. Dann werden die Register wieder 
restauriert und die Expunge-Routine verlassen. 

move.l d2,d0 ; SegmentList zurückgeben 

ExpungeEnd: 

movem.l (a7)+,dl-d2/a5-a6 ; Register restaurieren 

rts 


_ExtFunc-Funktion_____ 

Die ExtFunc-Funktion wird zur Zeit nicht unterstützt. Man 
sollte trotzdem eine kleine Routine einbinden, die das Da¬ 
tenregister 0 löscht und dann zurückkehrt. 

ExtFunc: 

moveq #0,d0 ; Datenregister 0 löschen 

rts ; Funktion beenden 


Dies waren alle wichtigen Teile, aus denen eine Library be¬ 
steht. Natürlich fehlen jetzt noch die Routinen, die verwal¬ 
tet werden sollen. Zu Demonstrationszwecken haben wir eine 
kleine Funktion eingebunden, die eine mit Null beendete Zei¬ 
chenkette in den Standardausgabekanal (meist ist damit das 
CLI-Fenster gemeint) ausgibt. 


WriteLn = -30 


»String aO < Zeiger auf eine mit Null abgeschlossene 

Zeichenkette. 

Erklärung Durch die Funktion WriteLn wird eine mit 

Null abgeschlossene Zeichenkette ausge¬ 
geben. 


9.4 Der Quellcode der Library 

Wir haben zwar den Aufbau der Library detailliert beschrie¬ 
ben, uns aber dennoch dazu entschlossen, das vollständige 
Listing abzudrucken; denn anhand des zusammenhängenden 
Listings kann man den Aufbau wesentlich leichter verstehen. 
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* 

* Kapitel 9 


* Quelltext der 

* 

"test.library" 

ExecBase = 

4 

OpenLib 

-552 

CloseLib 

-414 

Output = 

-60 

Write = 

-48 

Remove = 

-252 

FreeMem = 

-210 

; Zuerst kommt der "CLI-Teil". 

Start: 

move.1 

ExecBase,a6 

lea 

DosName,al 

moveq 

#0,d0 

jsr 

OpenLib(a6) 

move.1 

d0,a6 

beq 

DosError 

jsr 

Output(a6) 

move.1 

d0,dl 

move.1 

#TextA,d2 

move.1 

#TextE-TextA,i 

jsr 

Write(a6) 

move.1 

a6,al 

move.1 

ExecBase,a6 

jsr 

CloseLib(a6) 


DosError: 

moveq #0,d0 
rts 


; Dos-Library öffnen 


; Standardausgabekanal 
; ermitteln 

; Adresse der Zeichenkette 

; und Länge übergeben. 
; Text ausgeben 

; Dos-Library wieder 
; schließen 


; Fehler-Nummer Null 
; übergeben 


TextA: dc.b 10,"> TestLibrary Version 0.1 (Ron) <",10,10 

TextE: 

even 


; Anfang der eigentlichen Library 
LibResident: 


dc.w 

$4AFC 

(Illegal) 

dc.l 

LibResident 

rt MatchTag 

de. 1 

EndResident 

rt EndSkip 

dc.b 

%10000000 

rt Flags 

dc.b 

1 

rt Version 

dc.b 

9 

rt Type 

dc.b 

0 

rt Pri 

dc.l 

LibName 

rt Name 

dc.l 

LiblDString 

rt_IDString 
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LibName: 


LiblnitData: 


FuncTab: 


DataTab: 


DosName: 


dc.l 

LiblnitData ; 

rt Init 

dc.b 

even 

"test.library",C 

; Library-Name 

:.b 

even 

"Test-Library vO.l (RON)",0 

dc.l 

42 

LibSize (34) 


/ 

SegList (4) 


; 

DosBase (4) = 42 

dc.l 

FuncTab 


dc.l 

DataTab 


dc.l 

LiblnitRout 


dc.l 

Open 


dc.l 

Close ; 

Standardfunktionen 

dc.l 

Expunge ; 


dc.l 

ExtFunc ;■ 


dc.l 

WriteLn ; 

Spezialfunktion 

dc.l 

-1 

Endkennung 

dc.b 

%11100000,0 


dc.w 

8 


dc.b 

9,0 

lib Typ 

dc.b 

%11000000,0 


dc.w 

10 


dc.l 

LibName ; 

lib Name 

dc.b 

%11100000,0 


dc.w 

14 


dc.b 

6,0 

lib Flags 

dc.b 

*11000000,0 


dc.w 

20 


dc.w 

3,4 

lib Version + lib_Reversion 

dc.l 

0 

Endkennung 

dc.b 

even 

"dos.library",0 



; Nun folgt die Initialisierungsroutine 


LiblnitRout: 

movem.l a4-a6,-(a7) 

move.l d0,a5 

move.l a0,34(a5) 


; Register retten 
; Library-Basis nach a4 
; Segment-Liste eintragen 
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move.1 

ExecBase,a6 

; DosLibrary öffnen 

moveg 

#0,d0 


lea 

DosName(pc), 

al 

jsr 

OpenLib(a6) 


move.1 

d0,38(a5) 

; DosBase eintragen 

beg 

LiblnitEnd 


move.1 

a5,d0 

; Lirary-Basis übergeben 

LiblnitEnd: 

movem.1 

(37)+ , 34 _ 36 

; Register restaurieren 

rts 

; Die Open-Funktion wird von 

der OpenLibrary-Routine 

; aufgerufen 

Open: 

bclr 

#3,14(a6) 

; ExpungeBit löschen 

addq.w 

#l,32(a6) 

; OpenCnt erhöhen 

move.1 

a6 ,d0 

; Basisadresse übergeben 

rts 

; Die Close-Funktion wird von der CloseLibrary-Funktion 

; aufgerufen 

Close: 

moveq 

#0,d0 

; SegmentList-Ptr = 0 

subq.w 

#l,32(a6) 

; OpenCnt verringern 

bne 

CloseEnd 

; noch nich Null, dann Ende 

btst 

#3,14(a6) 

; ExpungeBit gesetzt ? 

beq 

CloseEnd 

; Nein, dann nicht entfernen 

bsr 

Expunge 

; Library endgültig entfernen 


CloseEnd: 

rts 


; Nun folgt die Expunge-Routine, die die Library aus dem 
; System entfernt. Sie wird von der RemLibrary-Routine und 
; der Close-Funktion aufgerufen. 


Expunge: 


movem.1 

dl-d2/a5-a6,- 

(a7) ; Register retten 

tst.w 

32(a6) 

; sind noch Benutzer 

beq 

ExpungeBranch 

; vorhanden? Nein, dann 
; Library entfernen 

moveq 

#0,d0 

; SegmentList-Ptr = 0 

bset 

#3,14(a6) 

; ExpungeBit setzen, damit 

bra 

ExpungeEnd 

; die Library beim nächsten 
; mal entfernt werden kann 

ExpungeBranch: 



move.1 

a6,a4 

; DosLibrary schließen 


542 




Konstruktion einer eigenen Library 

move.1 

38(a4),al 


move.1 

ExecBase,a6 


jsr 

CloseLib(a6) 


move.1 

a4,al 

; Library aus Lib-List nehmen 

jsr 

Remove(a6) 

; Remove 

move.1 

34(a4),d2 

; SegmentList-Ptr retten 

moveg 

#0,d0 

; Speicher der Library- 

move.w 

16(a4),d0 

; Struktur und der Sprung- 

move.1 

a4,al 

; tabeile freigeben 

sub. 1 

dO,al 


add.w 

18(a4),d0 


jsr 

FreeMem(a6) 

; FreeMem 

move.1 

d2,d0 

; Zeiger auf Segment-Liste 
; zurückgeben 

ExpungeEnd: 




movem.l (a7)+,dl-d2/a5-a6 ; Register restaurieren 

rts 


; Die letzte Standardfunktion wird zur Zeit nicht benutzt. 
ExtFunc: 


moveq 

#o,do 

; do löschen und zurück 

rts 




; Nun kommt unsere erste eigene Funktion. Sie erwartet in 
; aO einen Zeiger auf eine Zeichenkette, die ausgegeben 
; werden soll. 


WriteLn: 


movem.1 

a0/a6,-(a7) 

; Zeiger und Base retten 

move.1 

a6 ,a5 

; DosLibrary-Adresse 

move.1 

38(a6),a6 

; auslesen 

jsr 

Output(a6) 

; Standardausgabekanal 

move.1 

dO,dl 

; ermitteln 

move.1 

(a7)+/äO 

; aO restaurieren 

move.1 

a0,d2 

; Adresse der Zeichenkette 

move.1 

#-l,d3 

; nach d2 kopieren. Nun wird 

WLLoop: 


; die Länge der Zeichenkette 

addg.1 

#1 ,d3 

; ertestet. 

tst.b 

(a0) + 


bne 

WLLoop 


jsr 

Write(a6) 

; Zeichenkette ausgeben 

move.1 
rts 

(ä7)+,a6 

; BasePtr restaurieren 

EndResident: 




Programm "test.library.s" (Quelltext der "Test-Library") 
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9.5 Programm zum "Ausprobieren" 

Um nun unsere Library auszuprobieren, müssen wir sie 
zunächst assemblieren und unter dem Namen "test.library" im 
Verzeichnis "libs:" ablegen. Dann können wir sie, wie jede 
andere Library auch, öffnen und ihre Funktion (WriteLn) be¬ 
nutzen . 


* Kapitel 9 

* Demonstrationsprogramm für die "test.library" 


ExecBase = 

OpenLib 

CloseLib 

WriteLn 

4 

-552 

-414 

-30 ; Offset unserer Funktion 


move.1 
move.1 
moveq 
jsr 

move.1 
beq 

ExecBase,a6 ; 
#TestName,al ; 
#0,d0 

OpenLib(a6) ; 
dO,TestBase ; 
Error ; 

Basisadresse der ExecLib 
Zeiger auf Zeichenkette 
Version ist belanglos 
Library öffnen 

Basisadresse speichern 
Fehler aufgetreten ? 


move.1 

lea 

jsr 

d0,a6 ; 
Text,a0 ; 
WriteLn(a6) ; 

Basisadresse nach a6 

Text als Parameter nach aO 
WriteLn aufrufen 


move.1 
move.1 

ExecBase,a6 ; 
TestBase,al ; 

ExecBase 

Zeiger auf unsere Library 


; Wenn wir möchten, daß die Library aus dem Speicher 
; entfernt werden soll, können wir das zum einen mit der 
; RemLibrary-Funktion erledigen, oder wir setzen einfach das 
; Expunge-Bit von "Hand". Dann wird nämlich die Expunge- 
; Funktion von der Close-Funktion, die wiederum von der 
; CloseLibrary-Funktion angesprungen wurde, aufgerufen. 


bset 

#3,14(al) 

; Expunge-Bit setzen 

jsr 

CloseLib(a6) 

; Lib schließen und entfernen 

Error: 

rts 


; Progamm beenden 

* Datenbereich 


Text: 

dc.b 10,"Dies ist 
even 

ein <Hello world>-Text",10,0 
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TestName: 

dc.b 

even 

"test.library",0 

; Name 

unserer Lib. 

TestBase: 

dc.l 

0 

; Var. 

für Basisadr 


Programm 9.1: Testprogramm für eigene Library 
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10.1 Die IO-Library 

Bevor wir uns nun auf die einzelnen Devices "stürzen", möch¬ 
ten wir noch auf unsere selbstgeschriebene "io.library" hin- 
weisen. Diese Library enthält sechs Funktionen, die uns die 
Arbeit mit Devices erleichtern sollen. So kann man z.B. mit 
einem Funktionsaufruf eine gesamte IORequest-Struktur in¬ 
itialisieren lassen. Dies umschließt das Anlegen eines Mes¬ 
sage- (Reply- ) Ports , das Anlegen einer IORequest-Struktur und 
das Öffnen des angegebenen Devices. Dadurch sind die folgen¬ 
den Demonstrationsprogramme für die einzelnen Devices we¬ 
sentlich kompakter geworden. 

Damit man die Funktionen der Library auch in eigenen Pro¬ 
grammen benutzen kann, sollen nun die Erklärungen der Funk¬ 
tionen folgen. Aus Platzgründen haben wir den Quelltext der 
Library nicht abgedruckt. Jedoch befindet sich auf der bei¬ 
liegenden Diskette die Library sowohl in assemblierter Form 
wie auch als Quelltext. 


CreatePort = -30 (IO-Library) 


*PortName 


Pri 

♦Port 


Erklärung 


aO < Zeiger auf Zeichenkette mit dem Namen 
des Message-Ports. Wird aO mit einer 
Null initialisiert, wird dem Port kein 
Name gegeben. Außerdem wird er dann 
nicht in die PublicPort-Liste aufgenom¬ 
men. 

dO < Priorität des Ports. 

dO > Zeiger auf die angelegte Message-Port- 
Struktur oder eine Null, wenn ein Fehler 
aufgetreten ist. 

Es wird eine MsgPort-Struktur angelegt, 
die, wenn ein Zeiger auf einen Namen an¬ 
gegeben worden ist, in die PublicPort- 
Liste aufgenommen wird. Sollte es einen 
Port mit dem angegebenen Namen schon in 
der PublicPort-Liste geben, so wird kein 
MsgPort angelegt. 


DeletePort = -36 (IO-Library) 


*Port aO < Zeiger auf eine von CreatePort angelegte 

Message-Port-Struktur. 

Erklärung Gibt den durch die angegebene MsgPort- 

Struktur belegten Speicher wieder frei 
und entfernt den Port gegebenenfalls aus 
der PublicPort-Liste. 
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*ReplyPort aO < Zeiger auf einen MsgPort, der als Reply- 

Port in die lORequest-Struktur eingetra¬ 
gen werden soll. 

Size dO < Größe der anzulegenden lORequest-Struk¬ 

tur . 


*IOReq dO > Zeiger auf die angelegte und initiali¬ 

sierte lORequest-Struktur oder eine 
Null, wenn ein Fehler aufgetreten ist. 

Erklärung Legt eine lORequest-Struktur mit der an¬ 

gegebenen Größe an und richtet sie ein. 


DeletelOReq = -48 (IO-Library) 

*IOReq aO < Zeiger auf eine mit CreatelOReq ange¬ 

legte lORequest-Struktur. 

Erklärung Gibt den von der angegebenen lORequest- 

Struktur belegten Speicher wieder frei. 


CreatelOFast = -54 (IO-Library) 


♦DevName 

aO 

< 

Zeiger auf Namen des Devices, welches 
geöffnet werden soll. 

UnitNum 

dO 

< 

Unit-Nummer, die beim Öffnen des Devices 
übergeben werden soll. 

Flags 

dl 

< 

Flag-Wert, der beim Öffnen des Devices 
übergeben werden soll. 

Size 

d2 

< 

Größe der lORequest-Struktur, die ange¬ 
legt werden soll. 

*IOReq 

dO 

> 

Zeiger auf angelegte lORequest-Struktur 


oder eine Null, wenn ein Fehler aufge¬ 
treten ist. 


Erklärung Diese Funktion richtet zunächst einen 

Message-Port ohne Namen ein, dessen 
Adresse in die danach angelegte lORe¬ 
quest-Struktur eingetragen wird. Zum 
Schluß wird das angegebene Device geöff¬ 
net. Man erhält als Rückgabewert einen 
Zeiger auf die lORequest-Struktur, mit 
der man sofort mit dem Device kommuni¬ 
zieren kann. 
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DeletelOFast 

= 

-60 (IO-Library) 


*IOReq aO < Zeiger auf IORequest-Struktur, die mit¬ 

tels der Funktion CreatelOFast angelegt 
worden ist. 

Erklärung Schließt das geöffnete Device und gibt 

den belegten Speicher wieder frei. 


Auf ein Demoprogramm kann hier wohl verzichtet werden, da 
die IO-Library in den folgenden Programmen des öfteren Ver¬ 
wendung finden wird. 

Noch ein Hinweis: Da das System Libraries, die geöffnet wer¬ 
den sollen, immer im LIBS:-Verzeichnis, d.h. im Libs-Ver- 
zeichnis der Startdiskette, sucht, müssen Sie die selbstge¬ 
schriebenen Libraries von der Buch-Programmdiskette auf die 
Diskette, die Sie zum Systemstart verwenden wollen, kopie¬ 
ren. Das selbe gilt auch für die Devices (siehe Kapitel 11). 


10.2 Kurzübersicht über die Devices 

Im Device-Teil des Exec-Kapitel haben wir uns schon mit dem 
allgemeinen Aufbau eines Devices und mit den zur Benutzung 
notwendigen Schritten befaßt. In diesem Kapitel wollen wir 
nun auf die Funktionen der einzelnen Devices etwas intensi¬ 
ver eingehen. Bevor wir damit anfangen, hier ein kurzer 
Überblick über die wichtigsten Devices und ihre Aufgabenge¬ 
biete : 


audio.device 

console.device 

gameport.device 
imput.device 

keyboard.device 

narrator.device 


Steuert die Audio-Hardware des Amiga. Das Audio- 
Device ist zuständig für das Abspielen von 
Sound-Samples. 

Das Console-Device ist quasi die Exec-Instanz 
eines DOS-Fensters (mit dem Dateinamen "CON:..." 
geöffnet). Es tätigt Ein- und Ausgaben in sol¬ 
chen Fenstern. 

Dieses Device dient zur Abfrage der Geräte am 
Gameport (Maus und Joystick). 

Hier laufen alle Eingabe-Ereignisse 
(Tastendrücke, Mausklicks etc.) zusammen und 
werden an die Intuition-Library weitergeleitet. 
Ist zuständig für die Umrechnung der Raw-Key-Co- 
des ('rohe' Tastencodes, wie sie vom Tastatur¬ 
prozessor kommen) in ASCII-Codes gemäß der ein¬ 
gestellten Keymap. 

Das "Quassel-Gerät" (Sprachausgabe). Die Texte, 
die ausgegeben werden sollen, müssen als Phonem- 
Codes (Lautschrift) vorliegen. Eine entspre- 
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parallel.device 
Printer.device 


serial.device 


trackdisk.device 


chende Umwandlung von Klartexten nimmt die 
"translator.library" vor. 

Ist zuständig für die Datenübertragung über den 
Parallel-Port. 

Setzt auszugebende Texte in Druckerkommandos um 
und bedient das Parallel- oder Serial-Device (je 
nachdem, an welchem Port Ihr Drucker angeschlos¬ 
sen ist). 

Datenübertragung über der seriellen Port. 
Haupteinsatzgebiet sind hier Modems, aber auch 
manche Drucker werden am seriellen Port ange¬ 
schlossen. 

Steuert die Floppy-Hardware des Amiga. Das 
Trackdisk-Device kann Daten auf Disketten 
schreiben, sie lesen, Disketten formatieren usw. 


10.3 Das Trackdisk-Device 

Als erstes Device wollen wir uns nun das Trackdisk-Device 
(abgekürzt TDD) unter die Lupe nehmen. Es ist für die Ver¬ 
waltung der Diskettenlaufwerke zuständig. Seine Hauptaufga¬ 
ben sind das Lesen und Schreiben von Daten und die Formatie¬ 
rung von Disketten. Es bietet aber auch noch andere Möglich¬ 
keiten, z.B. die Positionierung des Schreib/Lese-Kopfes, die 
Abfrage, ob eine Disk im Laufwerk liegt und ob sie schreib¬ 
geschützt ist, und die automatische Erkennung von Diskwech¬ 
selvorgängen . 

Bevor wir aber zum Aufbau und zur Funktionsweise dieses Ge¬ 
rätes kommen, eignen wir uns zunächst etwas Hintergrundwis¬ 
sen an, indem wir fragen: Wie ist eine Diskette überhaupt 
aufgebaut? 


10.3.1 Der physikalische Aufbau einer Diskette 

Wie Sie sicherlich wissen, besteht das "Innere" einer Dis¬ 
kette aus einer runden, magnetisierbaren Scheibe (auch wenn 
sie von außen eckig aussieht). Auf dieser Scheibe werden Da¬ 
ten aufgezeichnet, indem sie vom Schreib/Lese-Kopf an be¬ 
stimmten Stellen mit einer bestimmten Magnetisierung verse¬ 
hen wird. Wie das exakt funktioniert, ist Sache der Hard¬ 
ware-Programmierer, die kein Trackdisk-Device benutzen kön¬ 
nen oder wollen und die Laufwerke auf der untersten Ebene, 
über die Hardware-Register, ansprechen. Das ist ein äußerst 
kompliziertes Unterfangen, aber wir haben ja zum Glück das 
TDD, das uns in dieser Hinsicht viel Ärger ersparen wird. 
Wir werden auf diese Art der Floppyprogrammierung kurz im 
Zusammenhang mit zwei TDD-Kommandos zu sprechen kommen. 

Ansonsten ist für uns nur wichtig zu wissen, wie wir das TDD 
dazu bringen, unsere Daten zu speichern. 
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Der Amiga teilt eine Diskette in 80 konzentrische Ringe, die 
sog. "Spuren" oder "Tracks" ein. Diese Tracks werden durch- 
nurraneriert, wobei die Spur mit der niedrigsten Nummer (0) 
ganz außen und die mit der höchsten (79) ganz innen liegt. 
Jeder Track wird nun, wie ein Kuchenstück, in 11 "Sektoren" 
eingeteilt. Damit haben wir 80*11 = 880 Sektoren auf einer 
Diskseite. Nun hat eine Diskette aber bekanntlich zwei Sei¬ 
ten, die auch beide vom Laufwerk benutzt werden. Es hat zwei 
Schreib/Lese-Köpfe, je einen für die Ober- und Unterseite. 
Den unteren bezeichnet man auch als "Head 0" und den oberen 
als "Head 1". Eine Spur mit ihren beiden Seiten zusammenge¬ 
nommen nennt man "Zylinder". 

Eine Kombination aus Spur, Sektor und Kopf nennt sich 
"Block". Fix gerechnet hat eine Amiga-Diskette also 
80*11*2 = 1760 Blöcke. Man kann einen Block also eindeutig 
über seine Blocknummer (0-1759) oder über die Spur-Kopf-Sek- 
tor-Nummer identifizieren. 

Manchmal wird die Kopfnummer auch nicht extra angegeben, 
sondern in der Spurnummer untergebracht. Jeder Zylinder be¬ 
kommt dann zwei Spurnummern, je eine für Ober- und Unter¬ 
seite. Spur 0 ist demnach Zylinder 0, Seite 0, Spur 1 ist 
Zylinder 0, Seite 1, Spur 2 ist Zylinder 1, Seite 0 usw. 

Jeder Block hat eine Größe von 512 Bytes. Eine Amiga-Dis¬ 
kette hat also einen Speicherplatz von 1760*512 = 901120 By¬ 
tes (oder 880 KBytes). Eigentlich eine ganze Menge auf einer 
so kleinen Scheibe. 

Die Einteilung in Spuren und Sektoren gilt natürlich nicht 
nur für Disketten, sondern auch für Festplatten und andere 
vergleichbare Speichermedien. Der Unterschied ist nur, daß 
die Spur- und Sektoranzahl bei Festplatten in einer ganz 
anderen Größenordnungen liegt. Heutzutage sind Festplatten, 
deren Magnetscheibe die Größe einer Diskette hat, schon mit 
Speicherkapazitäten von mehr als 100 MByte (1 MByte = 1024 
KByte) zu haben. 


10.3.2 öffnen des TDD und IORequest-Struktur 

Geöffnet wird das Trackdisk-Device ganz normal über die 
OpenDevice-Routine von Exec. Als Unit-Nummer muß die Nummer 
des gewünschten Laufwerks (0-3) angegeben werden. Als Flag 
ist hier TD_ALLOW NON_3_5 möglich. Dieses Flag bewirkt, daß 
das Trackdisk-Devfce auch Laufwerke annimmt, die eine andere 
Größe als 3 1/2 Zoll haben. Ist das Flag nicht gesetzt, 
werden nur 31/2 Zoll-Laufwerke akzeptiert. 

Falls beim öffnen ein Fehler auftrat, enthält dO nach dem 
Aufruf einen Wert <> 0, ansonsten steht es auf 0. IORequest- 
Zugriffe mittels der so initialisierten IOStdReq-Struktur 
beziehen sich immer nur auf die Laufwerksunit, die beim 
Öffnen des Devices angegeben wurde! 


552 




Die Devices 


Das Trackdisk-Device verwendet im Normalfalle für seine Kom¬ 
mandos die IOStdReq-Struktur. Im Exec-Kapitel haben wir 
diese Struktur schon kennengelernt. Weiterhin kennt das TDD 
einige sog. "erweiterte" Kommandos, die eine ebensolche 
Struktur (IOExtTD - Erweiterter Trackdisk-IO) benötigen. Da 
wir aber wie immer vom Einfachen zum Komplizierten gehen 
(dabei ist die IOExtTD-Struktur gar nicht kompliziert - sie 
umfaßt nur zwei Einträge), beschäftigen wir uns zunächst mit 
den "normalen" Befehlen und dem IOStdReq. 

Die IOStdReq-Struktur (für Trackdisk-Device) 


00 

ds.b 

io_Message,20 

; Zugehörige Message-Struktur 


20 

dc.l 

*io Device 

; Zeiger auf Device 


24 

dc.l 

*io Unit 

; Zeiger auf Unit 


28 

dc.w 

io Coiranand 

; Trackdisk-Kommando 


30 

dc.b 

io Flags 

; Flags 


31 

dc.b 

io Error 

; Eventueller Fehler 


32 

dc.l 

io Actual 

; Diverse Rückgabewerte 


36 

dc.l 

io Length 

; Anzahl der zu übertragenden Bytes 

40 

dc.l 

*io Data 

; Zeiger auf Daten im Speicher 


44 

dc.l 

io Offset 

; Offsetwert für Device 


48 

*io Device, 

Beim Öffnen 

io SIZEOF 

*io Unit 

des Trackdisk-Device wird in io Device ein 

Zei 

ger 

auf die 

Device-Struktur 

des TDD und in To Unit ein 

Zei 


ger auf den Laufwerksport des angesprochenden Laufwerks (0- 
3) eingetragen. Zu diesen beiden Strukturen werden wir spä¬ 
ter in diesem Abschnitt kommen. 

ioCommand 

Das Trackdisk-Device kennt die 8 Standard-Kommandos für De¬ 
vices sowie einige devicespezifische Kommandos. Im Anschluß 
an die Struktur werden wir uns die Kommandos detailliert 
vornehmen, hier nur eine Kurzübersicht: 

TDD-Kommando Wert Bedeutung 


CMD RESET 

1 

Device zurücksetzen 

CMD READ 

2 

Lese Daten von Diskette 

CMD WRITE 

3 

Schreibe Daten auf Diskette 

CMD UPDATE 

4 

Entleere Datenpuffer auf Disk 

CMD CLEAR 

5 

Lösche Datenpuffer ohne Rückschreiben 

CMD STOP 

6 

Device in Wartezustand bis 'Start' 

CMD START 

7 

Device reaktivieren nach 'Stop' 

CMD_FLUSH 

8 

Alle IO-Kommandos abbrechen 

TD MOTOR 

9 

Laufwerksmotor ein- und ausschalten 

TD SEEK 

10 

Schreib/Lesekopf auf Spur positionieren 

TD FORMAT 

11 

Spuren formatieren 

TD REMOVE 

12 

Fehlerhafte Funktion (siehe weiter unten)! 

TD CHANGENUM 

13 

Anzahl Diskwechsel feststellen 

TD CHANGESTATE 

14 

Test, ob Disk im Laufwerk 

TD PROTSTATUS 

15 

Test, ob Disk schreibgeschützt 

TD RAWREAD 

16 

Lesen ohne anschließende Dekodierung 
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TD RAWWRITE 17 
TD_GETDRIVETYPE 18 
TD_GETNUMTRACKS 19 
TD_ADDCHANGEINT 20 
TD REMCHANGEINT 21 


Schreiben ohne vorhergehende Kodierung 
Laufwerkstyp ermitteln 
Maximalzahl Tracks ermitteln 
Diskwechsel-Interrupt einbinden 
Diskwechsel-Interrupt entfernen 


io_Flags 

Die Flags spielen im Zusammenhang mit den Befehlen RAWREAD 
und RAWWRITE (siehe dort) und beim Öffnen des Devices eine 
Rolle. 

TDD-Flag Wert Bedeutung 


TD ALL0W_N0N_3 5 1 Zulassung von nicht-3 1/2 Zoll-Laufw. 
IOTD INDEXSYNC 16 Indexlock-Synchronisation einschalten 
I0TD — WORDSYNC 32 $4489-Wortsynchronisation einschalten 

Weitere Erklärungen folgen später. 


io_Error 

Wenn es bei einer Trackdisk-Operation zu einem Fehler kam, 
wird seine Nummer in diesem Eintrag zurückgegeben. Hier die 
Bedeutungen der Fehlernummern: 


TDD-Fehler 

Wert 

Bedeutung 

TDERR NotSpecified 

20 

Allgemeiner Fehler beim Hardware-Zugriff 

TDERR_NoSecHdr 

21 

Kein Sektorheader gefunden 

TDERR BadSecPreamble 

22 

Fehlerhafter Sektorvorspann 

TDERR BadSecID 

23 

Fehlerhafte Sektorkennmarke 

TDERR BadHdrSum 

24 

Sektorheader-Checksumme falsch 

TDERR BadSecSum 

25 

Checksumme über Blockdaten falsch 

TDERR TooFewSecs 

26 

Zu wenige Sektoren in einem Track 

TDERR_BadSecHdr 

27 

Sektorheader fehlerhaft 

TDERR WriteProt 

28 

Schreibversuch auf schreibgeschützte Disk 

TDERR DiskChanged 

29 

Keine Disk im Laufwerk 

TDERR SeekError 

30 

Spur 0 kann nicht gefunden werden 

TDERR NoMem 

31 

Zu wenig Speicherplatz für Diskoperation 

TDERR BadUnitNum 

32 

Gewünschte Unitnummer nicht vorhanden 

TDERR BadDriveType 

33 

Laufwerkstyp wird vom TDD nicht unterstützt 

TDERR DrivelnUse 

34 

Laufwerk wird schon benutzt 

TDERR PostReset 

35 

Device in Reset-Phase 


Einige dieser Fehler, nämlich die Nummern 20 bis 27, haben 
nur dann Bedeutung, wenn Sie sich näher mit der 
Diskhardware-Programmierung beschäftigen wollen. Im später 
folgenden Abschnitt über die RAW-Befehle werden wir sie noch 
einmal kurz aufgreifen. Für brave TDD-User bedeuten sie alle 
schlicht: schwerer Fehler in der Datenstruktur der 
angesprochenen Spur. Ein solcher Fehler macht sich akustisch 
immer eindrucksvoll durch zwei langgezogene Kratzgeräusche 
des Schreib/Lese-Kopfes bemerkbar. Die Fehler ab Nummer 28 
sind aber auch für uns von Interesse. 
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ioActual 

In diesem Langwort werden die Rückgabewerte von verschie¬ 
denen Kommandos abgelegt. Bei READ und WRITE z.B. steht hier 
die Anzahl der effektiv gelesenen bzw. geschriebenen Bytes; 
ebenso legen CHANGENUM, CHANGESTATE und PROTSTATUS ihre 
Rückmeldungen hier ab. In der anschließenden Besprechung der 
einzelnen Kommandos wird jeweils angegeben, wie der Actual- 
Eintrag belegt wird. 

ioLength 

Hier muß bei READ, WRITE und FORMAT die Anzahl der zu 
schreibenden Bytes abgelegt werden. Obwohl eine Angabe in 
Bytes verlangt wird, kann das TDD immer nur blockweise lesen 
und schreiben (Length ein Vielfaches von 512 sein), forma¬ 
tieren sogar nur trackweise (Length Vielfaches von 5632). 

*io_Data 

Bei alle Kommandos, die einen Zeiger auf einen Speicherbe¬ 
reich erwarten (READ, WRITE, FORMAT etc.), muß dieser hier 
eingetragen werden. 

ioOffset 

Enthält die Blocknummer, auf die sich das Kommando beziehen 
soll (wird nicht immer benötigt). Auch hier muß die Angabe 
in Bytes erfolgen, das TDD kann jedoch nur an Blockgrenzen 
mit seiner Arbeit beginnen (READ und WRITE), für FORMAT und 
SEEK werden sogar Trackgrenzen erwartet. 


10.3.3 Die Kommandos des Trackdisk-Device 

Nun wollen wir die einzelnen Kommandos detailliert durchge¬ 
hen. Wir stellen sie in einer ähnlichen Weise vor wie die 
Library-Routinen. Der Überschrifts-Kasten enthält den Namen, 
die Kommandonummer (die jeweils in den Struktureintrag 
io_Command muß!) und die Devicebezeichnung des Kommandos. 
Dann folgen, falls vorhanden, die Einträge und Offsets der 
IORequest-Struktur, die vor dem Aufruf mit Werten gefüllt 
werden müssen (erkennbar am '<’-Zeichen), dann, ebenso falls 
vorhanden, die Rückgabewerte ('> 1 -Zeichen) und schließlich 
eine Erklärung. Fangen wir an. 


CMD RESET 


1 (Trackdisk-Device) 


Erklärung Versetzt das Device in den 

'Einschaltzustand', so, als wäre der 
Rechner gerade neu gestartet worden. 
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CMDREAD 

= 

2 

(Trackdisk-Device) 


i°_ 

Length 

36 

< 

*io Data 

40 

< 

io 

Offset 

44 

< 

io 

Error 

31 

> 

io" 

Actual 

32 

> 


Erklärung 


Länge, der zu lesenden Daten in Byte. 
Muß ein Vielfaches von 512 sein, da das 
TDD nur ganze Blöcke bearbeiten kann. 
Beginn des Lesepuffers im Speicher 
Startblock für Lesevorgang. Achtung: Muß 
auch in Bytes angegeben werden, also als 
'Startblock * 512'. 

Fehlernummer oder 0 für kein Fehler 
Anzahl der wirklich gelesenen Bytes 

Liest Daten von der Diskette in einen 
Puffer im Speicher. ACHTUNG: Bis ein¬ 
schließlich Kickstart 1.3 muß sich die¬ 
ser Puffer im Chip-RAM befinden! 


CMD WRITE = 3 (Trackdisk-Device) 


io Length 

36 

< 

Länge der zu schreibenden Daten in Byte. 
Muß ein Vielfaches von 512 sein, da das 
TDD nur ganze Blöcke bearbeiten kann. 

*io Data 

40 

< 

Beginn des Datenpuffers im Speicher 

io_Offset 

44 

< 

Startblock für Schreibvorgang. Achtung: 
Muß auch in Bytes angegeben werden, also 
als 'Startblock * 512'. 

io Error 

31 

> 

Fehlernummer oder 0 für kein Fehler 

io Actual 

Erklärung 

32 

> 

Anzahl der wirklich geschriebenen Bytes 

Schreibt Daten aus dem Speicher auf die 
Diskette. ACHTUNG: Bis einschließlich 


Kickstart 1.3 muß sich der Datenpuffer 
im Chip-RAM befinden! 


CMDUPDATE = 4 (Trackdisk-Device) 


io_Error 31 > Fehlernummer oder 0 

Erklärung Schreibt den Inhalt des TDD-internen Da¬ 

tenpuffers auf die Disk. 

Zum Begriff des Datenpuffers: Bei seinem Start reserviert 
das TDD einen Speicherbereich von festlegbarer Größe und be¬ 
nutzt ihn als Datenzwischenspeicher. Das bedeutet, daß, wenn 
z.B. ein Block gelesen werden soll, immer gleich die ganze 
Spur, in der sich der Block befindet, gelesen wird. Das ist 
aus hardware-technischen Gründen notwendig. Die Spur wird im 
Datenpuffer abgelegt. Soll nun ein weiterer Block aus der 
selben Spur gelesen werden (was ja meist recht wahr- 
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scheinlich ist), kann er sofort, ohne wirklichen Zugriff auf 
die Disk, aus dem Puffer geholt werden. 

Auch beim Schreiben wird dieser Puffer verwendet. Schreibzu¬ 
griffe werden zunächst nur in den Puffer ausgeführt. Erst, 
wenn der Pufferplatz für eine andere Spur benötigt oder das 
UPDATE-Kommando empfangen wird, wird der Pufferinhalt 
wirklich auf die Diskette gebracht. Sie sollten bei der 
Arbeit mit dem TDD also sicherstellen, daß nach dem letzten 
Schreibzugriff, dem keine sofortigen Lesezugriffe folgen, 
ein UPDATE ausgeführt wird, damit keine Daten im Puffer 
verschwinden und die Disk diese nie zu Gesicht bekommt. 


CMD CLEAR 


5 (Trackdisk-Device) 


Erklärung Entleert den Inhalt des Datenpuffers, 
ohne ihn auf die Disk zu bringen. 

Auch dieses Kommando bezieht sich auf den Datenpuffer. Es 
veranlaßt dessen Entleerung, ohne daß die Disk aktualisiert 
wird. Diesen Befehl können Sie benutzen, wenn Sie das physi¬ 
kalische Laden einer Spur von Disk erzwingen wollen, weil 
Sie nicht sicher sind, ob die Daten dieser Spur, die eventu¬ 
ell noch im Puffer stehen, aktuell sind. 


CMD STOP 


6 (Trackdisk-Device) 


Erklärung Friert den Betrieb des TDD ein, bis das 
Kommando START empfangen wird. 

Nach Ausführung dieses Kommandos führt das TDD keine weite¬ 
ren Kommandos (bis auf START) mehr aus, speichert sie aber 
weiterhin in der Message-Warteschlange. 

Bei Festplatten hat dieses Kommando noch eine weitere Funk¬ 
tion: Es veranlaßt das "Parken" der Platte, d.h. die 
Schreib/Lese-Köpfe werden in einen nicht zur Datenspeiche¬ 
rung verwendeten Bereich gefahren und der Motor der Platte 
ausgeschaltet. 


CMD START 


7 (Trackdisk-Device) 


Erklärung Reaktiviert das TDD nach vorhergehender 
Desaktivierung durch STOP. 

Nach dem STARTen werden alle in der Zwischenzeit eingegange¬ 
nen IO-Requests, die sich in der Message-Schlange befinden, 
der Reihe nach abgearbeitet. 
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Auch hier gilt eine Besonderheit bei Festplatten: START hebt 
den Parkzustand auf, der Motor wird hochgefahren und die 
Platte ist wieder betriebsbereit. 

CMDFLUSH 

= 8 (Trackdisk-Device) 

Erklärung 

Bricht den augenblicklichen IO-Prozeß ab 
und löscht auch alle weiteren, noch in 
der Message-Warteschlange befindlichen, 
IO-Requests. 

TDMOTOR 

= 9 (Trackdisk-Device) 

io Length 36 

< Gewünschter Status des Laufwerksmotors: 
0=aus, l=ein 

io Actual 32 

> Motorstatus vor der Befehlsausführung: 
0=aus, l=ein 

Erklärung 

Schaltet den Motor des Laufwerks ein 
oder aus. 

Dieses Kommando hat bei Festplatten keine Wirkung. Stattdes- 
sen müssen Sie die Kommandos STOP (parken) und START 
(entparken) verwenden. 

TD SEEK 

= 10 (Trackdisk-Device) 

io Offset 44 

< Anzufahrende Zylindernummer (muß in Byte 
angegeben werden, also Zylinder * 11264) 

Erklärung 

Fährt den Schreib/Lese-Kopf zum angege¬ 
benen Zylinder. 

Die Berechnung mittels Zylinder*11264 ergibt sich aus der 
Bytezahl, die ein Zylinder umfaßt: 11 Blöcke * 2 Seiten * 
512 Bytes = 11264. 

TD_FORMAT 

= 11 (Trackdisk-Device) 


io Length 

36 

< Anzahl der zu formatierenden Spuren in 
Byte (Berechnung: Spuren * 5632). 

*io Data 

40 

< Beginn der Daten im Speicher, die beim 
Formatieren auf die Disk geschrieben 
werden sollen 

io Offset 

44 

< Startspur für Formatierung (Berechnung: 
Startspur * 5632). 
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io_Error 31 > Fehlernummer oder o für kein Fehler 

Erklärung Formatiert Spuren einer Diskette und 

schreibt dabei Daten in sie. Bis Kick¬ 
start 1.3 müssen die Daten im Chip-RAM 
stehen. 

Der Unterschied zwischen Formatieren und Schreiben ist fol¬ 
gender: Bei der Formatierung einer Spur wird ihre Daten¬ 
struktur komplett neu angelegt. Auf schon bestehende Daten 
kann dabei keine Rücksicht genommen werden, es muß die ganze 
Spur angelegt werden. Das ist der Grund, warum FORMAT nicht 
auf einzelne Blöcke anwendbar ist. Beim Schreiben aber wird 
die schon bestehende Spurstruktur berücksichtigt und die Da¬ 
ten werden gezielt in die gewünschten Blöcke geschrieben. 
Der Vorteil von FORMAT ist, daß er wesentlich schneller aus¬ 
geführt wird als WRITE. 

Auf neue, bisher unbenutzte Disketten kann nicht mit WRITE 
zugegriffen werden, da noch keine Spurstruktur vorhanden 
ist. Diese muß zunächst mit FORMAT angelegt werden, erst ab 
dann ist WRITE möglich. Das gleiche gilt auch für Disketten, 
die "harte" Fehler aufweisen (TDD-Errors 20 bis 27) oder auf 
anderen Computersystemen formatiert wurden. 


TD_REMOVE = 12 (Trackdisk-Device) 

*io_Data 40 < Zeiger auf Softlnt-Struktur oder 0 zum 

~~ Sperren des Interrupts 

Erklärung Initialisiert oder sperrt einen Soft¬ 

ware-Interrupt, der beim Entfernen einer 
Diskette ausgelöst wird (für weitere In¬ 
formationen über Interrupts siehe Exec- 
Kapitel) 


TDCHANGENUM = 13 (Trackdisk-Device) 

io_Actual 32 > Anzahl Diskwechsel seit Systemstart 

Erklärung Ermittelt die Anzahl der seit Sy¬ 

stemstart durchgeführten Diskwechsel 
(natürlich nur für die entsprechende 
TDD-Unit). Wichtig: Als Wechsel zählt 
sowohl das Einlegen als auch das Entfer¬ 
nen einer Disk! 


TD CHANGESTATE = 14 (Trackdisk-Device) 

io_Actual 32 > 0 - Disk im Laufwerk / <> 0 - Keine Disk 
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Erklärung 

Stellt fest, ob sich eine Disk im Lauf¬ 
werk befindet. Achtung: Nach Einlegen 
einer neuen Disk kann es bis zu zwei Se¬ 
kunden dauern, bis das TDD darauf rea¬ 
giert! 

TDPROTSTATUS 

= 15 (Trackdisk-Device) 

io_Actual 32 > 

0 - Disk nicht schreibgeschützt / <> 0 - 
schreibgeschützt 

Erklärung 

Stellt fest, ob die Disk im Laufwerk 
schreibgeschützt ist. Falls gar keine 
Disk im Laufwerk ist, hat der Rückgabe¬ 
wert natürlich keine Bedeutung. 

Die Kommandos 16 und 17 werden nachfolgend in einem geson¬ 
derten Abschnitt besprochen. 

TDGETDRIVETYPE 

= 18 (Trackdisk-Device) 

io_Actual 32 > 

Typ des angesprochenen Laufwerks 

Erklärung 

Ermittelt den Typ des Laufwerks, auf den 
sich die IORequests beziehen (5 1/4 oder 
3 1/2 Zoll-Laufwerk) 

Laufwerkstyp Wert 

Bedeutung 

DRIVE3 5 1 

DRIVE5 25 2 

Normales 3 1/5 Zoll-Laufwerk 

51/4 Zoll-Laufwerk 

TDGETNUMTRACKS 

= 19 (Trackdisk-Device) 

io Actual 32 > 

Maximalzahl Spuren für das Laufwerk 

Erklärung 

Stellt fest, wieviele Spuren das Lauf¬ 
werk besitzt (beim Amiga 160: 80 Ober¬ 
und 80 Unterseiten). 

TD_ADDCHANGEINT 

= 20 (Trackdisk-Device) 


ACHTUNG: Dieses Kommando soll, ebenso wie TD REMOVE, einen 
Interrupt installieren, der bei Diskwechseln aufgerufen 
wird. Aufgrund eines Fehlers im Betriebssystem wird aber an¬ 
statt des übergebenden Softlnt-Zeigers der Zeiger auf die 
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IORequest-Struktur in die Interruptliste aufgenommen, was 
beim nächsten Diskwechsel unweigerlich zu einem Absturz 
führt. 


TD REMCHANGEINT = 20 (Trackdisk-Device) 


Dieses Kommando soll einen mit TD_ADDCHANGEINT installierten 
Diskwechsel-Interrupt wieder entfernen. Da die ADDCHANGEINT- 
Routine jedoch fehlerhaft ist, wird die REMCHANGEINT-Routine 
wohl nie zum Einsatz kommen. 


10.3.4 Die Kommandos RAWREAI) und RAWWRITE 

Nun zu den noch fehlenden Kommandos Nr. 16 und 17. Um sie zu 
verstehen, müssen wir einen kleinen Abstecher in die Flop- 
pyhardware machen. 


Aufzeichnung und Kodierung 

Die Aufzeichnung von Daten auf einer Diskette beruht auf der 
Magnetisierung ihrer Oberfläche, wobei zwei "gegenläufige" 
Magnetflußrichtungen eingesetzt werden. Ein O-Bit wird als 
konstante Flußrichtung aufgezeichnet, ein 1-Bit als Fluß¬ 
richtungswechsel. Beim Lesen erzeugt dann jeder Flußrich¬ 
tungswechsel durch Induktion einen Stromimpuls im 
Schreib/Lese-Kopf. Diese Impulse werden als 1-Bits interpre¬ 
tiert, ein Ausbleiben des Impulses als O-Bit. 

So weit, so gut. Nun gibt es aber ein technisches Problem: 
Da O-Bits als konstante Flußrichtung aufgezeichnet werden, 
müssen bei vielen aufeinanderfolgenden O-Bits die einzelnen 
Bitzellen exakt gleich lang sein, damit die Floppy weiß, um 
wieviele O-Bits es sich handelt, sprich der Floppymotor muß 
vollkommen konstant rotieren. Das aber ist technisch unmög¬ 
lich, da jeder Motor GleichlaufSchwankungen unterworfen ist. 

Ebenso dürfen nicht zu viele 1-Bits aufeinanderfolgen, da 
der Schreib/Lese-Kopf nicht in der Lage ist, zu viele 
schnelle Flußwechsel eindeutig zu erkennen. 

Die aufzuzeichnenden Daten aber können jede beliebige Bit¬ 
folge enthalten. Die Daten müssen also vor der Aufzeichnung 
kodiert werden, und zwar so, daß die Anzahl aufeinanderfol¬ 
gender 0- und 1-Bits nicht zu groß wird. 

Der Amiga bedient sich dabei des sog. "MFM"-Kodierungsver- 
fahrens (MFM = Modified Frequency Modulation, Verbesserte 
Frequenzmodulation). Hinter jedes Datenbit wird ein 
"Taktbit" in den Datenstrom eingefügt. Falls die beiden an¬ 
grenzenden Bits die Kombinationen 0-0, 0-1 oder 1-0 aufwei¬ 
sen, wird ein 1-Taktbit eingefügt, bei der Kombination 1-1 
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ein O-Taktbit. Somit ist gewährleistet, daß die Anzahl auf¬ 
einanderfolgender gleicher Bits im Rahmen bleibt. 

Auf diese Weise wird die Menge der aufzuzeichnenden Daten 
natürlich verdoppelt. Das MFM-Verfahren geht also nicht ge¬ 
rade sparsam mit dem Diskettenplatz um, dafür kann die Ko¬ 
dierung und Dekodierung aber recht schnell geschehen. 


Blockheader und Blockdaten 

Da der Schreib/Lese-Kopf nicht "weiß", wo auf der Diskette 
er sich gerade befindet, kann die Floppy primär Blöcke nicht 
gezielt einiesen. Das TDD liest bei "normalen" Lesekommandos 
immer einen ganzen Track ein und sucht sich dann den richti¬ 
gen Bereich mit den gewünschten Blöcken heraus. 

Damit nun in dem Datenwust die Blöcke eindeutig identifi¬ 
ziert werden können, findet sich vor den eigentlichen Daten 
jedes Blockes ein "Blockheader". 

Der Header beginnt mit der "Preamble", einem kodierten 0- 
Wort (welches in MFM zu Saaaaaaaa wird). Dann folgt die sog. 
"Syncmarkierung", bestehend aus zwei $4489-Worten. Dieses 
Wort kann bei der MFM-Kodierung nicht Vorkommen, da in sei¬ 
nem Bitmuster zwischen zwei O-Datenbits ebenfalls ein 0- 
Taktbit stehen würde, was laut den MFM-Regeln verboten ist: 

$4489 = %0 100010010001001 
tdtdtdtdtdtdtdtd 


0-Taktbit zwischen zwei 0-Datenbits 

Dieses Wort ist somit gut als Startmarkierung für den Block¬ 
header geeignet. Als nächstes folgt die Angabe, um welchen 
Block in welchem Track es sich handelt. Diese Werte sind für 
die Auswahl des richtigen Blocks beim Lesen wichtig. Dann 
folgen 16 unbenutzte Bytes (die in MFM zu 32 werden) und zum 
Abschluß zwei Checksummen, eine über den Blockheader und 
eine über den anschließend folgenden Datenbereich. 

Die 16 unbenutzten Bytes werden gleich, im Zusammenhang mit 
den erweiterten TDD-Befehlen, eine Rolle spielen. 

Nun verstehen Sie wahrscheinlich auch die TDD-Fehlermeldun- 
gen 20 bis 27. Sie beziehen sich auf die Einträge des Sek¬ 
torheaders (Preamble, Sync, Checksummen). 

Der Blockheader hat in der MFM-kodierten Form eine Länge von 
64 Bytes. Die Daten selber belegen 1024 Bytes (512 Bytes hat 
ein Block normalerweise, durch MFM wird der Platz verdop¬ 
pelt). Das macht insgesamt 11968 Bytes. Hinzu kommt noch 
eine 696 Bytes lange Lücke (unbenutzter Speicherbereich), 
womit wir eine Bytelänge von 12264 für jeden Track errei¬ 
chen . 
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Mehr wollen wir zum Disk-Aufzeichnungsverfahren aber nicht 
sagen, Sie wissen jetzt alles, was zum Verständnis der Be¬ 
fehle RAWREAD und RAWWRITE nötig ist. 


RAWREAD und RAWWRITE 


TD RAWREAD = 16 (Trackdisk-Device) 


io Flags 

30 

< 

Zugelassene Flags siehe unten 

io Length 

36 

< 

Anzahl der aus dem Track zu lesenden By¬ 
tes (max. 12664) 

*io Data 

40 

< 

Start des Puffers im Speicher (muß immer 
im Chip-RAM liegen!) 

io Offset 

44 

< 

Zu lesende Spur (Achtung: Angabe hier 
nicht in Bvtes, sondern direkt als Spur- 
nummer (0-159)!) 

io Error 

Erklärung 

31 

> 

Fehlernummer oder 0 für kein Fehler 

Liest Daten von der Diskette, ohne sie 


anschließend zu dekodieren. 


TD RAWWRITE = 17 (Trackdisk-Device) 


io Flags 

30 

< 

Zugelassene Flags siehe unten 

io Length 

36 

< 

Anzahl der in dem Track zu schreibenden 
Bytes (max. 12664) 

*io Data 

40 

< 

Start des Puffers im Speicher (muß immer 
im Chip-RAM liegen!) 

io Offset 

44 

< 

Zu schreibende Spur (Achtung: Angabe 
hier nicht in Bvtes, sondern direkt als 
Spurnummer (0-159)!) 

io Error 

Erklärung 

31 

> 

Fehlernummer oder 0 für kein Fehler 

Schreibt Daten auf die Diskette, ohne 
sie vorher zu kodieren. 

RAW-Flag 


Wert 

Bedeutung 

IOTD INDEXSYNC 


16 

Indexloch-Synchronisation einschalten 

IOTD WORDSYNC 


32 

$4489-Wortsynchronisation einschalten 


Hierbei handelt es sich also um die "rohe" Form des Lese- 
bzw. Schreibbefehls. Er erwartet in io_Offset diesmal nicht 
die Blocknummer angegeben in Bytes, sondern direkt die Num¬ 
mer des gewünschten Tracks (und damit der gewünschten 
Seite). Wie schon erwähnt, kann das Laufwerk nicht gezielt 
auf bestimmte Blöcke zugreifen, es kann nur da, wo der Lese¬ 
kopf gerade steht, mit dem Lesen oder Schreiben beginnen. 
Der RAWREAD-Befehl kann auch nicht mehrere Tracks auf einmal 
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bearbeiten, die größte Byteanzahl ist die eines kompletten 
Tracks (12664). 

Die Flags veranlassen das Laufwerk, mit dem Lesen zu warten, 
bis entweder das Indexloch (kleines Loch in der Disketten¬ 
scheibe, das als Orientierungspunkt dient) oder die $4489- 
Syncmarkierung des nächsten Blocks erreicht wird. 

Die Daten liegen nach dem Lesen in MFM-kodierter Form vor. 
Das Heraussuchen des richtigen Blocks und das Dekodieren 
müssen Sie selbst übernehmen, ebenso das Kodieren vor dem 
Schreiben. Das ist der Grund, warum die RAW-Befehle des TDD 
gewöhnlich sehr selten eingesetzt werden. Wir wollen hier 
auch nicht näher auf sie eingehen. 

Interessant ist vielleicht noch, daß es für die Floppyhard- 
ware keinen Unterschied zwischen Schreiben und Formatieren 
gibt. Sie formatiert quasi immer. Der Schreibbefehl des TDD 
liest nämlich zunächst den gewünschten Track, sucht den bzw. 
die richtigen Blöcke heraus, ersetzt ihre Inhalte durch die 
zu schreibenden Daten und schreibt dann den kompletten Track 
zurück. 


10.3.5 Die erweiterten TDD-Kominandos 

Hierbei handelt es sich um Sonderformen bestimmter normaler 
TDD-Kommandos. Um anzuzeigen, daß es sich um ein erweitertes 
Kommando handelt, muß die ursprüngliche Kommandonummer mit 
$8000 OR-verknüpft werden (32768 aufaddieren bzw. Bit 15 
setzen). Folgende Kommandos existieren in der erweiterten 
Form: 


Kommando Nummer Kommando Nummer 


ETD 

READ 

32770 

ETD 

WRITE 

32771 

ETD" 

UPDATE 

32772 

ETD" 

"CLEAR 

32773 

ETD" 

MOTOR 

32777 

ETD" 

"SEEK 

32778 

ETD" 

FORMAT 

32779 

ETD“ 

"RAWREAD 

32784 

ETD" 

RAWWRITE 

32785 





Zur Benutzung dieser Befehle muß anstatt der IOStdReq-Struk- 
tur eine andere, um zwei Einträge größere verwendet werden: 
Die IOExtTD-Struktur. 

Die IOExtTD-Struktur 


00 

48 

52 

56 


ds.b iotd_I0StdReq,48 

de. 1 iotd_Count 

dc.l *iotd_SecLabel 
iotd SIZE0F 


; IOStdReq-Struktur (wie gewöhnlich) 
; Zähler für Diskwechsel 
; 16-Byte-Datenpuffer (siehe unten) 


iotdCount 

Hier kann ein Zählerstand für den Diskwechsel-Zähler einge¬ 
tragen werden. Das I0-Kommando wird dann nur ausgeführt, 
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wenn der wirkliche Diskwechsel-Zähler kleiner oder gleich 
dem angegebenen ist. Somit kann man z.B. sicherstellen, daß 
während einer Kette von Lese- und Schreibzugriffen nicht 
plötzlich die Diskette gewechselt wird und weitere Zugriffe 
auf eine andere Diskette ausgeführt werden. 

iotd_SecLabel 

Dieser Eintrag ermöglicht die Nutzung der 16 unbelegten, 
normalerweise nicht erreichbaren Bytes im Blockheader des 
angesprochenen Datenblocks. Wird hier ein Zeiger auf einen 
16 Byte großen Speicherbereich eingetragen, so wird dieser 
Bereich im Falle eines Schreibzugriffes in den Blockheader 
geschrieben, beim Lesezugriff wird der Bereich mit dem In¬ 
halt des Blockheaders gefüllt. 


Die erweiterten Kommandos arbeiten also genauso wie ihre 
"nicht-erweiterten" Entsprechungen, nur daß die zwei Sonder¬ 
funktionen Diskwechselzähler-Kontrolle und Nutzung der 16 
Bytes im Blockheader hinzukommen. 


10.3.6 Der Aufbau des Trackdisk-Devices 

Jedes Device hat bekanntlich eine Device-Struktur, die dem 
Aufbau der Library-Struktur entspricht. So auch das Track¬ 
disk-Device. Allerdings ist dieser Aufbau, bis auf die Li¬ 
brary-Struktur zu Beginn, nicht zwingend festgelegt, weshalb 
keine weiteren Angaben gemacht werden können. 


Die Unit-Struktur 

In den Eintrag *io_Unit der lORequest-Struktur schreibt das 
System beim Öffnen des Devices einen Zeiger auf die Unit- 
Struktur des angesprochenen Laufwerks. Von diesen Strukturen 
kann es bis zu 4 geben (logisch, es gibt ja maximal vier 
Laufwerke). Sie enthalten diverse, interessante Angaben für 
das Laufwerk, weshalb wir sie uns nun anschauen wollen. 

Die Unit-Struktur (für Trackdisk-Device) 


00 

ds.b 

tdu MsgPort,34 

! 


34 

dc.b 

tdu Flags 

t 

Allgemeine 

35 

dc.b 

tdu Pad 

1 

Unit-Struktur 

36 

dc.w 

tdu OpenCnt 

1 


38 

dc.w 

tdu CompOlTrack 

; Track für erste Precompensation 

40 

dc.w 

tdu ComplOTrack 

; Track für zweite Precompensation 

42 

dc.w 

tdu CompllTrack 

; Track für dritte Precompensation 

44 

dc.l 

tdu StepDelay 

; Verzögerungszeit beim Steppen 

48 

dc.l 

tdu SettleDelay 

; Verzögerungszeit nach dem Steppen 

52 

dc.b 

tdu RetryCnt 

; Wiederholversuche bei Fehlern 

53 


tdu SIZEOF 
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tdu_MsgPort 

Den Beginn jeder Unit-Struktur macht der Message-Port, an 
den die IORequests für das betreffende Device geschickt wer¬ 
den . 

tduFlags - tdu_OpenCnt 

Werden nur zur Systemverwaltung benutzt und sind für uns un¬ 
interessant. 

tduCompOlTrack - tduComplITrack 

Da die einzelnen Spuren zur Diskettenmitte hin kürzer werden 
und damit langsamer unter dem Schreib/Lese-Kopf hindurchwan¬ 
dern, müssen die Daten auf weiter innen liegenden Spuren 
langsamer aufgezeichnet werden als auf außen liegenden. Die 
Floppyhardware kennt vier verschiedene Verzögerungszeitstu¬ 
fen: 0, 140, 280 und 560 Nanosekunden (=milliardstel Sekun¬ 

den). Die CompTrack-Einträge geben an, ab welchem Track die 
jeweils nächste Verzögerungsstufe angewandt werden soll. 

tdu_StepDelay 

Hier steht ein Zahlenwert (standardmäßig 6000), der die 
Durchlaufzahl einer Verzögerungsschleife beim Versetzen des 
Schreib/Lese-Kopfes angibt. Dieses Versetzen geschieht, in¬ 
dem ein bestimmtes Hardwareregister aktiviert wird. Sobald 
die Floppy das Setzen erkennt, wird der Kopf um eine Spur 
verschoben. Dabei vergeht natürlich Zeit, weshalb das 
Kontrollprogramm eine Pause (Verzögerungsschleife) einlegen 
muß. Mit diesem Wert können Sie herumexperimentieren. 
Schreiben Sie z.B. einen kleineren Wert als 6000 hinein, 
geht das Steppen merklich schneller vonstatten. Es gibt aber 
einen gewissen Mindestwert, unter den Sie nicht gehen soll¬ 
ten (ca. 2000), da die Stepimpulse sonst zu schnell kommen 
und das Laufwerk nicht mehr "nachkommt" (Lesefehler). 

tdu_S ettleDelay 

Hier steht ein Verzögerungswert für eine Leerschleife, die 
nach der Beendigung des Steppens eingelegt wird, damit sich 
das Floppysystem wieder einpendeln kann. Auch hier sind Ex¬ 
perimente möglich. 

tduRet ryCnt 

Hier wird angegeben, wie oft das Laufwerk bei einem Lesefeh¬ 
ler einen erneuten Versuch starten soll (Standardwert 10), 
bevor ein Fehler ans TDD gemeldet wird, da auch auf 
eigentlich korrekten Disketten aufgrund von 

Motorschwankungen o.ä. schon mal Fehler auftreten können. 


10.3.7 Demoprogramm 

Ein Demoprogramm für das TDD darf natürlich nicht fehlen. Es 
erwartet in der Kommandozeile die Nummer des zu lesenden 
Laufwerks (0-3), liest den ersten Block von der Diskette und 
zeigt ihn auf dem Bildschirm an. Bei diesem ersten Block 
handelt es sich um den sog. "Boot-Block", dessen Bedeutung 
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im 12. Kapitel (DOS-Sonderteil, Abschnitt File System) noch 
genauer erklärt wird. 

Wir werden hier nur den Teil, der für das Einladen zuständig 
ist, abdrucken. Die Bildschirm-Ausgaberoutine sparen wir 
uns. 

* Programm 10.1 

(Auszug): Demonstration für Trackdisk-Device 

move.1 

ExecBase,a6 ; 

io.library öffnen 

moveq 

10,dO 


lea 

I0Name,al 


jsr 

0penLib(a6) 


move.1 

dO,IOBase 


beq 

Error 


main2: moveq 

#0,dl 

Flags 

move.1 

IOBase,a6 ; 

IO-Base 

lea 

DevName,aO ; 

DevName 

move.1 

#48,d2 ; 

Größe 

jsr 

CreateI0Fast(a6) 


tst.l 

dO 


beq 

Error1 ; 

Fehler beim Erstellen 

move.1 

dO,IOReq 


move.1 

ExecBase,a6 


move.1 

IOReq,al 


move.w 

#2,28(al) 

Kommando: Lesen 

move.1 

#512,36(al) ; 

512 Bytes 

move.1 

#Data,40(al) ; 

Nach Adresse 'Data' 

move.1 

#0,44(al) 

Offset = 0 (1. Block) 

jsr 

DoIO(a6) ; 

Ausführen 

tst.l 

dO 


bne 

Error2 



Error2: 

move. 1 

ExecBase,a6 


move. 1 

IOReq,al 


move.w 

#9,28(al) 


move. 1 

#0,36(al) 


jsr 

DoIO(a6) ; Motor aus 


move. 1 

IOBase,a6 


move.1 

IOReq,aO 


jsr 

DeleteIOFast(a6) ; Device schließen 

Errorl: 

move. 1 

ExecBase,a6 


move. 1 

IOBase,al 
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bset 

#3,14(al) 

; Expunge-Bit setzen 

jsr 

CloseLib(a6) 

; IOLibrary schließen (entfernen) 

Error: moveq 
rts 

#0,d0 


* Datenbereich 


DevName: 

dc.b "trackdisk.device",0 

even 


IOName: 
DosName: 


dc.b 

even 

dc.b 

even 


"io.library",0 

"dos.library",0 


DosBase: dc.l 0 
lOBase: dc.l 0 
IOReq: dc.l 0 


Programm 10.1 (Auszug): Demonstration für Trackdisk-Device 


10.4 Das Printer-Device 

Nun wollen wir uns das Device ansehen, mit dem wir den Druc¬ 
ker ansteuern können. Im Vergleich zum Trackdisk-Device ist 
die ganze Sache hier aber viel einfacher. 

Zunächst einmal ist wichtig, daß bei Benutzung des Printer- 
Devices die, den Drucker betreffenden Einstellungen im 
Preferences-Programm (Anschlußport, Druckertreiber, 
Druckmodus, Helligkeitswahl bei Grafikdruck etc.) von 
Bedeutung sind, da das Device auf sie zurückgreift. 

Beim öffnen des Devices sind die Angaben Unit und Flags ohne 
Bedeutung und sollten auf 0 stehen. 


10.4.1 Ausdruck von normalem Text 

Das Printer-Device kennt drei verschiedene Zugriffsarten und 
damit auch drei verschiedene Strukturen. Die erste Zugriffs¬ 
art ist das normale Senden von auszudruckendem Text. Hierfür 
wird die IOStdRequest-Struktur verwendet: 

Die IOStdRequest-Struktur (für Printer-Device) 


00 

ds.b 

io Message,20 

; Zugehörige Message-Struktur 

20 

dc.l 

*io Device 

; Zeiger auf Device 

24 

dc.l 

*io_Unit 

; Zeiger auf Unit 

28 

dc.w 

io Command 

; Printer-Kommando 
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30 

dc.b 

io Flags 

nicht benutzt 


31 

dc.b 

io Error 

Eventueller Fehler 


32 

dc.l 

io Actual 

nicht benutzt 


36 

dc.l 

io Length 

Anzahl der zu übertr 

. Zeichen 

40 

dc.l 

*io Data 

Zeiger auf Daten im 

Speicher 

44 

dc.l 

io Offset 

nicht benutzt 


48 


io SIZEOF 




io_Command 

Von den Standard-Kommandos ist zur Druckausgabe natürlich 
nur WRITE sinnvoll. Das Printer-Device kennt aber noch 3 
devicespezifische Kommandos, von denen zwei aber andere 10- 
Strukturen erwarten und daher etwas später erklärt werden. 

Printer-Kommando Wert Bedeutung 


CMD_WRITE 3 
PRD_RAWWRITE 9 
PRD_PRTCOMMAND 10 
PRD DUMPRPORT 11 


Normalen Text ausdrucken 
Nicht-vorbehandelten Text ausdrucken 
Standard-Druckerkommando senden 
Hardcopy eines Rastports ausdrucken 


io_Error 

Folgende Fehlermeldungen beim Drucken sind möglich: 


Printer-Fehler Wert Bedeutung 


PDERR_CANCEL 

PDERRJJOTGRAPHICS 

PDERR_INVERTHAM 

PDERR_BADDIMENSI0N 

PDERR_DIMENSI0N0VFL0W 

PDERR_INTERNALMEMORY 

PDERR BUFFERMEMORY 


1 Drucker nicht druckbereit 

2 Drucker kann keine Grafik drucken 

3 HAM-Grafik kann nicht invertiert werden 

4 Ungültige Druck-Grafikgröße 

5 Druck-Grafikgröße zu hoch 

6 Kein Speicher für interne Variablen 

7 Kein Speicher für Druckpuffer 


PDERR CANCEL 


PDERR NOTGRAPHICS 


PDERR INVERTHAM 


Wenn der Drucker eine gewisse Zeit lang (ca. 20 
Sekunden) nicht auf ein gesandtes Kommando an¬ 
spricht, weil z.B. das Papier ausgegangen ist, 
er auf Off-Line steht oder ganz einfach nicht 
eingeschaltet ist, wird ein System-Reguester 
"Printer Trouble ... Retry/Cancel" angezeigt. 
Falls der User der Requester mit Retry beantwor¬ 
tet, wird der Zugriff erneut versucht, bei Can- 
cel wird der IORequest mit dem Fehler 
PDERR_CANCEL zurückgesandt. 

Dieser Fehler tritt auf, wenn versucht wird, auf 
einem nicht-grafikfähigen Drucker (Typenrad 
o.ä.) das DumpRPort-Koiranando (Rastport-Hardcopy) 
auszuführen. 

Eine HAM-Grafik kann aufgrund ihres Aufbaus 
nicht invertiert ausgedruckt werden. 


io_Length 

Enthält die Länge des auszudruckenden Textes in Bytes. Falls 
hier eine -1 steht, muß der Text mit einem O-Byte abge¬ 
schlossen sein. 
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*io Data 

Zeiger auf den Textbeginn im Speicher. 


CMD_WRITE = 3 (Printer-Device) 


io Length 

36 

< 

Bytelänge des auszudruckenden Texts (bei 
-1 muß der Text mit einem O-Byte abge¬ 
schlossen sein). 

*io Data 

40 

< 

Startadresse des Textes im Speicher 

io Error 

31 

> 

Fehlernummer oder 0, falls kein Fehler 

Erklärung 



Druckt vorbehandelten Text aus, d.h. be- 


stimmte Steuerzeichen werden druckerspe¬ 
zifisch durch andere Zeichen ersetzt. 
Zum Ausdruck von reinem Text kann 
CMD WRITE verwendet werden. 


Die meisten Drucker kennen interne Steuersequenzen, die mit 
dem ESC-Zeichen (ASCII-Wert 27) beginnen. Ein Beispiel ist 
die Sequenz ESC-xl ("x" und "1" als ASCII-Zeichen) , die bei 
vielen Druckern den NLQ-Modus einschaltet. Solche sog. ESC- 
Sequenzen können mit dem Kommando CMD_WRITE nicht ausgegeben 
werden, da das ESC-Zeichen durch die Vorbehandlung durch an¬ 
dere Zeichen ersetzt wird. In diesem Fall muß das nächste 
Kommando, PRD_RAWWRITE, benutzt werden. 


PRD RAWWRITE 


9 (Printer-Device) 


io Length 

36 

< Bytelänge des auszudruckenden Texts (bei 
-1 muß der Text mit einem 0-Byte abge¬ 
schlossen sein). 

*io Data 

40 

< Startadresse des Textes im Speicher 

io Error 

31 

> Fehlernummer oder 0, falls kein Fehler 

Erklärung 


Druckt nicht-vorbehandelten Text. Alle 
Zeichen werden genau so, wie sie kommen, 
zum Drucker geschickt. 


Dieses Kommando kann auch zur Ausgabe von ESC-Sequenzen ver¬ 
wendet werden. Im Zweifelsfalle sollten Sie es anstelle von 
CMD WRITE verwenden. 


10.4.2 Ausgabe von Drucker-Steuerkommandos 

Kommen wir zur zweiten Zugriffsart auf das Printer-Device 
und damit zur zweiten Struktur. Es gibt eine Reihe standar¬ 
disierte Drucker-Steuerkommandos, die Funktionen wie Fett- 
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druck, Kursivdruck, NLQ etc. aktivieren. Sie sind drucker¬ 
unabhängig und werden vom Device beim Senden an den jeweili¬ 
gen, in den Preferences eingestellten, Drucker angepaßt. 

Das Senden eines solchen Steuerkommandos geschieht mit dem 
Printer-Kommando PRD_PRTCOMMAND. Anstelle der IOStdReq- 
Struktur wird die folgende benötigt: 


Die IOPrtCmdReq-Struktur (Printer Conunand Request) 


00 

ds.b 

iopcr IORequest,32 

32 

dc.w 

iopcr PrtCommand 

34 

dc.b 

iopcr_ParmO 

35 

dc.b 

iopcr_Parml 

36 

dc.b 

iopcr Parm2 

37 

dc.b 

iopcr Parm3 

38 


iopcr SIZEOF 


; Eine IORequest-Struktur 
; Steuerkommando 

; Erster Parameter (falls nötig) 

; Zweiter Parameter (falls nötig) 

; Dritter Parameter (nicht benutzt) 
; Vierter Parameter (nicht benutzt) 


iopcr_IORequest 

Vor der eigentlichen Struktur befindet sich eine IORequest- 
Struktur, also die einfachste Form der IO-Strukturen. 

iopcrPrtCommand 

Folgende Steuerkommandos sind möglich. Falls ein kleines 'n' 
oder 'm' in einer Beschreibung auftritt, bedeutet dies, daß 
n bzw. m der Parameter des Kommandos ist, der in iopcr_ParmO 
bzw. iopcr Parml abgespeichert werden muß. In der "Wert"- 
Spalte stehen die Zahlen, die in iopcr_PrtCommand eingetra¬ 
gen werden müssen. In der Spalte "ESC-Sequenz" steht die 
Entsprechung des Steuerkommandos in ANSI-Form. Der Text ESC 
steht dabei für das ASCII-Zeichen 27, alle weiteren Zeichen 
müssen (bis auf ein kleines 'n' oder 'm' , wenn in der Be¬ 
schreibung n oder m als Parameter auftritt) exakt als ASCII- 
Zeichen übernommen werden. 


Kommando Wert ESC-Sequenz Bedeutung 


aRlS 

0 

ESCc 

aRIN 

1 

ESCfl 

alND 

2 

ESCD 

aNEL 

3 

ESCE 

aRI 

4 

ESCM 

aSGRO 

5 

ESC[0m 

aSGR3 

6 

ESC[3m 

aSGR23 

7 

ESC[23m 

aSGR4 

8 

ESC[4m 

aSGR24 

9 

ESC[24m 

aSGRl 

10 

ESC[lm 

aSGR22 

11 

ESC[lim 

aSFC 

12 

ESC[3nm 

aSBC 

13 

ESC[4nm 

aSHORPO 

14 

ESC[0w 

aSH0RP2 

15 

ESC[2w 

aSHORPl 

16 

ESC[lw 


Drucker-Reset ausführen 
Drucker initialisieren 
Zeilenvorschub 

Wagenrücklauf + Zeilenvorschub 
Zeile nach oben 

Standard-Zeichensatz 
Kursivschrift ein 
Kursivschrift aus 
Unterstrichen ein 
Unterstrichen aus 
Fettdruck ein 
Fettdruck aus 

Vordergrundfarbe n (0-9) einstellen 
Hintergrundfarbe n (0-9) einstellen 

Normale Druckbreite 
Elite-Druckdichte ein 
Elite-Druckdichte aus 
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aSH0RP4 

17 

ESC[4w 

aSH0RP3 

18 

ESC[3w 

aSH0RP6 

19 

ESC[6w 

aSH0RT5 

20 

ESC[5w 

aDEN6 

21 

ESC[6"z 

aDEN5 

22 

ESC[5"z 

aDEN4 

23 

ESC[4"z 

aDEN3 

24 

ESC[3"z 

aDEN2 

25 

ESC[2"z 

aDENl 

26 

ESC[1"z 

aSUS2 

27 

ESC[2v 

aSUSl 

28 

ESC[lv 

aSUS4 

29 

ESC[4v 

aSUS3 

30 

ESC[3v 

aSUSO 

31 

ESC[0v 

aPLU 

32 

ESCL 

aPLD 

33 

ESCK 

aFNTO 

34 

ESC(B 

aFNTl 

35 

ESC(R 

aFNT2 

36 

ESC(K 

aFNT3 

37 

ESC(A 

aFNT4 

38 

ESC(E 

aFNT5 

39 

ESC(H 

aFNT6 

40 

ESC(Y 

aFNT7 

41 

ESC(Z 

aFNT8 

42 

ESC(J 

aFNT9 

43 

ESC (6 

aFNTIO 

44 

ESC(C 

aPR0P2 

45 

ESC[2p 

aPROPl 

46 

ESC[lp 

aPROPO 

47 

ESC[0p 

aTSS 

48 

ESC[n E 

aJFY5 

49 

ESC[5 F 

aJFY7 

50 

ESC[7 F 

aJFY6 

51 

ESC[6 F 

aJFYO 

52 

ESC[0 F 

aJFY2 

53 

ESC[2 F 

aJFY3 

54 

ESC[3 F 

aVERPO 

55 

ESC[0z 

aVERPl 

56 

ESC[lz 

aSLPP 

57 

ESC[nt 

aPERF 

58 

ESC[nq 

aPERFO 

59 

ESC[0q 

aLMS 

60 

ESC#9 

aRMS 

61 

ESC#0 

aTMS 

62 

ESC|8 

aBMS 

63 

ESC#2 

aSTBM 

64 

ESC[Pn;mr 

aSLRM 

65 

ESC[Pn;ms 

aCAM 

66 

ESC#3 


Schmalschrift ein 
Schmalschrift aus 
Breitschrift ein 
Breitschrift aus 

Schattendruck ein 
Schattendruck aus 
Doppeldruck ein 
Doppeldruck aus 
NLQ ein 
NLQ aus 

Hochstellen ein 
Hochstellen aus 
Tiefstellen ein 
Tiefstellen aus 
Normale Schriftstellung 
Teillinie aufwärts 
Teillinie abwärts 

Zeichensatz USA 
Zeichensatz Frankreich 
Zeichensatz Deutschland 
Zeichensatz England 
Zeichensatz Dänemark 1 
Zeichensatz Schweden 
Zeichensatz Italien 
Zeichensatz Spanien 
Zeichensatz Japan 
Zeichensatz Norwegen 
Zeichensatz Dänemark 2 

Proportional ein 
Proportional aus 

Proportional-Einstellung löschen 
Proportional-Offset n einstellen 
Linksausrichtung 
Rechtsausrichtung 
Zentrierte Ausrichtung 
Ausrichtung aus 
Wortabstand (Zentrierung) 
Buchstabenabstand (Ausrichtung) 

Zeilenabstand 1/8" 

Zeilenabstand 1/6" 

Seitenlange n einstellen 
Überspringe n (n>0) Zeilen 
Überspringen aus 

Linker Rand gesetzt 

Rechter Rand gesetzt 

Oberer Rand gesetzt 

Unterer Rand gesetzt 

Setze Ränder auf n oben, m unten 

Setze Ränder auf n links, m rechts 

Ränder löschen 
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aHTS 

67 

ESCH 

Horizontal-Tabulator setzen 

aVTS 

68 

ESCJ 

Vertikal-Tabulator setzen 

aTBCO 

69 

ESC[0g 

Horizontal-Tabulator löschen 

aTBC3 

70 

ESC[3g 

Alle Horizontal-Tabulatoren löschen 

aTBCl 

71 

ESC(lg 

Vertikal-Tabulator löschen 

aTBC4 

72 

ESC[4g 

Alle Vertikal-Tabulatoren löschen 

aTBCALL 

73 

ESC#4 

Alle V- und H-Tabulatoren löschen 

aTBSALL 

74 

ESC#5 

Standard-Tabulatoren setzen 

aEXTEND 

75 

ESC[Pn"x 

Erweitertes Kommando n ausführen 


iopcrParmO, iopcr_Parml 

Falls das Steuerkommando Parameter benötigt, müssen sie hier 
eingetragen werden. 

iopcr Parm2, iopcr_Parm3 

Es sind Kommandos mit bis zu vier Parametern vorgesehen, 
derzeit gibt es aber nur welche mit maximal zweien. Diese 
beiden Einträge werden daher nicht benutzt. 


PRD PRTCOMMAND = 10 (Printer-Device) 


PrtCommand 

32 

< 

Auszuführendes Steuerkommando 

ParmO 

34 

< 

Erster Parameter 

(falls nötig) 

Parml 

35 

< 

Zweiter Parameter 

(falls nötig) 

Error 

31 

> 

Fehlernummer oder 

0, wenn kein Fehler 

Erklärung 



Sendet eins der eben beschriebenen Steu 


erkommandos zum Drucker. 


10.4.3 Ausdrucken einer Rastport-Grafik 

Die wahrscheinlich interessanteste Funktion, die das Prin¬ 
ter-Device bietet, ist das Ausdrucken einer Bitmap-Grafik. 
Auf einem Schwarz/Weiß-Drucker werden dabei die verschie¬ 
denen Farben in mehr oder weniger dichte Punktmuster umge¬ 
setzt, die bei Betrachtung des Ausdrucks aus einiger Entfer¬ 
nung den Eindruck unterschiedlicher Helligkeiten erwecken. 
Auf einem Farbdrucker wird natürlich das beste Ergebnis er¬ 
zielt, da die Farben fast originalgetreu wiedergegeben wer¬ 
den können. 


Für die Funktion Rastport-Dump wird ebenfalls eine spezielle 
Struktur benötigt, die IODRPReq-Struktur: 

Die IODRPReq-Struktur (Dump RastPort Request) 


00 

ds.b 

iodrpr IORequest 

; IORequest-Struktur 

32 

dc.l 

‘iodrpr RastPort 

; Zeiger auf zu druckenden Rastport 

36 

dc.l 

‘iodrpr ColorMap 

; Zeiger auf Farbtabelle des RPort 

40 

dc.l 

iodrpr Modes 

; View-Modus der Grafik 
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44 

dc.w 

iodrpr_SrcX 

; x-Start der Rastportgrafik 

46 

dc.w 

iodrpr SrcY 

; y-Start der Rastportgrafik 

48 

dc.w 

iodrpr SrcWidth 

; Breite der Rastportgrafik 

50 

dc.w 

iodrpr SrcHeight 

; Höhe der Rastportgrafik 

52 

de. 1 

iodrpr DestCols 

; Breite der Druckergrafik 

56 

dc.l 

iodrpr DestRows 

; Höhe der Druckergrafik 

60 

dc.w 

iodrpr Special 

; Optionsflags 

62 


iodrpr SIZEOF 



iodrpr IORequest 

Wie beT der IOPrtCmdReq-Struktur befindet sich vor der ei¬ 
gentlichen Struktur eine IORequest-Struktur, also die ein¬ 
fachste Form der IO-Strukturen. 


*iodrpr_RastPort 

Ein Zeiger auf den Rastport, der die auszudruckende Grafik 
enthält. 

*iodrpr_ColorMap 

Zeiger auf die Farbtabelle, welche die Farbeinstellungen für 
die Grafik enthält. Sie kann über den Zeiger vp_ColorMap im 
ViewPort der Grafik erreicht werden. 

iodrpr_Modes 

Hier muß der Viewmodus der Grafik (Hires, Interlace, HAM 
usw. ) eingetragen werden. Dieser ist auch aus dem Viewport 
ersichtlich (Eintrag vpModes) 

iodrprSrcX, iodrprSrcY, iodrprSrcWidth, iodrprSrcHeight 
Die Startkoordinaten und Breite des Grafikteils, der ausge¬ 
druckt werden soll. Über diese Einträge ist es möglich, nur 
einen Teil des Rastports auszudrucken. 

iodrpr_DestCols, iodrprDestRows 

Die Breite und Höhe der Grafik beim Ausdruck (in Pixeln). 
Durch diese Werte ist es möglich, die Grafik auf dem Drucker 
verkleinert oder vergrößert auszugeben. Sogar eine getrennte 
Größenangabe für die horizontale und vertikale Richtung ist 
möglich. Falls der Ausdruck 1:1 erfolgen soll, können Sie 
diese beiden Werte auf 0 setzen und die Flag SPE- 
CIAL_FULLCOLS und SPECIAL_ASPECT benutzen. 

iodrpr_Special 

Hier können folgende Flags eingetragen werden: 

RPortDump-Flag Wert Bedeutung 


SPECIAL_MILCOLS 

SPECIÄL_MILROWS 

SPECIAL_FULLCOLS 

SPECIAL_FULLROWS 

SPECIAL_FRACCOLS 

SPECIAL_FRACROWS 

SPECIAL_CENTER 

SPECIAL_ASPECT 

SPECIAL DENSITY1 


$001 DestCols ist in 1/1000" angegeben 

$002 DestRows ist in 1/1000" angegeben 

$004 Maximale Spaltenzahl beim Druck 

$008 Maximale Zeilenzahl beim Druck 

$010 DestCols ist ein Bruchteil von FULLCOLS 

$020 DestRows ist ein Bruchteil von FULLROWS 

$040 Zentrierter Ausdruck 

$080 Verhältnis Breite-Höhe korrigieren 

$100 Minimale Druckdichte 
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SPECIAL_DENSITY2 
SPECIAL_DENSITY3 
SPECIAL DENSITY4 


$200 Zweitniedrigste Druckdichte 

$300 Zweithöchste Druckdichte 

$400 Höchste Druckdichte 


SPECIALMILCOLS 

SPECIALMILROWS 

SPEC IALFULLCOLS 
SPECIAL FULLROWS 
SPECIALFRACCOLS 
SPECIALFRACROWS 
SPECIALCENTER 

SPECIAL ASPECT 


SPECIAL DENSITYn 


Ist dieses Flag gesetzt, wird die Angabe für 
DestCols als 1/1000" interpretiert, ansonsten 
als Pixelwert. 

Ist dieses Flag gesetzt, wird die Angabe für De- 
stRows als 1/1000" interpretiert, ansonsten als 
Pixelwert. 

Die Grafik wird in maximaler Breite ausgedruckt. 
Die Angabe für DestCols wird ignoriert. 

Die Grafik wird in maximaler Höhe ausgedruckt. 
Die Angabe für DestRows wird ignoriert. 

Der DestCols-Wert wird als Bruchteil der maxima¬ 
len Druckbreite angenommen. 

Der DestRows-Wert wird als Bruchteil der maxima¬ 
len Druckhöhe angenommen. 

Die Grafik wird zentriert ausgedruckt. Falls als 
Breite die maximale Druckbreite angegeben ist 
(oder das entsprechende Flag gesetzt ist), hat 
CENTER keine Funktion. 

Das Verhältnis Breite-Höhe wird automatisch ge¬ 
mäß der DestCols-Angabe korrigiert. Der Wert für 
DestRows wird ignoriert. In Kombination mit SPE- 
CIALFULLCOLS kann man eine Grafik mit maximaler 
Breite und angepaßtem Seitenverhältnis ausdruk- 
ken, ohne herumrechnen zu müssen. 

Stellt die Druckdichte n (1-4) ein. Je höher die 
Dichte, desto besser die Auflösung, desto klei¬ 
ner wird aber die Grafik. 


PRD DUMPRPORT = 11 (Printer-Device) 


RastPort 

32 

< 

Zeiger auf zu druckenden Rastport 

ColorMap 

36 

< 

Zeiger auf Farbtabelle des RPort 

Modes 

40 

< 

View-Modus der Grafik 

SrcX 

44 

< 

x-start der Rastportgrafik 

SrcY 

46 

< 

y-Start der Rastportgrafik 

SrcWidth 

48 

< 

Breite der Rastportgrafik 

SrcHeight 

50 

< 

Höhe der Rastportgrafik 

DestCols 

52 

< 

Breite der Druckergrafik 

DestRows 

56 

< 

Höhe der Druckergrafik 

Special 

60 

< 

Optionsflags 

Error 

31 

> 

Fehlernummer oder 0, wenn kein Fehler 

Erklärung 



Druckt die angegebene Rastport-Grafik 
mit den angegebenen Parametern aus 


(Hardcopy). 
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10.4.4 Demoprograimn: Hardcopy 

Als Beispielprogramm nehmen wir uns das interessanteste Fea¬ 
ture des Printer-Device vor: die DumpRPort-Funktion. Wir er¬ 
weitern das Anzeigeprogramm für IFF-Grafiken aus dem Gra- 
phics-Kapitel um eine Routine, welche die eingeladene und 
dargestellte Grafik per Hardcopy ausdruckt. Der Name der 
Grafik wird wieder in der Kommandozeile erwartet. 


* Programm 10.2 (Auszug): Ausdrucken einer IFF-Grafik 

... ; IFF-Grafik ist als Screen darge- 

; stellt. 


main4: bsr 

printscreen ; 

Zur Ausdruck-Routine 

printscreen: 

move.1 

ExecBase,a6 ; 

IO-Library öffnen 

lea 

ioname,al 


clr.l 

do 


jsr 

0penLib(a6) 


tst.l 

dO ; 

Fehler? 

beq 

ps2 


move.1 

dO,iobase 


move.1 

d0,a6 


lea 

prtname,aO ; 

Name des Devices 

clr.l 

dO ; 

Keine Unit 

clr.l 

dl 

Keine Flags 

moveq 

#62,d2 

Strukturlänge 62 

jsr 

CreateI0Fast(a6) 

; Dev. öffnen 

tst.l 

dO 

Fehler? 

beq 

psl 


move.1 

dO,prtreq 


move.1 

dO,al ; 

Printer-Request 

move.w 

#11,28(al) 

Kommando: DumpRPort 

move.1 

scr,32(al) ; 

Zeiger auf Screen 

add.l 

#$54,32(al) 

Screen+$54 = RastPort 

move.1 

scr,aO ; 

Screen-Zeiger 

add.l 

#$2c,a0 ; 

Screen+$$2c = ViewPort 

move.1 

4(a0),36(a1) 

Zeiger auf Colormap 

clr.l 

dO 

move.w 

sview,dO ; 

Viewmodus 

move.1 

d0,40(al) 


move.w 

#0,44(al) 

Start-x 

move.w 

#0,46(al) ; 

Start-y 

move.w 

swidth,48(al) ; 

Breite Bildschirmgrafik 

move.w 

sheight,50(al) ; 

Höhe Bildschirmgrafik 
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clr.l 

clr.l 

move.w 

52(al) 

56(al) 
#$84,60(al) 

Breite u. Höhe Druckergrafik 
nicht nötig 

Flags: FullCols, Aspect 


move.1 
jsr 

ExecBase,a6 
DoIO(a6) ; 

Druck ausführen 


tst.b 

beq 

31(al) 
ps3 

Fehler? 


move.1 

lea 

bsr 

dosbase,a6 ; 

txt4,a0 

print 

Meldung "Device-Fehler" 

ps3: 

move.1 
move.1 
jsr 

iobase,a6 ; 

prtreq,a0 

DeleteIOFast(a6) 

Dev. schließen 

psl: 

move.1 
move.1 
jsr 

a6,al ; 

ExecBase,a6 

CloseLib(a6) 

IO-Lib schließen 

ps2: 

rts 




* Datenbereich 

dosname: dc.b 

"dos.library",0 

intname: 

even 

dc.b 

"intuition.library",0 

gfxname: 

even 

dc.b 

"graphics.library", 0 

ioname: 

even 

dc.b 

"io.library",0 

dosbase: 

even 

dc.l 

0 

intbase: 

dc.l 

0 

gfxbase: 

dc.l 

0 

iobase: 

dc.l 

0 

prtname: 

dc.b 

"Printer.device",0 

prtreq: 

even 

dc.l 

0 


txt4: dc.b "Printer-Device meldete Fehler!",10,0 


Programm 10.2 (Auszug): Ausdrucken einer IFF-Grafik 
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10.5 Das Console-Device 

Das Console-Device übernimmt die Ein- und Ausgabefunktionen. 
Dabei ist die Arbeit des Console-Device immer an ein Fenster 
gebunden, über welches kommuniziert werden soll. Für dieses 
Fenster wurde beim öffnen des Devices eine spezielle Con- 
sole-Unit-Struktur angelegt, die nur für dieses Fenster zu¬ 
ständig ist. Die Struktur enthält, neben den Daten für das 
Fenster, auch noch einen Puffer für die Daten (liegt im pri¬ 
vaten Bereich), die gelesen worden sind. Diese Daten, die 
schon mit Hilfe der "keyboard.resource" in ASCII-Zeichen um¬ 
gewandelt worden sind, können mit Hilfe der cmd_Read- 
Anweisung ausgelesen werden. 

ConUnit-Struktur: 


000 

dc.l 

*mp Succ 

/ ' 


004 

dc.l 

*mp Pred 

/ 


008 

dc.b 

mp Type 

/ 

MessagePort 

009 

dc.b 

mp Pri 

! 


010 

dc.l 

*mp Name 

/ 


014 

dc.b 

mp Flags 

t 


015 

dc.b 

mp SigBit 

1 


016 

dc.l 

mp SigTask 

/ 


020 

dc.l 

*lh Head 

} 


024 

dc.l 

*lh_Tail 

f 


028 

dc.l 

*lh TailPred 

1 


032 

dc.b 

lh Type 

1 


033 

dc.b 

lh_Pad 

1 


034 

dc.l 

*cu Window 

f 

Zeiger auf Fenster 

038 

040 

dc.w 

dc.w 

cu XCP 

CU_YCP 

;j- Zeichenposition 
/ 

042 

044 

dc.w 

dc.w 

cu XMax 
cu YMax 

,-j— Max. Zeichenposition 
/ 

046 

048 

dc.w 

dc.w 

cu XRSize 
cu YRSize 

,-j— Größe des Zeichenrasters 
# 

050 

dc.w 

cu XROrigin 

;j— Anfangspunkt 

052 

dc.w 

cu YROrigin 

054 

dc.w 

cu XRExtant 

;j— Ausdehnung 

056 

dc.w 

cu YRExtant 

058 

060 

dc.w 

dc.w 

cu XMinShrink 
cu YMinShrink 

;j— Min. Fensterausdehnung 
/ 

062 

064 

dc.w 

dc.w 

cu XCCP 
cu_YCCP 

; j— Position des Cursors 
/ 

066 

dc.l 

*k® LoKeyMapTypes 

/ " 


070 

dc.l 

*km LoKeyMap 

f 


074 

dc.l 

*km LoCapsable 

/ 


078 

dc.l 

*km LoRepeatable 

/ 

KeyMap-Struktur 

082 

dc.l 

*km HiKeyMapTypes 

/ 

(aktuelle) 

086 

dc.l 

*km HiKeyMap 

/ 


090 

dc.l 

*km HiCapsable 

} 


094 

dc.l 

*km HiRepeatable 

r 
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098 ds.w 

258 dc.b 

259 dc.b 

260 dc.b 

261 dc.b 

262 dc.b 

263 dc.b 

264 dc.l 

268 ds.b 

276 dc.l 

280 dc.b 

281 dc.b 

282 dc.W 

284 dc.W 

286 dc.W 

288 dc.W 

290 ds.b 

293 ds.b 

296 


Die, in der ConUnit-Struktur abgelegten Werte beziehen sich, 
wie schon erwähnt, auf ein bestimmtes Fenster. Dieses Fen¬ 
ster, bzw. die Adresse auf dessen Window-Struktur, muß in 
die IOReguest-Struktur eingetragen werden. Nachdem die 
Struktur eingerichtet worden ist (OpenDevice), enthält der 
Eintrag io_Unit die Adresse der neu angelegten ConUnit- 
Struktur und der Eintrag io_Device die Adresse der Library- 
Struktur des Devices. 

Neben den Standard-Device-Funktionen gibt es noch vier Spe¬ 
zialfunktionen, mit denen man die Tastaturtabelle, die beim 
Umwandeln der RAW-Codes in ASCII-Codes benutzt werden soll, 
setzen bzw. erfragen kann. 


cd_AskKeyMap = 9 (Console-Device) 


io_Length 

36 

< 

Länge der KeyMap-Struktur. 

io Data 

40 

< 

Zeiger auf Datenbereich für KeyMap 
Struktur. 

io_Error 

31 

> 

Fehlernummer. 

Erklärung 



Es wird die momentan gesetzte Tastatur 


tabeile (KeyMap-Struktur) in den angege¬ 
benen Bereich kopiert. 


cdSetKeyMap = 10 (Console-Device) 

io_Length 36 < Länge der KeyMap-Struktur. 

io_Data 40 < Zeiger auf Datenbereich für KeyMap- 

Struktur, die gesetzt werden soll. 
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io Error 

Erklärung 

31 

> 

Fehlernummer. 

Es wird die angegebenen KeyMap- 
gesetzt. 

Struktur 

cd AskDefaultKeyMap = 11 (Console-Device) 

io Length 

36 

< 

Länge der KeyMap-Struktur. 


io Data 

40 

< 

Zeiger auf Datenbereich für 

KeyMap- 




Struktur. 


io Error 

31 

> 

Fehlernummer. 


Erklärung 



Es wird die Default-Tastaturtabelle in 




den angegebenen Bereich kopiert. 


cd SetDefaultKeyMap = 12 (Console-Device) 

io Length 

36 

< 

Länge der KeyMap-Struktur. 


io Data 

40 

< 

Zeiger auf Datenbereich für 

KeyMap- 




Struktur. 


io Error 

31 

> 

Fehlernummer. 


Erklärung 



Es wird die Default-Tastaturtabelle in 


den angegebenen Bereich kopiert. 


10.5.1 Die Keymap-Struktur 

Die oben angesprochene KeyMap-Struktur, anhand derer die 
RAW-Codes in ASCII-Zeichen konvertiert werden, besteht aus 
acht Langworten. Dabei sind die ersten vier Zeiger für die 
RAW-Codes $00 bis $3f (Lo) und die letzten vier für die RAW- 
Codes $40 bis $67 (Hi) verantwortlich. 


KeyMap-Struktur: 


00 

dc.l 

*km LoKeyMapTypes ;• 

Zeiger auf Typentab. 

04 

dc.l 

*km LoKeyMap ; 

Lo Zeiger auf KeyMap 

08 

dc.l 

*km_LoCapsable ; 

$00—$3f Capsable-Werte 

12 

dc.l 

*km LoRepeatable 

Repeatable-Werte 

16 

dc.l 

*km HiKeyMapTypes ;• 

Zeiger auf Typentab. 

20 

dc.l 

*km HiKeyMap ; 

Hi Zeiger auf KeyMap 

24 

dc.l 

*km HiCapsable ; 

$40—$67 Capsable-Werte 

28 

dc.l 

*km HiRepeatable ;■ 

Repeatable-Werte 

32 


km SIZE0F 
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*km_LoKeyMapTypes/*km_HiKeyMapTypes 

Der erste Langwort-Wert (km Lo-/km_HIKeyMapTypes) enthält 
die Adresse einer Tabelle, die für jeden RAW-Code (0-$3f 
oder $40-$67) einen Byte-Wert enthält, in dem der Typ der 
Taste abgelegt worden ist. 


Name 

Wert 

Bedeutung 

KC NORMAL 

$00 

Taste hat nur eine Belegung 

KC SHIFT 

$01 

Shift-Taste 

KC ALT 

$02 

Alt-Taste 

KC CONTROL 

$04 

Ctrl-Taste 

KC VANILLA 

$07 

Ctrl-Taste wird normal behandelt 

KC DOWNUP 

$08 

Taste wurde losgelassen 

KC DEAD 

$20 

keine Reaktion 

KC STRING 

$40 

Taste gibt eine Zeichenkette aus 


*km_LoKeyMap/*km_HiKeyMap 

Der nächste Zeiger (*km_Lo-/*km_HiKeyMap) verweist auf eine 
Tabelle, in der für jeden RAW-Code vier Bytes abgelegt sind. 
Diese vier Bytes werden je nach Kombination der KC-Flags 
(*km_LoKeyMapTypes/*km_HiKeyMapTypes) benutzt. Dabei soll 
die nächste Tabelle die Belegung der vier Bytes, bei den er¬ 
laubten Typ-Kombinationen, zeigen. 


Kombination 

Wert 

1.Byte 

2. Byte 

3. Byte 

4. Byte 

KC DEAD 

$20 


- 


- 

- 

- 

KC NOQUAL 

$00 


- 


- 

- 

normal 

KC SHIFT 

$01 


- 


- 

S 

normal 

KC ALT 

$02 


- 


- 

A 

normal 

KC CONTROL 

$04 


- 


- 

C 

normal 

KC ALT+KC SHIFT 

$03 

s 

+ 

A 

A 

S 

normal 

KC CONTROL+KC ALT 

$06 

C 

+ 

A 

C 

A 

normal 

KC CONTROL+KC SHIFT 

$05 

C 

+ 

S 

c 

S 

normal 

KC VANILLA 

$07 

S 

+ 

A 

A 

S 

normal 

KC STRING 

$40 

Zeiger auf Zeichenkette 



Bei der KC_STRING-Kombination wird, wie in der Tabelle zu 
sehen ist, der Zeiger auf die String-Daten erwartet, die 
ausgegeben werden sollen. Dabei handelt es sich nicht nur um 
eine Zeichenkette, die ausgegeben werden soll. Vielmehr wird 
auf ein Langwort-Wert gezeigt, welcher den Offset und die 
Länge des Textes, der ausgegeben werde soll, enthält. 


Shift + 
Taste 
normale 
Taste 


dc.b $00, $00, $00, $00 


L 

J L 

f—T—^ 

1 

! 


Länge des Strings 

Offset ausgehend vom Textanfang 

Länge des Strings 

Offset ausgehend vom Textanfang 


StringOl: dc.b $02,$04,$02,$06,$9B,$41,$9B,$54 
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Wie man an dem Beispiel sieht, wird bei "normaler" Taste die 
CSI-Sequenz $9b, $41 und bei Shift $9B, $54 ausgegeben. 


Die letzten beiden Addressen gehören zu zwei Tabellen, die 
sich aus acht Bytes zusammensetzen. Jedes Bit dieser acht 
Bytes repräsentiert eine Taste, also insgesamt 64 Tasten. 

*km_LoCapsable/*km_HiCapsable 

Bei der *km_Lo-/*km_HiCapsable-Tabelle entscheiden die Bits, 
ob die jeweilige Taste durch den CapsLock-Modus tangiert 
wird oder nicht. Durch diese Einstellung kann man z.B. ver¬ 
hindern, daß während des CapsLock-Modus auch die Zahlen-Ta- 
sten "geshiftet" werden. 

*km_LoRepeatable/*km_HiRepeatable 

Mit den Werten der *km_Lo-/*km_HiRepeatable-Tabelle kann be¬ 
stimmt werden, ob bei längerem Drücken der Taste die Ausgabe 
wiederholt werden soll. 


Abschließend möchte ich noch erwähnen, daß die Tastaturta- 
bellen-Dateien, die sich im Verzeichnis "Devs:KeyMaps/" be¬ 
finden, grundsätzlich den gleichen Aufbau haben. Bei ihnen 
ist lediglich eine Node-Struktur vor die KeyMap-Struktur ge¬ 
legt worden. Wie bei vielen anderen Dateien wird auch die 
KeyMap-Datei als ausführbares Programm gespeichert, damit 
die Zeiger auf die Tabellen richtig relokiert werden. So 
kann man z.B. eine externe KeyMap-Datei mit LoadSeg einladen 
und im eigenem Programm verwenden. 

Nun aber zurück zum Console-Device. Will man also über ein 
Fenster die Ein- und Ausgabe ablaufen lassen, so muß man 
eine Write- und eine ReadlORequest-Struktur installieren. 
Damit aber nicht zwei ConUnit-Strukturen angelegt werden, 
öffnet man nur einmal das Device und überträgt die relevan¬ 
ten Werte in die zweite Struktur. Danach kann man beide 10- 
Request-Strukturen wie gewöhnlich benutzen. 

Aus Platzgründen haben wir nur einen Ausschnitt aus dem De¬ 
monstrationsprogramm abgedruckt. Es soll lediglich gezeigt 
werden, welche Schritte notwendig sind, um Ein- und Ausga¬ 
beoperationen über das Console-Device abzuwickeln. 


* 

* Kapitel 12 

* Demonstrationsprogramm für das "console.device" 

* 


Start: 


move.l I0Base,a6 
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moveq #0,d0 

sub.l aO,aO 

jsr CreatePort(a6) ; Reply-Port für Read erstellen 

move.l dO,aO 

move.l #48,do 

jsr CreateIOReq(a6) ; IOReq für Read erstellen 

move.1 dO,IORReq 

move.l IOBase,a6 

moveq #0,d0 

sub.l aO,aO 

jsr CreatePort{a6) ; Reply-Port für Write erstellen 

move.l dO,aO 

move.l #48,do 

jsr CreateIOReq(a6) ; IOReq für Write erstellen 

move.l dO,IOWReq 

move.l ExecBase,a6 

move.l IORReq,al 

move.l WindowHD,40(al) ; Zeiger auf WindowHD eintragen 

moveq #0,d0 

moveq #0,dl 

lea ConName,aO 

jsr OpenDev(a6) 

move.l IORReq,aO 

move.l IOWReq,al 

move.l 20(a0),20(al) 

move.l 24(a0),24(al) 


move.l ExecBase,a6 

move.l IORReq,al 

jsr CloseDev(a6) 

move.l IOBase,a6 

move.l IOWReq,aO 

move.l 14(a0),a0 

jsr DeletePort(a6) ; Write Reply-Port löschen 

move.l IOWReq,aO 

jsr DeleteIOReq(a6) ; Write IOReq löschen 

move.l IORReq,aO 

move.l 14(a0),a0 

jsr DeletePort(a6) ; Read Reply-Port löschen 

move.l IORReq,aO 

jsr DeleteIOReq(a6) ; Read IOReq löschen 


; Unit 
; Flags 

; Device öffnen 

; Zeiger auf IO-Read-Request 
; Zeiger auf I0-Write-Request 
; Device und 
; Unit übertragen 


; Device schließen 


Progranmi 10.3: Benutzung des Console-Device 
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10.5.2 Die "conio.library" 

Wie man an dem Demonstrationsprogramm sieht, ist die Benut¬ 
zung des Console-Devices sehr umständlich und platzintensiv. 
Deshalb haben wir uns entschieden, einige nützliche Funktio¬ 
nen in einer weiteren Library ("conio.library") zusammenzu¬ 
fassen. Diese Funktionen sollen zunächst als Demonstration 
des Umgangs mit dem Device verstanden werden. Aber auch die 
Realisierung von Ein-/Ausgabe bezogenen Programmen soll da¬ 
durch ermöglicht werden. Hier wollen wir uns nicht die 
einzelnen Routinen ansehen, da sie auf der Programmdiskette 
ausreichend kommentiert sind. Lediglich der Aufruf der Funk¬ 
tionen soll erläutert werden. 


Installlnp = -30 (ConlO-Library) 


♦WinArgs 


aO < Zeiger auf eine Window-Struktur. 


*ConIOUnit dO > Zeiger auf die angelegte ConlO-Unit- 
Struktur (oder Null bei einem Fehler). 

Erklärung Durch die Funktion Installlnp wird das, 

durch die übergebene Struktur definierte 
Fenster geöffnet und eine Read-IORe- 
quest-Struktur sowie eine Write-IORe- 
quest-Struktur erstellt. Die Zeiger auf 
die einzelnen Strukturen sind in einer 
ConlO-Unit-Struktur abgelegt, auf die in 
dO ein Zeiger zurückgegeben wird. 


ConlO-Unit-Struktur: 


00 

dc.l 

*ciou Window 

04 

de. 1 

*ciou RReq 

08 

dc.l 

*ciou WReq 

12 


ciou SIZEOF 


; Zeiger auf Window-Struktur 
; Zeiger auf RIORequest-Struktur 
; Zeiger auf WlORequest-Struktur 


Removelnp = -36 (ConlO-Library) 


»ConlOUnit aO < Zeiger auf eine ConlOUnit-Struktur, die 
entfernt werden soll. 

Erklärung Mit Removelnp kann man die angegebene 

ConlOUnit-Struktur und alle damit ver¬ 
bundenen Strukturen (MsgPort-Strukturen, 
Window-Strukturen, IOReq-Strukturen) 

wieder freigeben. Dabei wird das Fenster 
automatisch geschlossen. 
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ReadChar 

= 

-42 (ConlO-Library) 


‘ConlOUnit 

a5 

< Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 

Char 

dO 

> Gelesenes Zeichen. 

Erklärung 


Es wird solange gewartet, bis ein Zei¬ 
chen von der Tastatur eingelesen worden 
ist. 


WriteChar = -48 (ConlO-Library) 


♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 

die 

Char 

dO 

< 

Byte-Wert, der ausgegeben werden soll. 

Erklärung 



Das in dO gespeicherte Zeichen wird 
gegeben. 

aus- 

ReadCrL 



= -54 (ConlO-Library) 


♦Buffer 

ao 

< 

Zeiger auf einen Pufferbereich für 
zu lesenden Zeichen. 

die 

♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 

die 

Count 

dO 

> 

Anzahl der gelesenen Zeichen. 


Erklärung 



Durch die Funktion ReadCrL wird 

eine 


Zeichenkette eingelesen. Dabei schließt 
die Return-Taste die Eingabe ab. Danach 
wird der Cursor in die erste Spalte der 
gleichen Zeile gesetzt. 


ReadStr 


= -60 (ConlO-Library) 

♦Buffer 

aO 

< Zeiger auf einen Pufferbereich für die 
zu lesenden Zeichen. 

♦ConlOUnit 

a5 

< Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 

Count 

dO 

> Anzahl der gelesenen Zeichen. 

Erklärung 


Durch die Funktion ReadStr wird eine 
Zeichenkette eingelesen. Dabei schließt 
die Return-Taste die Eingabe ab. Danach 
wird der Cursor in die erste Spalte der 
nächsten Zeile gesetzt. 
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WriteLeL = -66 (ConlO-Library) 


— 

♦String 

aO 

< 

Zeiger auf eine mit einem Null-Byte 
geschlossene Zeichenkette. 

ab- 

die 

♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 


Count 

dO 

< 

Anzahl der Zeichen, die ausgegeben 
den sollen. 

wer- 

Erklärung 



Die angegebene Zeichenkette wird ausge¬ 
geben. Dabei muß ihre Länge im Datenre- 




gister 0 übergeben werden. 


WriteStr 



= -72 (ConlO-Library) 


♦String 

aO 

< 

Zeiger auf eine mit einem Null-Byte 
geschlossene Zeichenkette. 

ab- 

die 

♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 



Erklärung Die angegebene Zeichenkette wird ausge¬ 

geben. Dabei muß ihr Ende durch ein 
Null-Byte bestimmt sein. 


WriteXY 



= -78 (ConlO-Library) 


♦String 

aO 

< 

Zeiger auf eine mit einem Null-Byte 
geschlossene Zeichenkette. 

ab- 

♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 

die 

XPos 

dO 

< 

X-Position 


YPos 

dl 

< 

Y-Position 


Erklärung 



Zunächst wird der Cursor an die Stelle 
do/dl gesetzt, dann wird die definierte 




Zeichenkette ausgegeben (WriteStr). 


WriteDec 



= -84 (ConlO-Library) 


♦ConlOUnit 

a5 

< 

Zeiger auf die ConlO-Unit-Struktur, 
zur Ausgabe benutzt werden soll. 

die 

Value 

dO 

< 

Hex-Wert (Wort) 



Erklärung Die in dO angegebene Zahl wird in einen 

Dez-String konvertiert und ausgegeben. 
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WriteHex = -90 (ConlO-Library) 

*ConIOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 

zur Ausgabe benutzt werden soll. 

Value dO < Hex-Wert (Langwort) 

Erklärung Die in dO angegebene Zahl wird in einen 

Hex-String konvertiert und ausgegeben. 


GotoXY = -96 (ConlO-Library) 

‘ConlOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 

zur Ausgabe benutzt werden soll. 

XPos dO < X-Position 

YPos dl < Y-Position 

Erklärung Der Cursor wird an die Stelle do/dl ge¬ 

setzt . 


ScrollUp 


-102 (ConlO-Library) 


*ConIOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 

zur Ausgabe benutzt werden soll. 

NumLine dO < Anzahl der Zeilen, um die der Bild¬ 

schirminhalt hochgerollt werden soll. 


Erklärung Der Bildschirminhalt wird um "NumLine" 

Zeilen hochgerollt. 


ScrollDown = -108 (ConlO-Library) 

♦ConlOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 

zur Ausgabe benutzt werden soll. 

NumLine dO < Anzahl der Zeilen, um die der Bild¬ 

schirminhalt runtergerollt werden soll. 

Erklärung Der Bildschirminhalt wird um "NumLine" 

Zeilen runtergerollt. 



♦ConlOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 

zur Ausgabe benutzt werden soll. 

NumLine dO < Anzahl, der zu löschenden Zeilen. 


Erklärung Löscht ab der momentanen Position 

"NumLine" Zeilen. 
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InsLine 

= -120 (ConlO-Library) 

»ConlOünit a5 

< Zeiger auf die ConlO-Unit-Struktur, die 


zur Ausgabe benutzt werden soll. 
NumLine do < Anzahl einzufügender Zeilen. 


Erklärung 


Fügt "NumLine" Zeilen an der momentanen 
Position ein. 


DelEOD 


-126 (ConlO-Library) 


*ConIOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 

Erklärung Löscht ab der momentanen Position bis 

zum Fensterende alle Zeichen (Delete end 
of display). 


DelEOL 


-132 (ConlO-Library) 


*ConIOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 

Erklärung Löscht ab der momentanen Position bis 

zum Zeilenende alle Zeichen (Delete end 
of Line). 


CursorOn 


-138 (ConlO-Library) 


♦ConlOUnit a5 < Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 

Erklärung Schaltet den Cursor an. 


CursorOff 


-144 (ConlO-Library) 


♦ConlOünit a5 < Zeiger auf die ConlO-Unit-Struktur, die 
zur Ausgabe benutzt werden soll. 


Erklärung 


Schaltet den Cursor ab. 


Sehr auffällig an den Funktionsaufrufen ist, daß immer der 
Zeiger auf die ConlO-Unit benötigt wird. Wir haben dabei ex¬ 
tra darauf geachtet, daß immer das Adreßregister a5 benutzt 
wird. So kann der Zeiger immer dort belassen werden und muß 
nicht bei jedem Funktionsaufruf erneut eingesetzt werden. 
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Zur Demonstration der "conio.library" finden sie auf der 
beiliegenden Diskette ein gut dokumentiertes Programm 
(PRG_10_4.S). Es handelt sich dabei um ein Trainingsprogramm 
für blindes Zehnfinger-Schreiben. Dennoch soll sich nun noch 
ein kleines Demonstrationsprogramm anschließen, welches le¬ 
diglich den einfachen Umgang mit der conio.library dokumen¬ 
tieren soll. 


* 

* Kapitel 10 

* Demonstrationsprogramm für die conio.library 

* 


ExecBase = 

4 


OpenLib 

-552 


CloseLib = 

-414 


Installlnp = 

-30 


Removelnp = 

-36 


WriteChar 

-48 


WriteStr 

-72 


ReadStr 

-60 


Start: move.l 

ExecBase,a6 


lea 

CIOName,al 


moveq 

# 0 ,do 


jsr 

0penLib(a6) 

; conio.library öffnen 

move.1 

dO,CIOBase 


move.1 

CIOBase,a6 


lea 

WindowArgs,aO 


jsr 

Installlnp(a6) 

; Input installieren 

move.1 

do,inpUnit 


move.1 

d0,a5 


lea 

HalloTxt,aO 


jsr 

WriteStr(a6) 

; "HalloText" ausgeben 

Loop: move.l 

#">",do 
WriteChar(a6) 

; ”>" Prompt ausgeben 

jsr 


lea 

Puffer,aO 

; Zeichenkette einiesen 

jsr 

ReadStr(a6) 


cmp.l 

F'exit",Puffer , 

; Eingabe = "exit"? 

bne 

Loop 

; Nein, dann wiederholen 

move.1 

a5,a0 


jsr 

RemoveInp(a6) 

; Input entfernen 

move.1 

ExecBase,a6 


move.1 

CIOBase,al 


jsr 

CloseLib(a6) ; 

: Library schließen 
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rts 



CIOName: 

dc.b 

"conio.library",0 


even 


WinName: 

dc.b 

"exit - beendet das Programm !",0 


even 


Puffer: 



HalloTxt: 

dc.b 

"Dies ist ein Demonstrationsprogramm für die " 


dc.b 

"conio.library!",10,10 


dc.b 

"<Bitte geben sie exit ein>",10,10,0 


even 


CIOBase: 

dc.l 

0 

InpUnit: 

dc.l 

0 

WindowArgs: 

dc.w 

0,0,640,200 


dc.b 

1,3 


dc.l 

$200,$11002,0,0,WinName,0,0 


dc.w 

100,50,200,100,1 

Programm 

10.5: Benutzung der ConlO-Library 

10.6 Das 

Narrator 

-Device 

Bei dem Narrator- 

Device handelt es sich um ein "Gerät", wel- 

ches die 

sprachliche Ausgabe von Texten ermöglicht. Dabei 

muß der auszugebende Text zuvor mit Hilfe der Translator-Li- 

brary in 

Lautschrift übersetzt werden. Die Funktion, die 

man dazu 

benutzt, 

heißt Translate und benötigt vier Parame- 

ter. 



Translate 

= -30 (Translator-Library) 


inputstring aO 

outputBuffer al 

inputLength do 
bufferSize dl 


< Zeiger auf Text, der konvertiert werden 
soll. 

< Zeiger auf einen Speicherbereich, in dem 
die Lautschrift gespeichert werden soll. 

< Länge des zu übersetzenden Textes. 

< Größe des Puffers, in dem die Laut¬ 
schrift gespeichert werden soll. 


Erklärung Durch die Funktion Translate wird der 

angegebene Text in Lautschrift über¬ 
setzt, welche in den angegebenen 
Speicherbereich abgelegt wird. 


Als nächstes müssen wir uns die beiden IORequest-Strukturen 
ansehen, die speziell für das Narrator-Device angelegt wor¬ 
den sind. 
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narrator rb: 


00 

ds.b 

IOStdReq,48 

; Standard IORequest-Struktur 

48 

dc.w 

rate 

; Worte pro Minute 

50 

dc.w 

pitch 

; Frequenz in Hz 

52 

dc.w 

mode 

; Betonungsmodus 

54 

dc.w 

sex 

; Geschlecht der Stimme 

56 

dc.l 

*ch masks 

; Zeiger auf Channel-Masks 

60 

dc.w 

nm masks 

; Anzahl der Masken 

62 

dc.w 

volume 

; Lautstärke 

64 

dc.w 

sampfreq 

; Abtastrate 

66 

dc.b 

mouths 

; Mund-Flag 

67 

dc.b 

chanmask 

Kanalmasken 

68 

dc.b 

numchan 

;■* (intern benutzt) 

69 

dc.b 

pad 

; Füllbyte 

70 


SIZEOF 



IOStdReq 

Normale IOStdRequest-Struktur, in welche die normalen 

Parameter eingetragen werden. 

rate 

Rate bestimmt die Sprechgeschwindigkeit, gemessen in Worten 
pro Minute. 

MINRATE = 40 

MAXRATE = 400 

pitch 

Durch Pitch wird die Basisfrequenz (Hz) angegeben. 

MINPITCH = 65 

MAXPITCH = 320 

mode 

Mit dem Wert von mode kann der Betonungsmodus eingestellt 
werden. 

NATURALFO = 0 

ROBOTICFO = 1 

sex 

Geschlecht des Sprechers. 

MALE = 0 

FEMALE = 1 

ch masks 

ZeTger auf Audio-Kanal-Masken. 
nm_masks 

Größe des Kanaldaten-Feldes. 
volume 

Lautstärke der Sprachausgabe. 
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MINVOL = 0 

MAXVOL = 64 

sampfreq 

Abtastrate. 

MINFREQ = 5000 

MAXFREQ = 28000 

mouths 

Boolscher Ausdruck, der angibt, ob das Device Munddaten ge¬ 
nerieren soll (0 = keine Daten). 

chanmask, numchan 

Intern benutzte Datenwerte, die über die Kanalmaskendaten 
Auskunft geben. 

pad 

Füllbyte, um auf gerade Adresse zu kommen. 


Wenn man Munddaten vom Device lesen will, muß man die fol¬ 
gende Struktur benutzen. 


mouth 

rb: 



00 

ds.b 

narrator rb 

; normale Narr-IOReg-Struktur 

70 

dc.b 

width 

; Breite 

71 

dc.b 

height 

; Höhe 

72 

dc.b 

shape 

; Höhe/Breite 

73 

dc.b 

pad 

; Füllbyte 

74 


SIZEOF 



narrator_rb 

Normale Narrator-IORequest-Struktur. 

width, height 
Breite und Höhe. 

shape 

Kompression (Höhe/Breite) 

pad 

Füllbyte 


Sollte ein Fehler bei der Ausgabe aufgetreten sein, so be¬ 
kommt man einen der folgenden Fehlerwerte übergeben. 


Name 


Wert Bedeutung 


ND NotUsed 

-01 

ND_NoMem 

-02 

ND NoAudLib 

-03 

ND MakeBad 

-04 


nicht benutzt 

Speicher konnte nicht belegt werden 
Audio-Device konnte nicht geöffnet werden 
Fehler beim Erstellen der Library 
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NDJJnitErr -05 angegebene Unit != 0 

NDCantAlloc -06 Audiokanäle konnten nicht belegt werden 

ND~Unimpl -07 falsches Kommando 

ND NoWrite -08 "mouth shape" gelesen ohne zu schreiben 

NDJIxpunged -09 Fehler beim öffnen 

ND_PhonErr -20 Fehler bei Aussprache der Lautschrift 

ND_RateErr -21 Fehler durch rate-Wert 

ND_Pitch -22 Fehler durch pitch-Wert 

ND_Sex -23 Fehler durch sex-Einstellung 

ND_ModeErr -24 Fehler durch mode-Einstellung 

ND_FreqErr -25 Fehler durch sampfreq-Wert 

ND VolErr -26 Fehler durch volume-Wert 


Zum Abschluß wollen wir uns noch das Demonstrationsprogramm 
ansehen, welches den Umgang mit dem Device eindeutig zeigen 
soll. 


* 

* Kapitel 10 

* Demonstrationsprogramm für das Narrator-Device 

* 


ExecBase = 4 

OpenLib = -552 

CloseLib = -414 

DoIO = -456 

Translate = -30 

DeletelOFast = -60 

CreatelOFast = -54 


Start: 

move.l ExecBase,a6 

lea TraName,al 

moveq #0,d0 

jsr 0penLib(a6) ; Translator-Library öffnen 

move.l d0,TraBase 

beq TraError 

lea IOName,al 

moveq |0,d0 

jsr OpenLib(a6) ; IO-Library öffnen 

move.1 dO,IOBase 

beq IOError 

move.l IOBase,a6 

lea NarrDevice,a0 

moveq #0,d0 

moveq #0,dl 

move.l #70,d2 

jsr CreateI0Fast(a6) ; IOReq-Fast erstellen 

move.l dO,IORequest 
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bsr Speak ; sprechen 

move.1 IOBase,a6 

move.l IORequest,aO 

jsr DeleteIOFast(a6) ; IOReq-Fast löschen 

move.l ExecBase,a6 

move.l IOBase,al 

jsr CloseLib(a6) ; IO-Library schließen 

iOError: 

move.l TraBase,al 

jsr CloseLib(a6) ; Translator-Library schließen 

TraError: 

rts 

Speak: lea Puffer,a0 ; Adresse des Textes 

lea TransMem,al ; Adresse des Puffers 


move.1 

|PEnd-Puffer,dO 

; Länge des Textes 

move.1 

#512,dl 

Größe des Puffers 

move.1 

TraBase,a6 ; 

Translator-Base nach a6 

jsr 

Translate(a6) ; 

übersetzen 

move.1 

IORequest,aO ; 

Zeiger auf IORequest nach aO 

move.w 

#150,48(a0) 

rate = 150 

move.w 

#110,50(a0) 

pitch =110 

move.w 

#0,52(aO) ; 

mode = 0 

move.w 

#0,54(a0) 

sex = 0 

move.1 

#MaskData,56(aO) 

; mask = #MaskData 

move.w 

#4,60(a0) 

nummask = 4 

move.w 

#64,62{a0) 

volume = 64 

move.w 

#22200,64(a0) ; 

sampfreq = 222000 

move.1 

IORequest,al ; 


move.w 

#3,28(al) 

io Command = schreiben 

move.1 

#512,36(al) ; 

io Length = Pufferlänge 

move.1 

#TransMem,40(al) 

; io_Data = Zeiger auf Daten 

move.1 

ExecBase,a6 


jsr 

DoIO(a6) ; 

sprechen 


rts 


* Datenbereich 


IOName: 

dc.b 

even 

"io.library",0 

NarrDevice: 

dc.b 

even 

"narrator.device",0 

TraName: 

dc.b 

even 

"translator.library",0 

InpUnit: 

dc.l 

0 

TraBase: 

dc.l 

0 

IORequest: 

dc.l 

0 

IOBase: 


dc.l 0 
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MaskData: 

dc.b 

3,5,10,12 

TransMem: 

ds.b 

512 

Puffer: 
PEnd: 

dc.b 

"hello world 


even 



Programm 10.6: Demonstration zum Narrator-Device 
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Nachdem wir uns einige Devices angesehen und sie benutzt ha¬ 
ben, wollen wir uns nun damit beschäftigen, ein Device 
selbst zu programmieren. Dabei können wir die im Kapitel 9 
erstellte Library als Basis benutzen, da ein Device zunächst 
aus einer ganz normalen Library besteht. 

Auch der Lade- und Initialisierungsvorgang ist mit den Li¬ 
braries identisch. So wird das Device mit LoadSeg in den 
Speicher geladen und dann mit InitResident eingerichtet. Da¬ 
bei erhält die Initialisierungsroutine den Zeiger auf die 
Segment-Liste, die wir, wie bei der Library, zwischen-spei- 
chern müssen. Neu im Gegensatz zu den Libraries ist, daß die 
Initialisierungsroutine einen Task mit zugehörigem Message- 
Port einrichtet. Dieser Task soll dann die gewünschten Ope¬ 
rationen mit dem "Gerät" durchführen. Um mit dem Task in 
Verbindung zu treten, stellt das Device neben den vier Li¬ 
brary-Standardfunktionen (Close, Open, Expunge, ExtFunc) 
noch zwei weitere Device-Standardfunktionen zur Verfügung 
(BeginlO, AbortIO). Dabei wird durch die BeginlO-Funktion 
eine angegebene IORequest-Struktur an den Device-Task-Mes- 
sage-Port gesendet. Mit AbortIO kann die Bearbeitung eines 
bestimmten IORequests abgebrochen werden. 


11.1 Initialisierung des Devices 

Das soll erst einmal als Übersicht reichen. Anfängen wollen 
wir mit der Initialisierungsroutine. Ausgehend von der Libl- 
nitRoutine brauchen wir nur die folgenden Einträge zu ergän¬ 
zen . 


Zunächst müssen wir Speicher für den Stack des Tasks belegen 
und die Adresse in die Task-Struktur eintragen. 


move. 1 

#MsgPort,38(a5) 

; Zeiger auf MsgPort 



; eintragen 

move. 1 

ExecBase,a6 

; Stackspeicher belegen 

move. 1 

f600,dO 

; 600 Bytes 

moveq 

#0,dl 

; egal von welchem Typ 

jsr 

AllocMem(a6) 


move. 1 

d0,tc SPLower 

; Stackuntergrenze eintragen 

add.l 

#600,dO 


move. 1 

d0,tc SPUpper 

; Stackobergrenze eintragen 

move. 1 

d0,tc SPReg 

; Stackzeiger setzen 


Bild 11.1: Stack-Speicher belegen 


Nachdem wir den Stack belegt und die letzten Eintragungen in 
die Task-Struktur erledigt haben, können wir nun den Task 
einrichten. 
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move. 1 

#TaskStruktur,al 

move.1 

al,42(a5) 

move.1 

#DevTask,a2 

sub.l 

a3,a3 

jsr 

AddTask(a6) 


Zeiger auf einzurichtende Task- 
Struktur nach al und zusätzlich 
in den Datenbereich eintragen. 
Zeiger auf Anfangsadresse 
keine eigene Schlußroutine 
Task einrichten lassen 


Bild 11.2: Einrichtung des Tasks 


Haben wir den Task eingerichtet, müssen wir die Register 
wieder restaurieren und können dann die DevInitRoutine ver¬ 
lassen . 


11.2 Erweiterung der Lib-Standardroutinen 

Neben der DevInitRoutine müssen auch noch die Close- und die 
Expunge-Routine erweitert werden. Die Close-Routine muß le¬ 
diglich um zwei weitere Einträge ergänzt werden. Durch sie 
wird die angegebene IORequest-Struktur unbrauchbar gemacht. 


move.l #—l,20(al) ; io_Device und ioJJnit Eintrag der 

move.l #-i,24(al) ; IORequest-Struktur löschen (-1) 


Bild 11.3: Erweiterung der Close-Routine 


Bei der nun folgenden Expunge-Funktion sehen wir uns nur die 
neu hinzugekommenen Teile an. Dabei muß der Task entfernt 
und der Stackbereich wieder freigegeben werden. Der Stackbe¬ 
reich hätte natürlich auch mit der AllocEntry-Funktion be¬ 
legt werden können. Hätte man dann noch die Struktur in die 
MemList des Tasks eingetragen, so wäre automatisch der 
Stackbereich beim Entfernen des Tasks freigegeben worden. 


lea 

Taskstruktur,al 

; Task "ausschalten" 

jsr 

RemTask(a6) 


move. 1 

tc SPLower,al 

; Zeiger auf Anfang des Bereichs 

move. 1 

#600,do 

; Größe des Stacks 

jsr 

FreeMem(a6) 

; Stackspeicher freigeben 


Bild 11.4: Erweiterung der Expunge-Routine 
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11.3 Device-Routinen und Verwaltungs-Task 

Neben den vier Standardfunktionen benötigt ein Device noch 
zwei Spezialfunktionen. Wie wir wissen, wird die Beginio- 
Funktion von den Exec-Funktionen DoIO und SendIO aufgerufen, 
damit sie die Nachricht an den Device-Task schickt. Natür¬ 
lich brauchen wir auch für unseren Task eine solche Funk¬ 
tion . 


BeginlO: 


movem.l 

dl-d6/a0-a6,-(a7) 


clr.b 

bclr 

31(al) 

|0,30(al) 

; io Error löschen 
; Quick Bit löschen 

move.1 
move.1 
jsr 

38(a6),a0 

ExecBase,a6 

PutMsg(a6) 

; Zeiger auf MsgPort auslesen 

; Nachricht an Task schicken 

moveq 

#0,d0 


movem.1 
rts 

(a7)+,dl-d6/a0-a6 



Bild 11.5: Die BeginlO-Routine 


Zuerst wird der io^_Error-Eintrag der TestlORequest-Struktur 
und das Quick-Bit xm io_Flags-Eintrag gelöscht. Danach wird 
die Nachricht an den Message-Port des Device-Tasks ge¬ 
schickt. Das Quick-Bit wird von der Funktion DoIO gesetzt, 
bevor die Device-Routine BeginlO abgearbeitet wird. Nachdem 
BeginlO beendet worden ist, wird je nachdem, ob das Bit ge¬ 
setzt ist oder nicht, auf die Bearbeitung gewartet (Quick- 
Bit gesetzt, dann nicht warten). 

Die zweite Standardfunktion für Devices (AbortIO) wird von 
unserem Test-Device nicht unterstützt. Hier könnte man z.B. 
die übergebene TestlORequest-Struktur aus der Liste des Mes¬ 
sage-Ports entnehmen. 

Jetzt kommen wir zum "Herz" des Devices, dem Device-Task. Er 
muß die am Message-Port ankommenden Nachrichten auswerten 
und die angeforderte Operation ausführen. 

Wenn keine Nachricht am Port anliegt, wartet der Task so¬ 
lange, bis der Message-Port eine Nachricht empfangen hat. 
Dann wird sie mittels GetMsg aus der Liste entnommen. 


DevTask: 

move.l LibPtr,a5 ; Zeiger auf Basisadresse der Lib 

; nach a5 
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MessageLoop: 


move.1 

ExecBase,a6 


move.1 

38(a5),a0 

; Zeiger auf Port nach aO und 

jsr 

WaitPort(a6) 

; auf Nachrichten warten 

move.1 

d0,46(a5) 

; Nachricht Zwischenspeichern 

lea 

MsgPort,aO 


jsr 

GetMsg(a6) 

; Nachricht entfernen 

tst.l 

46(a5) 

; "falscher Alarm"? 

beq 

MessageLoop 



Bild 11.6: Message-Warteschleife 


Nachdem eine Nachricht vom Message-Prot abgeholt worden ist, 
kann sie im nächsten Schritt bearbeitet werden. Dabei benut¬ 
zen wir eine Offsettabelle, über deren Werte wir die ge¬ 
wünschte Funktion anspringen. 


; Nachrichtenbehandlung 


move.1 

46(a5),a4 

Zeiger auf IORequest-Block 

moveq 

|0,d0 

dO löschen 

move.w 

28(a4),d0 

io Command auslesen 

lsl.l 

#l,d0 

* 2 


lea 

StartCMD,aO 

Zeiger auf Tabelle mit Offsets 

move. w 

(aO,dO),d0 

Offset auslesen 

jsr 

(aO,dO) 

Routine aufrufen 

move. 1 

46(a5),al 



jsr 

ReplyMsg(a6) 

Nachricht bestätigen 

bra 

MessageLoop 



StartCMD: 




dc.w 

CMDInvalid-StartCMD 


0 

dc.w 

CMDReset-StartCMD 


1 

dc.w 

CMDRead-StartCMD 


2 

dc.w 

CMDWrite-StartCMD 


3 

dc.w 

CMDUpDate-StartCMD 


4 

dc.w 

CMDClear-StartCMD 


5 

dc.w 

CMOStop-StartCMD 


6 

dc.w 

CMDStart-StartCMD 


7 

dc.w 

CMDAbort-StartCMD 


8 

dc.w 

CMDExecuteSub-StartCMD 

9 


Bild 11.7: Nachrichtenauswertung 


Bevor man die nächste Nachricht vom Port abholt, muß man die 

bearbeitete mit ReplyMsg wieder zurücksenden. 
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11.4 Funktionen des Device 

Nachdem wir alle Standardroutinen unseres Devices angesehen 
haben, fehlen uns noch die eigentlichen Funktionen. Da es 
sich hier, wie der Name schon sagt, nur um ein Test-Device 
handelt, ist die Anzahl der Funktionen nicht besonders groß. 
Es ist lediglich eine, die aber den Vorteil eines Devices 
deutlich macht. Die Funktion heißt ExeSub und hat die Kom¬ 
mandonummer (CMDExeSub =) 9. Die Funktion ist eigentlich 
recht einfach. Sie liest aus der gesendeten TestlORequest- 
Struktur die Adresse einer Subroutine aus und arbeitet sie 
ab. Dadurch ist es möglich, daß ein Task eine bestimmte Auf¬ 
gabe vom Device erledigen läßt. Die Funktion ist lediglich 
als kleine Demonstration gedacht und sollte nicht weiter 


benutzt werden! 

CMDExecuteSub: 


; ExeSub-Funktion 

move. 1 

46(a5),a0 

; Zeiger auf Nachricht auslesen 

move. 1 

32(aO),a0 

; Adresse der Routine nach aO 

movem.l 

a0-a6/d0-d7,-(a7) 

; Register retten 

jsr 

(a0> 

; Routine anspringen 

movem. 1 

(a7)+,a0-a6/d0-d7 

; Register restaurieren 

rts 




Bild 11.8: Die Device-Funktion ExecuteSub 


Die zum Aufrufen benutzte TestlORequest-Struktur hat folgen¬ 
den Aufbau: 

TestlORequest-Struktur: 

00 dc.l 

04 dc.l 

08 dc.b 

09 dc.b 

10 dc.b 

14 dc.l 

18 dc.w 

20 dc.l 

24 dc.l 

28 dc.w 

30 dc.b 

31 dc.b 

32 dc.l io_SubAddress ; Adresse der Subroutine 

36 io_SIZE0F 

io_SubAddress 

Der Eintrag io_SubAddress muß die Adresse einer Unterroutine 
enthalten, die von dem Device ausgeführt werden soll. 
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Wichtig ist vielleicht noch der Aufbau der Device-(Library)- 
Struktur mit dem zugehörigen Datenteil: 

TestDevice-Struktur: 


00 

ds.l 

34 

; Library-Struktur 

34 

dc.l 

0 

; Zeiger auf Segment-Liste 

38 

dc.l 

0 

; Zeiger auf MsgPort 

42 

dc.l 

0 

; Zeiger auf Task-Struktur 

46 

dc.l 

0 

; Zeiger auf empfangenen IORequest 


11.5 Demonstration und Quelltext 

Wie man nun unser Device benutzt, zeigt das Demonstrations¬ 
programm, welches sich auf der Programm-Diskette befindet 
(PRG_1l_l.S). Es öffnet unser Device mit Hilfe der CreatlO- 
Fast~Funktion und trägt die Adresse einer Test-Routine ein, 
welche die Hintergrundfarbe verändert. Dann wird die 
IORequest-Struktur abgeschickt und durch den Task solange 
eine Nachricht auf dem CLI-Fenster ausgegeben, bis die 
IORequest-Struktur abgearbeitet worden ist. Damit das 
Programm funktionieren kann, benötigt es natürlich das nun 
folgende Device als ausführbare Datei im Verzeichnis 
"devs:" . 
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* Quelltext des 

* 

test.device 

ExecBase 

_ 

4 

Output 


-60 

Write 

= 

-48 

OpenLib 

= 

-552 

CloseLib 

= 

-414 

Remove 

- 

-252 

FreeMem 

= 

-210 

AllocMem 

= 

-198 

WaitPort 

= 

-384 

GetMsg 

_ 

-372 

PutMsg 

= 

-366 

ReplyMsg 

= 

-378 

AddTask 

= 

-282 

RemTask 

= 

-288 

Start: 




move.1 
lea 
moveq 
jsr 


ExecBase,a6 

DosName,al 

#0,d0 

0penLib(a6) 


; Dos-Library öffnen 


603 



Kapitel 11 


move.1 
beq 

jsr 

move.1 

move.1 
move.1 
jsr 

move.1 
move.1 
jsr 

DosError: 

moveq #0,d0 
rts 

TextA: dc.b 10,"> TestDevice Version 0.1 <",10,10 

TextE: even 


; Nun folgt der eigentliche Teil des Devices 


LibResident: 

dc.w 

$4AFC ; 

rt MatchWord 


de. 1 

LibResident ; 

rt MatchTag 


de. 1 

EndResident ; 

rt EndSkip 


dc.b 

%10000000 ; 

rt Flags 


dc.b 

1 

rt Version 


dc.b 

3 

rt Type 


dc.b 

o ; 

rt Pri 


dc.l 

DevName ; 

rt Name 


dc.l 

LiblDString ; 

rt IDString 


dc.l 

LiblnitData ; 

rt Init 

DevName: 

dc.b 

"test.device",0 



even 



LiblDString: 

dc.b 

"TestDevice vO. 

1",0 


even 



LiblnitData: 

dc.l 

50 

t 

i 

LibSize (34) + SegList (4) 
MsgPort (4) + TaskPtr (4) 
Message (4) = 50 


dc.l 

FuncTab 



dc.l 

DataTab 



dc.l 

LiblnitRout 


FuncTab: 

dc.l 

Open ; 



dc.l 

CIose ; 

Library-Standardfunktionen 


dc.l 

Expunge ; 



dc.l 

ExtFunc ; 



dc.l 

BeginlO ; 

Device-Standardfunktionen 


dc.l 

AbortIO ; 



dc.l 

-1 



d0,a6 

DosError 

Output(a6) ; Ausgabekanal ermitteln 

d0,dl 

#TextA,d2 ; Text ausgeben 

#TextE-TextA,d3 

Write(a6) 

a6,al ; DosLibrary schließen 

ExecBase,a6 

CloseLib(a6) 
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DataTab: 

dc.b 

#11100000,0 


dc.w 

8 


dc.b 

3,0 


dc.b 

#11000000,0 


dc.w 

10 


dc.l 

DevName 


dc.b 

#11100000,0 


dc.w 

14 


dc.b 

6,0 


dc.b 

#11000000,0 


dc.w 

20 


dc.w 

3,4 


dc.l 

0 

DosName: 

dc.b 

even 

"dos.library", 


Datentabelle für Initstruct 


; Initialisierungsroutine: 

LiblnitRout: 

movem.l d0-d6/a0-a6,-(a7) 

move.l d0,a5 ; Library-Basis nach a5 

move.l dO,LibPtr 

move.l a0,34(a5) ; Segment-Liste eintragen 

move.l #MsgPort,38(a5) ; Zeiger auf MsgPort 

; eintragen 

move.l ExecBase,a6 ; Stackspeicher belegen 

move.l #600,dO ; 600 Bytes 

moveq #0,dl 

jsr AllocMem(a6) 

move.l d0,tc_SPLower ; Stackpointer eintragen 

add.l #600,dO 

move.l d0,tc_SPUpper 

move.l d0,tc_SPReg 

move.l #TaskStruktur,al ; Zeiger auf Task-Struktur 

move.l al,42(a5) ; eintragen in Datenbereich 

move.l #DevTask,a2 ; Anfang der Bearbeitung 

sub.l a3,a3 

jsr AddTask(a6) ; Device-Task eintragen 

move.l LibPtr,d0 

LiblnitEnd: 

movem.l (a7)+,dO-d6/aO-a6 
rts 

; Open-Routine 
Open: 

bclr #3,l4(a6) ; ExpungBit = 0 
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addq.w 
move.1 
rts 

#l,32(a6) 

a6,d0 

; OpenCnt ++ 

; Close- 

-Routine 



Close: 

movem.1 
moveg 
move.1 
move.1 

a2-a3/a5,-(a7) 

#0,d0 

#-l,20(al) 

#-l,24(al) 

; Segment-List = 0 
; io Device löschen 
; io Unit löschen 


subq.w 
bne 

#1,32(a6) 
CloseEnd 

; OpenCnt — 


btst 

beq 

#3,14(a6) 

CloseEnd 

; Device entfernen ? 


bsr 

Expunge 

; entfernen 

CloseEnd: 

movem.1 

(a7)+,a2-a3/a5 



rts 


; Expunge-Routine 
Expunge: 


movem.1 

d2/a5-a6,-(a7) 

tst.w 

32(a6) 

beq 

ExpungeBranch 

moveq 

#0 ,d0 

bset 

#3,14(a6) 

bra 

ExpungeEnd 

ExpungeBranch: 

move.1 

a6,a5 

move.1 

ExecBase,a6 

move.1 

a5,al 

jsr 

Remove(a6) 

lea 

TaskStruktur,al 

jsr 

RemTask(a6) 

move.1 

tc SPLower,al 

move.1 

#600,dO 

jsr 

FreeMem(a6) 

move.1 

34(a5),d2 

moveq 

#0,d0 

move.w 

16(a5),d0 

move.1 

a5,al 

sub.l 

dO,al 

add.w 

18(a5),d0 

jsr 

FreeMem(a6) 


kein Benutzer mehr ? 

SegmentList = 0 

ExpungeBit setzen 

jetzt noch nicht entfernen 

Device aus Device-Liste entfernen 

Remove 

; Task ''ausschalten" 

Stackspeicher freigeben 
Segment-Listen-Ptr retten 

Library-Struktur freigeben 
FreeMem 
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move.l d2,d0 ; Segment-Listen-Ptr zurückgeben 

ExpungeEnd: 

movem.l (a7)+,d2/a5-a6 
rts 

; ExtFunc-Routine 
ExtFunc: 


moveq 

rts 

#0,d0 

; Rückgabewert = Null 

; BeginlO-Routine 


BeginlO: 

movem.l 

dl-d6/a0-a6,- 

(37) 

clr .b 
bclr 

31 (a 1) 

#0,30(al) 

; io Error löschen 
; Quick Bit löschen 

move.1 
move.1 
jsr 

38(a6),a0 

ExecBase,a6 

PutMsg(a6) 

; Zeiger auf MsgPort auslesen 

; Nachricht an Task schicken 

moveq 

#0,d0 


movem.l 

rts 

(a7)+ ; dl-d6/a0-a6 

; AbortlO-Routine 


AbortIO: 

moveq 

rts 

* 

#0,d0 


* *** Device-Task *********************************** 

* 

DevTask: 

move.1 

LibPtr,a5 

; Zeiger auf Basisadresse der 
; nach a5 

MessageLoop: 

move.1 
move.1 
jsr 

move. 1 

ExecBase,a6 

38{a5),a0 

WaitPort(a6) 

d0,46(a5) 

; Zeiger auf Port nach aO und 
; auf Nachrichten warten 
; Nachricht Zwischenspeichern 

lea 

jsr 

tst.l 

beq 

MsgPort,aO 

GetMsg(a6) 

46(a5) 

MessageLoop 

; Nachricht entfernen 
; "falscher Alarm"? 
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; Nachrichtenbehandlung 


move.1 

46(a5),a4 

; Zeiger auf IORequest-Block 

moveq 

#0,d0 

; dO löschen 

move.w 

28(a4),d0 

; io Command auslesen 

lsl.l 

#1 ,d0 

; * 2 

lea 

StartCMD,aO 

; Zeiger auf Tabelle mit Offsets 

move.w 

(aO,dO),d0 

; Offset auslesen 

jsr 

(aO,dO) 

; Routine aufrufen 

move.1 

46(a5),al 


jsr 

ReplyMsg(a6) 

; Nachricht bestätigen 

bra 

MessageLoop 



StartCMD: dc.w CMDInvalid-StartCMD ; 0 

dc.w CMDReset-StartCMD ; 1 

dc.w CMDRead-StartCMD ; 2 

dc.w CMDWrite-StartCMD ; 3 

dc.w CMDUpDate-StartCMD ; 4 

dc.w CMDClear-StartCMD ; 5 

dc.w CMDStop-StartCMD ; 6 

dc.w CMDStart-StartCMD ; 7 

dc.w CMDAbort-StartCMD ; 8 

dc.w CMDExecuteSub-StartCMD ; 9 

CMDInvalid: ; Die neun Standard-Device-Funktionen werden 

CMDReset: ; von unserem Device nicht unterstützt. Deshalb 

CMDRead: ; werden sie lediglich mit einem "rts" quittiert. 

CMDWrite: 

CMDUpDate: 

CMDClear: 

CMDStop: 

CMDStart: 

CMDAbort: 

rts ; < Hier das besagte "RTS" 

; Die nun folgende ExeSub-Funktion dient nur als 

; Beispiel und sollte nicht weiter verwendet werden ! 

CMDExecuteSub: ; ExeSub-Funktion 

move.l 46(a5),a0 ; Zeiger auf Nachricht auslesen 

move.l 32(a0),a0 ; Adresse der Routine nach aO 

movem.l a0-a6/d0-d7,-(a7) ; Register retten 

jsr (aO) ; Routine anspringen 

movem.l (a7)+,aO-a6/dO-d7 ; Register restaurieren 

rts 


* Datenbereich 



LibPtr: 

de. 1 

0 

; Speicherbereich für Base-Pointer 

MsgPort: 

dc.l 

0,0 

; Message-Port-Struktur 


dc.b 

4,0 


dc.l 

DevName 
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dc.b 0,24 

dc.l Taskstruktur 

; Es ist unbedingt erforderlich, den Listenkopf der 
; ankommenden Nachrichten zu initialisieren! 


mp Head: 

dc.l 

mp Tail 

Zeiger auf nächste Nachricht 

mp Tail: 

dc.l 

0 

Null-Kennung 

mp TailPred: 





dc.l 

mp Head 

Zeiger auf vorangegangene Na 


dc.b 

0,0 


TaskStruktur: 





dc.l 

0,0 



dc.b 

1,0 

Node-Struktur 


dc.l 

DevName 



dc.b 

0 

tc Flags 


dc.b 

0 

tc State 


dc.b 

0 

tc IDNestCnt 


dc.b 

0 

tc TDNestCnt 


dc.l 

0 

tc SigAlloc 


dc.l 

0 

tc SigWait 


dc.l 

0 

tc SigRecvd 


dc.l 

0 

tc SigExcept 


dc.w 

0 

tc TtrapAlloc 


dc.w 

0 

tc_TrapAble 


dc.l 

0 

tc ExceptData 


dc.l 

0 

tc ExceptCode 


dc.l 

0 

tc TrapData 


dc.l 

0 

tc TrapCode 

tc SPReg: 

dc.l 

0 

tc SPReg 

tc SPLower: 

dc.l 

0 

tc SPLower 

tc SPUpper: 

dc.l 

0 

tc SPUpper 


dc.l 

0 

tc Switch 


dc.l 

0 

tc Launch 


dcb.b 

14 

tc MemEntry 


dc.l 

0 

tc UserData 


EndResident: 


Programm "test.device.s" (Quellcode des "Test-Device") 


Zum Schluß sei noch erwähnt, daß sich die Anzahl der Funk¬ 
tionen, die ein Device hat, nicht nur auf sechs (Library- 
Standardfunktionen + AbortIO + BeginlO) beschränken muß, da 
man das Device auch als Library benutzen kann. Außerdem ist 
es möglich, wenn mehrere Geräte benutzt werden, auch mehrere 
Tasks zu erstellen. So legt das TDD für jedes Laufwerk einen 
eigenen Task an. 
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Bei der Besprechung der DOS-Library im 4. Kapitel haben wir 
ein paar Features, die zum DOS gehören, aber "damals" noch 
zu kompliziert waren, weggelassen. Nun verfügen wir über 
genug Systemwissen, um auch das letzte Eckchen des DOS 
verstehen zu können. 

Wir beginnen mit dem Aufbau einer DOS-Diskette, wobei wir 
lernen werden, wie das DOS Daten auf seinen Speichermedien 
verwaltet. Dann behandeln wir die Basisstruktur der DOS- 
Library und diversen anderen wichtigen Strukturen. 
Schließlich wollen wir uns mit den DOS-Packets, der 
Parameterübergabe, den ". info"-Dateien und den "executable"- 
Dateien beschäftigen. 


12.1 Der Aufbau einer DOS-Diskette 

Der Begriff "Diskette" bezieht sich wieder einmal nicht nur 
auf Floppy-Disks, sondern auch auf Festplatten, die RAM-Disk 
"RAD:" und sonstige "Floppy-ähnliche" Geräte. Allerdings 
gibt es gewisse Unterschiede zwischen den einzelnen Geräten, 
worauf wir noch näher eingehen werden. Wenn Sie also im 
folgenden "Diskette" oder "Disk" lesen, ist, falls nichts 
anderes gesagt wird, irgendein floppy-ähnliches Medium ge¬ 
meint. 

Die Einrichtung im Amiga-System, die für die Verwaltung der 
Datenträger zuständig ist, nennt sich "File-System" 
(Dateisystem). Die meisten Funktionen der DOS-Library rei¬ 
chen die, ihnen aufgetragene Arbeit eigentlich nur an das 
Filesystem weiter und warten, bis es die Arbeit erledigt hat 
(recht faule Library). Bei der Betrachtung des Diskettenauf- 
baus werden wir also vom Filesystem, und nicht vom DOS spre¬ 
chen. 

Für den Umgang mit Disketten kennt der Amiga zwei Filesy¬ 
steme: das alte FileSystem, genannt OldFileSystem (OFS) und 
das FastFileSystem (FFS). Letzteres ist eine Weiterentwick¬ 
lung des alten Filesystems. Ab Kickstart 2.0 ist es auch für 
Floppy-Disketten benutzbar, vorher war es nur für Festplat¬ 
ten reserviert. Wir werden uns zunächst mit dem alten File¬ 
system befassen, auf die Unterschiede zum FastFileSystem 
kommen wir dann ganz automatisch. 

Im Kapitel über das Trackdisk-Device haben wir schon erfah¬ 
ren, daß eine Diskette in Tracks, Seiten und Sektoren und 
damit in Blöcke aufgeteilt ist, von denen jeder 512 Bytes 
umfaßt. Das Amiga-Filesystem orientiert sich ebenfalls an 
dieser Block-Unterteilung. Neben den sog. "Datenblöcken", in 
die (unter anderem) die eigentlichen Daten geschrieben wer¬ 
den, kennt das Filesystem verschiedene andere Blocktypen, 
die allesamt der Verwaltung dienen. 
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Jeder Diskblock wird über seine Nummer angesprochen. Ein Re¬ 
chenbeispiel: Eine Floppy-Disk hat 80 Tracks (0-79), 2 Sei¬ 
ten, und jeder Track hat 11 Sektoren (0-10). Daraus ergibt 
sich eine Blockzahl von 80*2*11 = 1760. Die Blöcke einer 

Floppy-Disk bekommen also die Nummern 0 bis 1759. Bei ande¬ 
ren Speichermedien, speziell bei Festplatten, dürfte die 
Blockanzahl erheblich höher liegen. 

Die verschiedenen Blocktypen, die das Filesystem kennt, sind 
folgende: 

Directory-Blöcke 

Dieser Blocktyp dient, wie der Name schon sagt, der Verwal¬ 
tung von Verzeichnissen. Er enthält Informationen über den 
Namen, den Schutzstatus, das Datum des letzten Schreibzu¬ 
griffes auf das Verzeichnis und als Kernstück eine Liste mit 
Zeigern auf die Verwaltungsblöcke der Objekte (Dateien oder 
Unterverzeichnisse), die sich in dem Verzeichnis befinden. 

Fileheader-Blöcke 

Diese Blöcke sind für die Verwaltung der Dateien zuständig. 
Auch sie enthalten den Namen, Schutzstatus, Datum usw. der 
Datei. Als Kernstück ist hier eine Liste der zu dieser Datei 
gehörigen Datenblöcke zu finden. 

Der Root-Block 

Hierbei handelt es sich um einen speziellen Directory-Block. 
Er enthält das Hauptverzeichnis einer Diskette. Anstatt ei¬ 
nes Verzeichnisnamens ist hier der Diskettenname zu finden. 

Der Bitmap-Block 

Der Begriff "Bitmap" ist nicht zu verwechseln mit der Gra¬ 
fik-Bitmap. Die Bezeichnung hat aber einen ähnlichen Ur¬ 
sprung: Im der Bitmap ist verzeichnet, welche Diskblöcke 
frei und welche belegt sind. Jedem Block wird dabei ein Bit 
in der Tabelle zugeordnet - daher also Bitmap. 

Filelist-Blöcke 

In einem Fileheader-Block können maximal 72 zu einer Datei 
gehörigen Datenblöcke verwaltet werden. Wenn eine Datei mehr 
als 72 Blöcke umfaßt, werden ein bzw. mehrere Filelist- 
Blöcke eingerichtet, in dem bzw. denen die restlichen Daten¬ 
blöcke verwaltet werden. 

Datenblöcke 

Hier stehen die eigentlichen Daten. Neben diesen sind aber 
auch noch Verwaltungsinformationen wie ein Zeiger zurück zum 
Fileheader, die Nummer dieses Datenblocks in der Blockfolge 
der Datei, ein Zeiger auf den nächsten Datenblock usw. Diese 
Zusatzinformationen sind bei der Restauration defekter Dis¬ 
kettenstrukturen sehr nützlich. 

Nachdem wir nun einen groben Überblick über die Blocktypen 
haben, wollen wir jeden Typ einzeln besprechen. 
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12.1.1 Der Boot-Block 

Nanu, werden Sie jetzt vielleicht denken, dieser Blocktyp 
kam in der obigen Liste doch gar nicht vor. Das stimmt, denn 
er gehört eigentlich nicht zu den Blöcken, die das Filesy¬ 
stem verwaltet. Der Boot-Block (eigentlich müßte es heißen: 
die Boot-Blöcke) belegt immer die ersten zwei Blöcke einer 
DOS-Diskette (Track 0, Seite 0, Sektor 0 und Track 0, Seite 
0, Sektor 1) . Für das System hat er eine zweifache Bedeu¬ 
tung: Erstens enthalten die ersten vier Bytes in diesem Dop¬ 
pelblock die Kennung des Dateisystems. Bei einer Diskette, 
die mit dem alten Dateisystem formatiert wurde, steht dort 
das Hex-Langwort $444F5300. Das entspricht den ASCII-Codes 
für die Großbuchstaben "D", "0", "S" und einem Nullbyte. Er¬ 
innern Sie sich noch an die InfoData-Struktur aus dem DOS- 
Einsteiger-Kapitel? Da tauchte dieser Wert schon einmal als 
Kennzeichen für eine Standard-DOS-Disk auf! Jetzt wissen Sie 
auch, woher er stammt. 

Eine FFS-Diskette trägt die Kennung $444F5301, also ledig¬ 
lich ein Eins-Byte anstatt eines Nullbytes am Ende der Ken¬ 
nung. Damit eine Diskette vom Filesystem akzeptiert wird, 
muß sie die DOS-O-Kennung (ab Kickstart 2.0 auch DOS-1 für 
FFS-Disk) im Bootblock tragen. 

Die zweite Bedeutung des Bootblocks kommt beim Systemstart 
(eben beim Booten) zum Tragen: Der Bootblock enthält ein Ma¬ 
schinenprogramm, das beim Start von der Diskette ausgeführt 
wird, noch bevor der Workbench-Screen erscheint oder die 
Startup-Sequence an die Reihe kommt. Das Programm kann, wenn 
man ein Spiel oder sonstiges Programm vor sich hat, eine La¬ 
deroutine, ein Intro oder etwas Ähnliches sein. Jetzt ver¬ 
stehen Sie vielleicht auch, warum manche Disketten sofort 
mit dem Laden beginnen, ohne daß vorher der Workbench-Screen 
sichtbar wird. 

Eine Diskette ist nur dann bootfähig (d.h. man kann das Sy¬ 
stem nur dann von ihr starten), wenn im Bootblock ein kor¬ 
rektes Programm vorhanden ist (was das heißt, werden wir 
noch sehen). Wenn dies nicht der Fall ist, kann man zwar per 
Filesystem auf die Disk zugreifen, aber keinen Systemstart 
von ihr ausführen. Bei einer CLI-installierten Diskette er¬ 
füllt das Bootblock-Programm nur den Zweck, einen Zeiger auf 
die Resident-Struktur der DOS-Library (Exec-Routine FindRe- 
sident) zu ermitteln und diesen dem System, als Zeichen für 
die Einsatzbereitschaft des DOS, zurückzumelden. Als "brave" 
DOS-User brauchen wir uns um den Bootblock nicht zu kümmern. 
Wir werden später auf seine Programmierung zurückkommen, 
jetzt wollen wir ihn erst einmal als System-gegeben hinneh¬ 
men . 

Die Blocktypen, die im folgenden vorgestellt werden, sind 
alle langwort-orientiert aufgebaut. Die 512 Bytes eines 
Blocks werden in 128 Langworte aufgeteilt, die bestimmte 
Funktionen erfüllen, d.h. mit bestimmten Werten belegt sind. 
Diese Belegungen wollen wir uns nun anschauen. 


614 



DOS für Fortgeschrittene 


12.1.2 Der Root-Block 

Beim Rootblock handelt es sich um einen speziellen Direc¬ 
tory-Block. Er ist immer an einer festen Stelle, nämlich in 
der "Mitte" des Datenträgers. Bei Floppy-Disks ist das Track 
40, Seite 0, Sektor 0, also Block 880. 

Den Aufbau dieses Blocks und auch der weiteren Blocktypen 
stellen wir in einer Tabelle vor. Links stehen die Offsets 
der Einträge, zuerst als Langwort- und dann als Byte-Offset. 
Dann folgt der Inhalt des Eintrags und schließlich eine 
kurze Erklärung. Eine ausführliche Erklärung folgt, falls 
nötig, nach der Tabelle. 

Der Aufbau des Root-Blocks 


Offsets Eintrag 

Long Byte 


0 

0 

2 

1 

4 

0 

2 

8 

0 

3 

12 

HT Size 

4 

16 

0 

5 

20 

Checksum 

6 

24 

Hash Table 

7 

28 


77 

308 


78 

312 

Bitmap Flag 

79 

316 

Bitmap Pages 

104 

416 


105 

420 

Days 

106 

424 

Mins 

107 

428 

Ticks 

108 

432 

Disk Name 

120 

480 


121 

484 

CreateDays 

122 

488 

CreateMins 

123 

492 

CreateTicks 


0 

0 

0 


Bedeutung 

Primärer Blocktyp: T.SHORT 

Größe der Hash-Tabelle (72) 

Checksumme des Blocks 

Hash-Tabelle (Zeiger auf Blöcke 
der Objekte im Verzeichnis) 

Bitmap ok? (0=Nein, <>0=Ja) 
Zeiger auf Bitmap-Blöcke 

Datum und Uhrzeit des letzten 
Schreibzugriffs (im DateStamp- 
Format) 

Diskettenname (BCPL-String) 


Datum und Uhrzeit der Formatierung 
der Diskette (DateStamp-Format) 


124 496 

125 500 

126 504 
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127 508 


1 Sekundärer Blocktyp: ST.ROOT 


Falls im Eintrag eine bestimmte Zahl steht, so ist sie als 
Konstante anzusehen, die bei diesem Blocktyp immer dort ste¬ 
hen muß. Variable Werte sind durch englische Texte (die von 
Commodore vorgegebenen) gekennzeichnet. 

Der Aufbau der verschiedenen Blocktypen ist recht ähnlich. 
Daher gibt es Einträge, die nur in bestimmten Blocktypen 
eine Bedeutung haben, in anderen aber nicht. Das Zeichen 

"-" in der Erklärung besagt, daß dieser Eintrag in diesem 

Blocktyp keine Bedeutung hat und auf 0 stehen sollte. 


Nun zu den einzelnen Einträgen des Rootblocks: 


Blocktyp 


HT Size / Hash Table 


Checksum 


Bitmap Flag 


Bitmap Pages 


Days/Hins/Ticks 


Disk Name 


Das erste und letzte Langwort in einem Verwal¬ 
tungsblock gibt immer den Blocktyp an. Beim 
Rootblock steht im ersten Eintrag eine 2 und im 
zweiten eine 1, was für T.SHORT bzw. ST.ROOT 
steht. 

Das Amiga-Filesystem verwendet eine besondere 
Methode, um aus dem Namen einer gesuchten Datei 
oder eines Verzeichnisses die Position 
ihres/seines Verwaltungsblocks zu bestimmen. In 
diesem Zusammenhang spielt die Hash-Tabelle eine 
wichtige Rolle. Im Abschnitt über die Directory- 
Blöcke werden wir darauf zurückkommen. 

Über jeden Block berechnet das Filesystem grund¬ 
sätzlich eine Checksumme, um etwaige Fehler 
schnell erkennen zu können. In allen Blocktypen 
bis auf den Bitmap-Block wird die Checksumme im 
5. Langwort eingetragen. Auf die Art der Berech¬ 
nung werden wir gleich kommen. 

Dieses Langwort gibt an, ob die Bitmap (siehe 
unten) gültig ist oder neu berechnet werden muß. 
Wenn hier eine 0 steht, ist die Bitmap ungültig, 
bei einem Wert ungleich 0 ist sie gültig. 

Die Bitmap eines Datenträgers kann aus mehreren 
Blöcken bestehen (bei einer Floppy-Disk reicht 
ein Block). Jeder dieser Blöcke wird Bitmap- 
Block genannt. In der Bitmap ist verzeichnet, 
welche Blöcke einer Diskette frei und welche 
belegt sind. Das ist für das Filesystem sehr 
wichtig zu wissen, damit es nicht schon belegte 
Blöcke noch einmal verwendet (Datenverlust). 
Mehr dazu im Abschnitt über den Bitmap-Block. 

Hier wird das Datum und die Uhrzeit des letzten 
Schreibzugriffs auf die Diskette im DateStamp- 
Format (siehe DOS-Kapitel) abgelegt. 

Das erste Byte dieses Eintrags gibt die Länge 
des Diskettennamens an, dann folgen die einzel¬ 
nen Zeichen (BCPL-String). 
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CreateDays/Mins/Ticks Ebenfalls im DateStamp-Format wird der Zeitpunkt 
des Anlegens (Formatierens) der Diskette abge¬ 
legt. 


Berechnung der Rootblock-Checksuimue 

Jeder Block bekommt vom Filesystem eine Checksumme. Auf 
diese Weise können fehlerhafte oder ungültige Blöcke schnell 
erkannt werden, da die Wahrscheinlichkeit, daß sich die 
eventuellen Datenfehler in einem Block genau so ausgleichen, 
daß die Checksumme wieder stimmt, sehr gering ist. 

Das Amiga-Filesystem verwendet drei unterschiedliche Metho¬ 
den der Checksummen-Berechnung, je nachdem, um welchen 
Blocktyp es sich handelt. Die Checksummen sind immer Lang¬ 
wörter. Für die Blocktypen Rootblock, Directory-Block, File- 
Header-Block, Data-Block und File-List-Block sieht die Be¬ 
rechnung folgendermaßen aus: 

1. Lösche das Summen-Langwort und den eventuell vorhandenen 
bisherigen Checksummen-Eintrag (Langwort 5 im Block). 

2. Subtrahiere alle Langwörter im Block nacheinander vom 
Summen-Langwort (Unterlaufe werden nicht beachtet). 

3. Das Summen-Langwort enthält dann die Checksumme. 

Das Löschen der alten Checksumme ist notwendig, da die 
Checksumme selbst natürlich nicht in ihre eigene Berechnung 
eingehen darf. Die so berechnete Checksumme muß ins 5. Lang¬ 
wort eingetragen werden. In Assembler könnte die Berechnung 
so aussehen (in aO wird der Start des Blocks im Speicher er¬ 
wartet) : 



clr.l 

dO 

; Lösche Summen-Langwort 


clr.l 

20(a0) 

; Lösche alte Checksumme 


move. 1 

aO,al 

; Blockzeiger zur Bearbeitung nach al 


moveq 

#127,dl 

; Bearbeite 128 Langwörter 

ml: 

sub.l 

(31)+/dO 

; Nächstes Langwort subtrahieren 


dbra 

dl,ml 

; Schleife 


move. 1 

d0,20(aü) 

; Berechnete Checksumme eintragen 


Bild 12.1: Berechnung der Rootblock-Checksumme 


12.1.3 Der Bitmap-Block 

Die Bitmap dient, wie schon erwähnt, der Kennzeichnung von 
belegten und freien Blöcken. Als erstes die Aufbau-Tabelle: 
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Der Aufbau des Bitmap-Blocks 

Offsets Eintrag 

Long Byte 

0 0 

1 4 

2 8 

127 508 


Checksum 


Bitmap 


Bedeutung 

Bitmap-Checksumme 

Bitmap-Langwörter 


Der Bitmap-Block besteht also nur aus einer Checksumme und 
den eigentlichen Bitmap-Daten. Bevor wir letztere bespre¬ 
chen, zuerst die Vorgehensweise bei der Berechnung der 
Bitmap-Checksumme: 


Berechnung der Bitmap-Checksumme 

1. Lösche das Summen-Langwort 

2. Subtrahiere die Langwörter 2-128 des Blocks vom Summen- 
Langwort (Unterlaufe werden nicht beachtet). 

3. Das Summen-Langwort enthält dann die Checksumme. 

Die Berechnung entspricht eigentlich der, der übrigen 
Verwaltungsblöcke, nur können wir uns hier das Löschen der 
alten Checksumme sparen, da sie im ersten Langwort steht. 
Wir beginnen die Subtraktion einfach erst beim zweiten 
Langwort. Die Berechnung der Bitmap-Checksumme sieht in 
Assembler so aus: 



clr.l 

dO 

; Lösche Summen-Langwort 


lea 

4(a0),al 

; Beginne Subtraktion bei Blockbeginn+4 


moveq 

#126,dl 

; Bearbeite 127 Langwörter 

ml: 

sub.l 

(al)+,d0 

; Nächstes Langwort subtrahieren 


dbra 

dl,ml 

; Schleife 


move.1 

dO,(aO) 

; Berechnete Checksumme eintragen 


Bild 12.2: Berechnung der Bitmap-Checksumme 


Aufbau der Bitmap-Daten 

Nun zum Aufbau der eigentlichen Bitmap-Daten. Sie beginnen 
im zweiten Langwort des Bitmap-Blocks. Von hier ab wird je¬ 
dem Diskblock ein Bit zugeordnet. Wichtig: Die ersten beiden 
Blöcke der Diskette (Bootblock) tauchen in der Bitmap nicht 
auf, da sie für das Filesystem quasi gesperrt sind! Der er¬ 
ste Block, der in der Bitmap verzeichnet ist, ist Nr. 2 
(Zählung beginnt bei 0). 
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Jedes Langwort des Bitmap-Blocks kann man nun als Gruppe an- 
sehen. Innerhalb dieser Gruppe wird dem niederwertigsten Bit 
(Nr. 0) der erste Diskblock der Gruppe zugeordnet, dem 
höchstwertigsten Bit (Nr. 31) der letzte Block der Gruppe. 
Im nächsten Langwort wird diese Folge dann fortgesetzt. Die 
Zuordnung in den ersten beiden Bitmap-Langworten nach der 
Checksumme sieht also so aus: 


Erstes Langwort 
3 2 1 

Bit 10987654321098765432109876543210 


Zweites Langwort 
3 2 1 

10987654321098765432109876543210 

-I I 


1 1_ 

Block 33 



Block 2 Block 66 



Block 

Block 32 

Block 3 Block 65 

Block 35 


Block 17 


Block 49 


Die weiteren Langworte sind analog aufgebaut. Ein gesetztes 
Bit bedeutet, daß der entsprechende Block frei ist, bei ei¬ 
nem gelöschten Bit ist er belegt. Die Anzahl der Diskblöcke, 
die sich in einem Bitmap-Block verwalten lassen, berechnet 
sich zu: 127 (Langworte) * 32 (Bits pro Langwort) = 4064 
Blöcke. Das entspricht etwa 2 MB Daten. 

Da eine Floppy-Disk 1760 Blöcke umfaßt, reicht ein Bitmap- 
Block vollkommen aus, er wird sogar noch nicht einmal zur 
Hälfte benötigt. Bei anderen Speichermedien, z.B. Festplat¬ 
ten, ist das aber anders. Deshalb enthält der Rootblock 26 
Einträge für Bitmap-Blöcke. Das erhöht die maximale Block¬ 
zahl auf 4064 * 26 = 105664 Blöcke, das sind ca. 52 MB. Bei 
der Benutzung des alten Filesystems ist die maximale Größe 
eines Speichermediums also 52 MB, mehr kann die Bitmap nicht 
verwalten. Da diese Einschränkung recht ärgerlich ist, bie¬ 
tet das FFS, das ja hauptsächlich für Festplatten eingesetzt 
wird, hier eine Verbesserung, auf die wir im nächsten Ab¬ 
schnitt eingehen werden. 

Folgende Befehlsfolge berechnet (für eine Floppy-Disk) die 
Nummer des Bytes und des Bits in der Bitmap, unter dem ein 
bestimmter Block (dessen Nummer in do erwartet wird) zu fin¬ 
den ist. Die Bytenummer, die als Offset zum Bitmap-Block-An- 
fang zu sehen ist, steht dann in dl und die Bitnummer in d2. 


sub. 1 

#2,d0 

; Bootblock steht nicht in Bitmap 

divu 

#32,d0 

; Ergebnis = Langwort, Rest = Bit 

clr. 1 

dl 

; Zielregister löschen 

clr.l 

d2 


move.w 

d0,dl 

; Langwort nach dl 

add.w 

#1 ,dl 

; Checksumme überspringen 
; Aus Langwort mach 1 Byte 

asl 

#2,dl 

swap 

do 

; Oberes Wort (Rest) nach unten 

move.w 

d0,d2 

; Bit nach d2 


Bild 12.3: Berechnung der Byte- und Bitnummer eines Blocks 
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Dazu ist noch folgendes zu sagen. Da bei der Angabe einer 
Blocknummer die beiden Bootblöcke mit einbezogen werden, 
diese in der Bitmap aber nicht enthalten sind, muß die 
gewünschte Blocknummer zunächst um 2 verkleinert werden. 
Nach dem DIVU-32-Befehl steht das Ergebnis, also die Lang¬ 
wortnummer, im unteren Wort von do und der Rest, die Bitnum¬ 
mer, im oberen. Die Langwortnummer wird in den Byte-Offset 
umgerechnet, indem das Checksummen-Langwort am Blockanfang 
übersprungen und dann die Langwortnummer mit 4 malgenommen 
wird. Die Bitnummer kann direkt aus dem Rest-Wort in do 
übernommen werden. 


Um nun zu prüfen, ob ein bestimmter Diskblock frei ist, 
reicht nach der Durchführung obiger Berechnung ein MOVE- und 
ein BTST-Befehl (in aO stehe der Blockanfang der Bitmap): 


move.1 

0(a0,dl),d0 

; Blockanfang plus Byte-Offset 

btst 

d2,d0 

; Prüft Bit d2 im Langwort do 

bne 

blockfrei 

; Bit gelöscht -> Block frei 

beq 

blockbelegt 

; Bit gesetzt -> Block belegt 


Bild 12.4: Test, ob ein Diskblock belegt ist 


Das BM-Flag (Bitmap Valid) im Rootblock gibt an, ob die 
Bitmap, so wie sie in den Blöcken steht, korrekt ist oder 
nicht. Vor jedem Schreibzugriff auf die Diskette, der even¬ 
tuell dazu führt, daß Blöcke belegt oder freigegeben werden, 
wird das BM-Flag gelöscht und erst nach Beendigung des 
Schreibens, unmittelbar nach dem Aktualisieren der Bitmap, 
wieder gesetzt. Falls nun der Schreibvorgang durch eine äu¬ 
ßere Störung (Absturz, Reset etc.) unterbrochen wird, ist 
die Bitmap als ungültig gekennzeichnet. Bevor erneut auf die 
Diskette geschrieben werden kann, muß sie erst wieder gültig 
gemacht, d.h. neu berechnet werden, da das Filesystem anson¬ 
sten nicht weiß, welche Blöcke es denn nun belegen darf. 

Diese Neuberechnung geht so vor sich: Zuerst werden alle 
Blöcke als frei gekennzeichnet. Dann geht das Filesystem, 
ausgehend vom Rootblock, sämtliche Verzeichnisse und eventu¬ 
ellen Unterverzeichnisse und darin enthaltenen Dateien durch 
und kennzeichnet alle auf diese Weise gefundenen, zu einer 
korrekten Struktur gehörigen Blöcke, als belegt. Diese neue 
Bitmap wird in die im Rootblock eingetragenen Bitmap-Blöcke 
geschrieben, und die Bitmap ist restauriert. Dieser Vorgang 
wird unmittelbar beim Einlegen einer Diskette mit ungültiger 
Bitmap eingeleitet und dauert bis zu einer halben Minute. 
Falls das Filesystem während der Neuberechnung auf einen 
Fehler in der Diskstruktur (falscher Blocktyp, Block doppelt 
benutzt, Checksummenfehler etc.) stößt, wird der allseits 
geliebte Reguester "Error validating Disk . . . Use Diskdoctor 
to correct it" ausgegeben. 
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Der BitMapList-Block (nur beim FFS) 

Nun zu der Verbesserung im FFS bezüglich der 52 MB-Ein- 
schränkung: Wenn die 26 Bitmap-Blöcke nicht ausreichen, wird 
in den 26. Bitmapblock-Zeiger im Rootblock statt eines 
Bitmap-Blocks ein Zeiger auf einen BitMapList-Block einge¬ 
tragen, der folgendermaßen aussieht: 


Der Aufbau des BitMapList-Blocks 

Offsets Eintrag Bedeutung 

Long Byte 


1 4 

2 8 

126 504 

127 508 


BitMapBlock 


NextBMList 


Zeiger auf Bitmap-Blöcke 


Zeiger auf nächsten BML-Block 


Dieser Block besteht also aus 127 Zeigern auf Bitmap-Blöcke 
(was eine Kapazität von 516128 Blöcken oder 252 MB aus¬ 
macht), und falls das immer noch nicht ausreicht, zeigt das 
128. Langwort auf den nächsten BitMapList-Block (wieder 252 
MB). Die Kapazität des Datenträgers ist also nun, jedenfalls 
aus Sicht der Bitmap-Verwaltung, unbeschränkt. 

Dieser Block hat, wie aus dem Diagramm ersichtlich ist, 
keine Checksumme. Der BitMapList-Block ist neben dem FFS-Da- 
tenblock (kommt noch) der einzige Blocktyp, für den dies 
gilt. 


12.1.4 Der Directory-Block 

Jedes Verzeichnis auf einer Diskette wird mit Hilfe eines 
solchen Blocks verwaltet. Schauen wir uns seinen Aufbau an: 


Der Aufbau des Directory-Blocks 

Offsets Eintrag Bedeutung 

Long Byte 


0 0 

1 4 

2 8 

3 12 

4 16 

5 20 



Primärer Blocktyp: T.SHORT 
Zeiger auf den Block selbst 


Checksumme des Blocks 
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6 

24 

Hash Table 

77 

308 


78 

312 

0 

79 

316 

0 

80 

320 

Protect 

81 

324 

0 

82 

328 

Comment 

104 

416 


105 

420 

Days 

106 

424 

Mins 

107 

428 

Ticks 

108 

432 

Directory Name 

120 

480 


121 

484 

0 

122 

488 

0 

123 

492 

0 

124 

496 

Hashchain 

125 

500 

Parent 

126 

504 

0 

127 

508 

2 


Hash-Tabelle (Zeiger auf Blöcke 
der Objekte im Verzeichnis) 


Protection Bits (Schutzstatus) 


Verzeichnis-Kommentar (BCPL-String) 


Datum und Uhrzeit des letzten 
Schreibzugriffs (im DateStamp- 
Format) 

Verzeichnisname (BCPL-String) 


Nächster Hash-Block (siehe unten) 
Zeiger auf übergeordnetes Verzeichn. 


Sekundärer Blocktyp: ST.USERDIR 


Blocktyp 
Header Key 

Checksum 
Hash Table 

Protect 

Comment 

Days/Mins/Ticks 


Die Kennwerte für den Blocktyp Directory-Block 
sind T.SHORT und ST.USERDIR (beides 2). 

Dieser Zeiger, der auf den Block selbst weist, 
dient als Kontrolle, ob der Block korrekt ist 
oder durch irgendwelche User-Umkopier-Aktionen 
von einer anderen Stelle hierher geraten ist. 

Die Berechnung der Directory-Block-Checksumme 
läuft exakt genauso ab wie beim Rootblock. 

Auch ein Directory-Block hat eine Hash-Tabelle. 
Auf das Verfahren des Hashings gehen wir nach 
dieser Beschreibung ein. 

Die Bits in diesem Langwort entsprechen denen, 
die man beim DOS-SetProtection-Aufruf (siehe 
DOS-Kapitel) verwendet. 

An die Steile der Bitmap-Blockzeiger des Root- 
blocks tritt im Directory-Block der Comment- 
BCPL-String. 

Der Zeitpunkt des letzten Schreibzugriffs wird 
auch hier im DateStamp-Format festgehalten. 
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Directory Name Der Name als BCPL-String. 

Hashchain Dieser Eintrag spielt im Zusammenhang mit dem 

Hashing eine Rolle. 

Parent Bis auf den Rootblock enthält jeder Block einen 

Zeiger auf den übergeordneten Block, beim Direc¬ 
tory-Block ist das der Verwaltungsblock des 
übergeordneten Verzeichnisses. 


Berechnung der Blocknummer aus dem Namen 

Das Amiga-Filesystem ist derzeit so ziemlich das schnellste 
Filesystem, wenn es darum geht, eine Datei oder ein Ver¬ 
zeichnis mit bekanntem Namen auf einem Datenträger zu loka¬ 
lisieren. Es verwendet die Methode des "Hashings" (die Num¬ 
mer des Verwaltungsblocks wird aus dem Namen berechnet). 

In jedem Directory-Block (auch im Rootblock) gibt es eine 
Tabelle, die aus 72 Langwörtern besteht. Sie nennt sich die 
Hash-Tabelle (ihre Größe ist auch im Eintrag "HT Size" des 
Rootblocks abgelegt). In diese 72 Langwörter werden nun Zei¬ 
ger auf die Verwaltungsblöcke der zum Verzeichnis gehörigen 
Dateien oder Unterverzeichnisse eingetragen, und zwar nicht 
beliebig, alphabetisch oder in Reihenfolge des Anlegens, 
sondern nach einer ganz bestimmten Formel. 

Die Platznummer eines Blockzeigers in der Hash-Tabelle wird 
aus dem Objektsnamen errechnet, und zwar auf folgende weise: 

1. Den Startwert der Hashnummer bildet die Länge des Namens. 
Zu ihm werden alle weiteren Werte hinzuaddiert. 

2. Alle Kleinbuchstaben (a-z, nicht aber Umlaute und ß) wer¬ 
den in Großbuchstaben umgewandelt. 

3. Der bisherige Hash-Wert wird mit 13 multipliziert. 

4. Der ASCII-Code des (eventuell umgewandelten) nächsten 
Zeichens wird zum Hashwert hinzuaddiert. 

5. Nach der Addition wird der Hashwert mit $7FF AND-ver- 
knüpft. 

6. Wiederholung der Punkte 3-5 für alle Zeichen im Namen. 

7. Der Hashwert wird durch die Größe der Hash-Tabelle (72) 
Modulo-dividiert (d.h. der Rest der Ganzzahl-Division 
wird als Ergebnis verwendet). 

Die solchermaßen berechnete Nummer gibt den Platz des 
Hashtabellen-Eintrags (0-71) für diesen Namen an. Um sie in 
einen Byte-Offset umzurechnen, muß 6 (das Start-Langwort der 
Hash-Tabelle) zur Nummer hinzuaddiert und die Summe mit 4 
multipliziert werden. Das Berechnungsverfahren gilt natür¬ 
lich nur für reine Datei- oder Verzeichnisnamen, ohne ir¬ 
gendwelche Pfadangaben. 

Da die Hash-Tabelle 72 Einträge umfaßt, in der Praxis aber 
sicherlich mehr als 72 verschiedene Dateinamen auftreten 
können, sind Doppelbelegungen unvermeidlich. In diesem Fall 
wird, falls ein Blockzeiger in der Hash-Tabelle schon belegt 
ist, der Blockzeiger auf das neue Objekt im Eintrag 
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"Hashchain", zu Deutsch Hash-Verkettung, abgelegt. Sucht man 
nun nach einer bestimmten Datei und hat man, gemäß ihrer 
Hashtabellen-Platznummer, den dort gefundenen Block eingele¬ 
sen, muß man sich vergewissern, ob es sich bei dem gelesenen 
Block wirklich um den gewünschten handelt. Wenn nicht, muß 
der Block der nächsten Datei, deren Namen auch auf den be¬ 
rechneten Hash-Wert paßt, aus dem Hashchain-Eintrag ausgele¬ 
sen und geladen werden. 


12.1.5 Der Fileheader-Block 

Nun kommen wir langsam zum interessanten Teil: den Dateien. 
Jede Datei wird über einen Fileheader-Block verwaltet, des¬ 
sen Aufbau wir uns jetzt ansehen wollen: 

Der Aufbau des Fileheader-Blocks 


Offsets 
Long Byte 


Eintrag 


Bedeutung 


0 

0 

2 

1 

4 

Header Key 

2 

8 

Highest Seq 

3 

12 

0 

4 

16 

First Data 

5 

20 

Checksum 

6 

24 

Data Blk 71 

7 

28 

Data Blk 70 

76 

304 

Data Blk 1 

77 

308 

Data Blk 0 

78 

312 

0 

79 

316 

0 

80 

320 

Protect 

81 

324 

Byte Size 

82 

328 

Comment 

104 

416 


105 

420 

Days 

106 

424 

Mins 

107 

428 

Ticks 


Primärer Blocktyp: T.SHORT 
Zeiger auf den Block selbst 
Anzahl verwendeter Block-Zeiger 

Zeiger auf ersten Datenblock 

Checksumme des Blocks 

Zeiger auf die ersten 72 Datenblöcke 
(die weiteren werden in FileList- 
Blöcken abgelegt) 


Protection Bits (Schutzstatus) 
Größe der Datei in Bytes 
Datei-Kommentar (BCPL-String) 

Datum und Uhrzeit des letzten 
Schreibzugriffs (im DateStamp- 
Format) 
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108 

432 

120 

480 

121 

484 

122 

488 

123 

492 

124 

496 

125 

500 

126 

504 

127 

508 



Dateiname (BCPL-String) 


Nächster Hash-Block 
Zeiger auf übergeordnetes Verzeichn. 
Zeiger auf ersten FileList-Block 
Sekundärer Blocktyp: ST.FILE 


Blocktyp 

Header Key 
Highest Seq 


First Data 

Checksum 

Data Blk 0 - 71 

Protect 
Byte Size 
Comment 

Days/Mins/Ticks 

File Name 
Hash Chain 


Als Kennzeichnung für einen Fileheader-Block 
werden die Werte 2 bzw. -3 für T.SHORT bzw. 
ST.FILE verwendet. 

Der Zeiger auf den Block selbst dient wieder der 
Fehlererkennung. 

Hier wird verzeichnet, wieviele der maximal 72 
Zeiger auf Datenblöcke verwendet werden. Das be¬ 
zieht sich aber nur auf die Blockzeiger im File- 
header-Block. Wenn eine Datei länger als 72 
Blöcke ist und daher ein Filelist-Block verwen¬ 
det wird, kommt in den Highest-Seq-Eintrag des 
Fileheader-Blocks trotzdem eine 72, da dort ja 
nur 72 Blockzeiger vorhanden sind, die benutzt 
werden können. 

Getrennt von den Blockzeigern wird hier der Zei¬ 
ger auf den ersten Datenblock zusätzlich auch 
eingetragen. 

Zur Berechnung der Fileheader-Block-Checksumme 
wird das selbe Verfahren verwendet wie beim 
Rootblock. 

Die Datenblöcke stehen quasi in "umgekehrter" 
Reihenfolge in der Blockzeiger-Tabelle. Der er¬ 
ste Datenblock wird also im letzten Eintrag der 
Tabelle verzeichnet. 

Entspricht dem Protect-Eintrag im Directory- 
Block. 

Zum schnellen Ermitteln der Größe einer Datei in 
Bytes steht selbige hier. 

Der Datei-Kommentar als BCPL-String. 

Zeitpunkt des letzten Schreibzugriffes (der 
letzten Veränderung) auf die Datei im DateStamp- 
Format. 

Der Dateiname als BCPL-String. 

Da es in einem Verzeichnis auch mehrere Datei¬ 
namen mit dem gleichen Hash-Wert geben kann, 
sind auch die Fileheader-Blöcke mit einem Zeiger 
auf die nächste Datei (bzw. das nächste 
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Verzeichnis) mit zum Hash-Wert passendenden 
Namen ausgestattet. 

Parent Hier wird ein Zeiger auf den Verwaltungsblock 

des Verzeichnisses eingetragen, in dem sich die 
Datei befindet. 

Extension Sollte die Datei mehr als 72 Blöcke groß sein, 

werden die weiteren Blöcke in einem FileList- 
Block verwaltet (die Blockzeiger-Tabelle des Fi- 
leheader-Blocks umfaßt maximal 72 Einträge). An 
diese Stelle wird der Zeiger auf den ersten Fi- 
leList-Block eingetragen. 

Der Aufbau dieses Blocktyps dürfte damit klar sein. 


12.1.6 Der Filelist-Block 

Im Fileheader-Block ist nur Platz für 72 Datenblock-Zeiger, 
die Datei könnte demnach nur 488 * 72 = 35136 Bytes groß 
sein (warum 488 und nicht 512, werden wir gleich noch se¬ 
hen). Um diesen Umstand zu umgehen, wird im Falle einer Da¬ 
tei, die mehr als 72 Blöcke umfaßt, ein Filelist-Block ange¬ 
legt. Er hat fast den selben Aufbau wie der Fileheader- 
Block, einige Einträge sind jedoch unbelegt. Hier das Auf¬ 
bau-Diagramm : 

Der Aufbau des Filelist-Blocks 


Offsets 

Long Byte 

Eintrag 

Bedeutung 

0 

0 

16 

Primärer Blocktyp: T.LIST 

1 

4 

Header Key 

Zeiger auf den Block selbst 

2 

8 

Block Count 

Anzahl der verwendeten Blockzeiger 

3 

12 

0 

— 

4 

16 

0 

— 

5 

20 

Checksum 

Checksumme des Blocks 

6 

24 

Data Blk N+71 

Zeiger auf weitere 72 Datenblöcke 

7 

28 

Data Blk N+70 


76 

304 

Data Blk N+l 


77 

308 

Data Blk N+0 


78 

312 

0 

— 

79 

316 



124 

496 



125 

500 

Parent 

Zeiger auf Fileheader-Block 
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126 504 

127 508 


Extension 


-3 


Zeiger auf nächsten FileList-Block 
Sekundärer Blocktyp: ST.FILE 


Blocktyp 

Header Key 
Block Count 
checksum 

Data Blk N+0 - N+71 

Parent 

Extension 


Als Kennzeichnung für einen Filelist-Block wer¬ 
den die Werte 16 bzw. -3 für T.LIST bzw. ST.FILE 
verwendet. 

Der Zeiger auf den Block selbst dient wieder der 
Fehlererkennung. 

Hier wird verzeichnet, wieviele der maximal 72 
Zeiger auf Datenblöcke verwendet werden. 

Zur Berechnung der Filelist-Block-Checksumme 
wird das selbe Verfahren verwendet wie beim 
Rootblock. 

Die Datenblöcke stehen auch hier guasi in 
"umgekehrter" Reihenfolge in der Blockzeiger-Ta¬ 
belle. 

Hier wird ein Zeiger auf den Fileheader-Block 
eingetragen, zu dem diese Filelist gehört. 

Sollten die bisherigen Datenblöcke noch nicht 
ausreichen, wird hier der Zeiger auf den näch¬ 
sten FileList-Block eingetragen. 


Damit wäre der Filelist-Block, klar. 


12.1.7 Der Data-Block 

Nun sind wir nach den ganzen Verwaltungsblöcken endlich dort 
angekommen, wo die Daten wirklich zu finden sind. Neben den 
reinen Daten werden in einen Data-Block aber auch noch ein 
paar zusätzliche Informationen gespeichert. 6 Langworte von 
den 128 eines Blockes werden dafür aufgewendet. Der Daten¬ 
menge, die in einem Block Platz hat, mag das etwas abträg¬ 
lich sein, aber die Zusatzdaten sind äußerst nützlich, wenn 
es darum geht, teilweise defekte Diskstrukturen wieder zu 
restaurieren. 

Dank der Verwaltungsinformationen in den Datenblöcken können 
nämlich sämtliche sonstigen Directory-, Fileheader- und Fi¬ 
lelist-Blöcke gelöscht sein, die Dateien können aber trotz¬ 
dem noch gerettet werden (bis auf den Namen, das Schreibda¬ 
tum, den Schutzstatus und die Zuordnung zu den Verzeichnis¬ 
sen) . 
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Der Aufbau des Data-Blocks 

Offsets Eintrag 

Long Byte 

0 0 

1 4 

2 8 

3 12 

4 16 

5 20 

6 24 

7 28 

127 508 



Bedeutung 

Primärer Blocktyp: T.DATA 
Zeiger auf Fileheader-Block 
Position des Blocks in der Datei 
Zahl der benutzten Bytes im Block 
Zeiger auf nächsten Datenblock 
Checksumme des Blocks 
488 Bytes Daten 


Blocktyp 


Header Key 


Seq Num 
Data Size 


Next Data 

Checksum 

Data 


Der Data-Block hat nur ein Blocktyp-Langwort, 
nämlich das am Blockanfang. Hier ist eine 8 für 
T.DATA zu finden. 

Beim Data-Block steht hier nicht ein Zeiger auf 
den Block selbst, sondern auf den Fileheader- 
Block der Datei, zu der der Data-Block gehört. 

Die Position des Datenblocks in der Blockkette 
der Datei. 

Gibt an, wieviele der 488 Bytes des Blocks ver¬ 
wendet werden (eine Datei muß ja nicht genau auf 
Blockgrenze enden). 

Zeiger auf den nächsten Datenblock. 

Die Berechnung erfolgt wie beim Rootblock. 

Endlich haben wir die Daten erreicht ... 


Der Data-Block beim FFS 

Neben dem Verwaltung der Bitmap-Blöcke unterscheidet sich 
das FFS auch im Aufbau der Datenblöcke vom OFS. Beim FFS 
werden im Data-Block keine Verwaltungsinformationen gespei¬ 
chert. Die vollen 512 Bytes werden zur Datenspeicherung ver¬ 
wendet . 

Diese Tatsache hat sowohl Vor- als auch Nachteile. Die Vor¬ 
teile sind zum einen die größere Speicherkapazität (24 Bytes 
mehr pro Block, das ergibt pro Megabyte Speicherplatz 48 KB 
mehr), zum anderen eine höhere Ladegeschwindigkeit. Beim al¬ 
ten Filesystem müssen nämlich die Daten jedes Datenblocks 
nach dem Laden noch umkopiert werden, um die Verwaltungsin¬ 
formationen auszufiltern. Das ist beim FFS nicht nötig, hier 
können die Daten "am Stück" in den gewünschten Speicherbe¬ 
reich gelesen werden. 
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Nachteile gibt es eigentlich nur einen: die Datensicherheit. 
Wenn beim FFS einmal die Verwaltungsblöcke (Fileheader oder 
Filelist) zerstört sind, gibt es so gut wie keine Möglich¬ 
keit mehr, die Datei noch zu restaurieren, obwohl die Daten 
selbst womöglich noch wohlbehalten auf der Disk stehen. Man 
weiß aufgrund der zerstörten Blockliste einfach nicht mehr, 
welche Diskblöcke zur Datei gehörten. Beim alten Filesystem 
wäre das kein Problem, da in jedem Datenblock angegeben ist, 
zu welcher Datei er gehört (Eintrag "Header Key") und der 
wievielte Block der Datei er ist (Eintrag "Seq Num"). Beim 
FFS gibt es diese Einträge nicht, deshalb sieht es bei einer 
zerstörten Blockliste ziemlich übel aus. 

Bis einschließlich zur Betriebssystemsversion 1.3 wird das 
FFS nur für Festplatten benutzt. Ab Kickstart 2.0 ist es 
auch möglich, Disketten unter FFS zu beschreiben. 


12.1.8 Programmierung des Bootblocks 

Zu Beginn dieses Kapitels haben wir den Bootblock im Zusam¬ 
menhang mit der Filesystem-Kennung schon einmal kurz ange¬ 
sprochen. Nun wollen wir uns den Aufbau dieser beiden 
Blöcke, die eigentlich nicht zum Filesystem gehören, an¬ 
schauen. Zuerst das Diagramm: 

Der Aufbau 

Offsets 
Long Byte 


0 0 


1 4 


2 8 


3 12 

4 16 

255 1020 


ID 

Entweder $444F5300 für eine OFS-Diskette oder 
$444F530l für eine FFS-Diskette. 

Checksum 

Die Berechnung der Boot-Checksumme läuft anders 
ab als die bisher bekannten Checksummen. Wir 
werden gleich darauf kommen. 

Dosblock 

Hier wird ein Zeiger auf den Rootblock (bei Dis¬ 
ketten Block 880) erwartet. 

Program 

Für das Bootprogramm müssen bestimmte Regeln er¬ 
füllt sein. Wir werden gleich darauf zu sprechen 
kommen. 


des Bootblocks 
Eintrag 


ID 


Checksum 


Dosblock 


Program 


Bedeutung 

Filesystem-Kennung 
Bootblock-Checksuimne 
Zeiger auf Rootblock (880) 
1012 Bytes Bootprogranun 
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Damit eine Diskette vom Filesystem anerkannt wird, muß nur 
der Eintrag "ID" gesetzt sein. Zur Ausführung eines Sy¬ 
stemstarts von der Diskette aber müssen auch die übrigen Da¬ 
ten vorhanden sein. Die Checksumme spielt in diesem Zusam¬ 
menhang eine wichtige Rolle: Nur wenn sie korrekt ist, kann 
der Systemstart erfolgen, ansonsten wird die Diskette behan¬ 
delt, als wäre nur die ID-Kennung und kein Bootprogramm dar¬ 
auf . 


Die Berechnung der Boot-Checksumme 

Da der Bootblock aus zwei Disk-Blöcken besteht, muß die 

Checksumme auch über beide Blöcke berechnet werden. Das Ver¬ 
fahren sieht folgendermaßen aus: 

1. Lösche das Summen-Langwort und den eventuell vorhandenen 
bisherigen Checksummen-Eintrag. 

2. Addiere ein Langwort des Blocks zum Summen-Langwort. 

3. Wenn es bei der Addition einen Überlauf gegeben hat 
(Abfrage mit dem BCC- oder BCS-Befehl), addiere zusätz¬ 
lich eine 1 zum Summen-Langwort. 

4. Wiederholung der Punkte 2 und 3 für alle Langwörter des 
Bootblocks. 

5. Die Checksumme wird durch NOT-Verknüpfung des Summen- 
Langworts ermittelt. 

Die berechnete Checksumme muß wieder ins entsprechende 

Block-Langwort eingetragen werden. Die Berechnung in As¬ 
sembler könnte so aussehen (Zeiger auf Bootblock in aO): 



clr.l 

do 

; Lösche Summen-Langwort 


clr.l 

4(a0) 

; Lösche alte Checksumme 


move. 1 

a0,al 

; Blockzeiger zur Bearbeitung nach al 


move. w 

#255,dl 

; Bearbeite 256 Langwörter (2 Blöcke) 

ml: 

add.l 

(al)+,d0 

; Nächstes Langwort subtrahieren 


bcc 

m2 

; Wenn kein Überlauf 


addq 

#l,d0 

; Sonst noch eine 1 aufaddieren 

m2: 

dbra 

dl ,ml 

; Schleife 


not.l 

dO 

; dO NOT-verknüpfen 


move. 1 

d0,4(a0) 

; Berechnete Checksumme eintragen 


Bild 12.5: Berechnung der Bootblock-Checksumme 


Anforderungen an das Boot-Programm 

Wenn man ein eigenes Bootprogramm schreiben will, muß man 
zunächst dafür sorgen, daß die drei Verwaltungs-Langwörter 
vor dem eigentlichen Programm stehen. In Assembler sieht das 
so aus: 

dc.l $444f5300 ; DOS-Kennung 

dc.l 0 ; Für spätere Checksumme 

dc.l 880 ; DOS-Rootblock 
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begin: ... ; Hier beginnt das Programm 

Das eigentliche Programm darf keine, sich auf das Programm 
beziehenden, absoluten Adressierungen verwenden. Eine Be¬ 
fehlsfolge wie 

move.l gfxbase,a6 ; Im Bootprogramm FALSCH! 
ist also nicht erlaubt. Statt dessen müßte man schreiben: 

lea gfxbase(pc),a0 ; Lade Adresse PC-relativ 

move.l (a0),a6 ; Inhalt der Adresse nach a6 

Alle Adressierungen, die sich auf das Programm selbst bezie¬ 
hen, müssen also PC-relativ erfolgen. Das liegt daran, daß 
man nicht weiß, an welche Adresse das Bootprogramm vom Sy¬ 
stem geladen wird. Das Programm muß also lageunabhängig 
sein. Gewöhnlich wird dies durch die schon erwähnte Tabelle 
mit allen verwendeten absoluten Adressen, die an das Pro¬ 
gramm (vom Assembler) angehangen wird, erledigt. Für das 
Bootprogramm gibt es aber eine solche Tabelle nicht. Wir 
müssen also selbst für die Lageunabhängigkeit sorgen, und 
das tun wir eben durch die PC-relative Adressierung. 

Des weiteren gibt es gewisse Einschränkungen was die Benutz¬ 
barkeit der Libraries angeht. Eine Benutzung der DOS-Library 
ist im Bootprogramm verboten, da selbige noch nicht initia¬ 
lisiert ist. Auch müssen Sie auf alle Intuition-Routinen, 
die mit Screens, Windows und Dazugehörigem arbeiten, ver¬ 
zichten. Die Routine DisplayAlert können Sie allerdings ein- 
setzen, wenn Sie dies wünschen. Möglich ist die Benutzung 
der Exec- und Graphics-Library, was für die meisten Zwecke 
wohl ausreichen dürfte. 

Eine weitere Einschränkung ergibt sich aus der Größe des 
Bootblocks: Da er nur zwei Diskblöcke umfaßt, von denen drei 
Langworte für die Verwaltung entfallen, darf ein Bootpro¬ 
gramm höchstens 1012 Bytes lang sein, es sei denn, Sie laden 
andere Diskblöcke vom Bootblock aus nach (natürlich "direkt" 
über das Trackdisk-Device, nicht über DOS!). 


Das normale DOS-Bootprogramm 

Wie schon erwähnt, übernimmt das Standard-DOS-Bootprogramm 
Initialisierungsaufgaben. Es ermittelt die Startadresse der 
Resident-Struktur der DOS-Library und gibt diese in aO zu¬ 
rück. Dies wird von der auf ruf enden Systemroutine als Zei¬ 
chen angesehen, daß das DOS einsatzbereit ist, und außerdem 
wird die Resident-Adresse zur Weiterverarbeitung benötigt. 
Was wir Ihnen sagen wollen, ist, daß diese Schritte zum 
Start des Systems unerläßlich sind. Ein Bootprogramm, daß 
"nur" das System starten soll, darf also nicht einfach "RTS" 
heißen, sondern muß die oben genannten Schritte durchführen. 
Damit Sie wissen, wie das ganze in Assembler aussieht, hier 
nun das Standard-DOS-Bootprogramm als Listing: 
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dc.l 

$444f5300 ; 

Filesystem-Kennung 

dc.l 

$c0200f19 ; 

Checksumme 

dc.l 

880 ; 

DOS-Rootblock 

lea 

dosname(pc),al ; 

Name der DOS-Lib 

jsr 

-96(a6) 

Exec-Routine FindResident 

tst.l 

dO ; 

Resident gefunden? 

beq 

m2 ; 

Wenn nein 

move.1 

d0,a0 ; 

Resident-Start nach aO 

move.1 

22(a0),a0 ; 

Zeiger auf Init-Code nach aO 

moveq 

ml: rts 

#0,d0 

do löschen als OK-Zeichen 

m2: moveq 

#255,dO 

255 nach do als Fehler-Zeichen 

bra 

ml 


dosname: 

dc.b "dos.library",0 


dcb.b 974,0 

; Füll-Null-Bytes 


Bild 12.6: Der Standard-DOS-Bootblock 


Die 974 Füll-Nullbytes sind nötig, damit keine zufälligen 
Werte hinter dem Programm folgen. Grundsätzlich wäre es zwar 
egal, wenn nach dem Programm zufällige Bytes im Bootblock 
stünden, aber die hier angegebene Checksumme würde dann 
nicht stimmen. 

Falls Sie also ein Bootprogramm schreiben möchten, das nach 
seiner Beendigung das System wirklich booten läßt, muß die 
obige Befehlsfolge irgendwo im Programm untergebracht werden 
(am besten unmittelbar vor dem Ende, damit die Register 
nicht wieder überschrieben werden). Das System erwartet vom 
Bootprogramm in aO den Init-Code-Zeiger und in do eine 0 als 
OK-Kennzeichen. 

Es wird Sie bestimmt wundern, daß in der zweiten Programm¬ 
zeile die FindResident-Routine einfach so, ohne voriges 
"move.l 4,a6" aufgerufen werden kann. Das ist möglich, da 
das System die Register vor dem Aufruf des Bootprogramms 
teilweise vorbelegt hat. In a6 steht auf diese Weise der 
Zeiger auf die Exec-Basis und in al der Zeiger auf eine 
vollständig initialisierte IO-Reguest-Struktur für das Lauf¬ 
werk DFO:. Das ist im Grunde eine feine Sache, denn so kön¬ 
nen wir ohne große Vorarbeit über das Trackdisk-Device von 
DFO: lesen. 

Als nächstes nun ein Bootblock-Rahmenprogramm, das Sie für 
Ihre Bootprogramme verwenden können. Es enthält alle nötigen 
Vorkehrungen, damit das System nach seiner Beendigung das 
DOS bootet. 
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ml: 


dc.l 

880 

; DOS-Rootblock 

tnovem. 1 

d0-d7/a0-a6,-(sp) ; Alle Register sichern 

bsr 

main 

; Hauptroutine anspringen 

movem.1 

(sp)+,d0-d7/a0- 

-a6 ; Register zurückholen 

lea 

dosname(pc),al 

; DOS-Resident holen (die Fehlerabfrage 

jsr 

-96(a6) 

; können wir uns sparen) 

move.1 

d0,a0 

; Resident-Start nach aO 

move.1 

22(a0),a0 

; Zeiger auf Init-Code nach aO 

moveq 

rts 

#0,d0 

; dO löschen als OK-Zeichen 


dosname: dc.b "dos.library",0 

main: ... ; Hier steht die Hauptroutine 


Bild 12.7: Ein Boot-Rahmenprogramm 


Vor dem Anspringen der Hauptroutine retten wir alle Regi¬ 
ster. Das ist zwar nicht unbedingt nötig, aber sicherer. 
Nach der Hauptroutine werden die Befehle des Standard-DOS- 
Bootblocks ausgeführt, wobei wir uns die Abfrage, ob der 
DOS-Resident vorhanden ist, schenken können (er ist immer 
vorhanden, es sei denn, Ihr ROM ist beschädigt). 

Als Abschluß des Bootblock-Abschnitts stellen wir nun ein 
Beispielprogramm vor. Es handelt sich dabei um eine abgewan¬ 
delte Version des View-Demoprogramms aus dem Graphics-Kapi- 
tel (Zeichnen eines Ellipsen-Musters auf einem eigenen 
View). Die View-Einrichtung ist notwendig, da wir im Boot¬ 
block noch keine Intuition-Screens verwenden können. 

Das Programm erfüllt zwei Funktionen: Es enthält das eigent¬ 
liche Bootprogramm und einen Programmteil, der das Bootpro¬ 
gramm per Trackdisk-Device-Zugriff auf die Diskette bringt 
(wobei vorher die Checksumme berechnet wird). Das komplette 
Programm finden Sie auf der Diskette unter "PRG_12_1.S", wir 
drucken hier die Hauptroutine nicht ab. 


* Programm 12.1 (Auszug): Demonstration eines Bootprogrammes 

* EQUs für Installationsprogramm 


ExecBase = 

4 

FindTask = 

-294 

OpenDevice 

-444 

DoIO 

-456 

CloseDevice = 

-450 


* EQUs für Bootprogramm 
FindResident = -96 
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* Beginn des Installationsprogramms 



move. 1 

ExecBase,a6 



sub. 1 

al,al 

entspricht 'move.l #0,al' 


jsr 

FindTask(a6) 

Task-Adresse ermitteln 


move. 1 

d0,port+16 

In Reply-Port eintragen 


lea 

stdio,al 

Zeiger auf StdIOReq-Struktur 


move. 1 

#port,14(a1) 

Port-Zeiger in Stdio eintragen 


move. 1 

#0,d0 

Unit 0 


clr.l 

dl 

Keine Flags 


lea 

tddname,aO 

Zeiger auf TDD-Name 


jsr 

OpenDevice(a6) 

Trackdisk-Device öffnen 


lea 

bootprg,a0 

Start des Bootprg nach aO 


clr.l 

do 

Checksumme berechnen 


move. 1 

a0,al 



move. w 

#255,dl 


ml: 

add.l 

(al)+,d0 



bcc 

m2 



addq 

#1 ,d0 


m2: 

dbra 

dl,ml 



not.l 

dO 



move.1 

dO,4(aO) 



lea 

stdio,al 

StdIO nach al 


move.w 

#3,28(al) 

Kommando: Write 


move.1 

a0,40(al) 

Adresse: Start Bootprg 


clr.l 

44(al) 

Startblock: 0 


move.1 

#1024,36(al) 

Länge: 2 Blocks (1024 Bytes) 


jsr 

DoIO(a6) 

Kommando ausführen 


move.w 

#4,28(al) 

Kommando: Update 


jsr 

DoIO(a6) 

ausführen 


move.w 

#9,28(al) 

Kommando: Motor 


clr.l 

36(al) 

Ausschalten 


jsr 

DoIO(a6) 

Kommando ausführen 


jsr 

CloseDevice(a6) 

; TDD schließen 


rts 




* Daten für Installation 

stdio: dcb.b 66,0 

port: dcb.b 34,0 

tddname: dc.b "trackdisk.device",0 

even 

section "",code_c ; Lade Programm ins Chip-RAM 
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; (weil das TDD nur auf Chip-RAM 
; zugreifen kann) 


* Das Boot-Programm, entspricht DrawEllipse-Demo, jetzt aber 

* PC-relativ programmiert 


bootprg: 


main: 


dc.l 

$444f5300 

Filesystem-Kennung 

dc.l 

0 

für spätere Checksumme 

dc.l 

880 ; 

DOS-Rootblock 

movem.l 

d0-d7/a0-a6,-(sp) 

; Alle Register sichern 

bsr 

main ; 

Hauptroutine anspringen 

movem.1 

(sp)+,d0-d7/a0-af 

i ; Register zurückholen 

lea 

dosname(pc),al ; 

DOS-Resident holen (die Fehlerabfrage 

jsr 

FindResident(a6) 

; können wir uns sparen) 

move.1 

d0,a0 ; 

Resident-Start nach aO 

move.1 

22(a0),a0 ; 

Zeiger auf Init-Code nach a0 

moveg 

rts 

#0,d0 

dO löschen als OK-Zeichen 

move.1 

4,a6 

Lib öffnen 


filier: dcb.b 1024,0 


; Damit der Rest des Bootblocks 
; mit Nullen gefüllt ist 


Programm 12.1 (Auszug) 

Die Benutzung des Trackdisk-Devices ist ja schon aus dem De¬ 
vice-Kapitel bekannt. Am eigentlichen Programm hat sich, bis 
auf die Tatsache, daß es jetzt PC-relativ programmiert ist, 
nicht viel geändert. Der Bootblock-Kopf für die Rückkehr zum 
DOS ist natürlich dazugekommen.Legen Sie vor dem Start des 
Programms eine (nicht schreibge schützte) Diskette in DFO:. 
Vergewissern Sie sich aber, daß sie keinen wichtigen 
Bootblock enthält (der Workbench-Screen muß beim Laden 
erscheinen). Das Programm schreibt die Ellipsen-Routine in 
den Bootblock. Wenn Sie das System nun von dieser Diskette 
starten, erscheint sofort nach dem Einlegen das Ellipsen- 
Muster am Bildschirm. Ein netter Effekt, nicht wahr? 


12.2 Die Basisstruktur der DOS-Library 

Wie man von dieser Library wohl erwarten kann, finden sich 
in den Einträgen der Basisstruktur Informationen, die sich 
mit Speichermedien, Verzeichnissen usw. beschäftigen. Werfen 
wir einen Blick auf sie: 
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12.2.1 Die DOSLibrary-Struktur 


00 

ds.b 

dl_lib,34 

; Library-Struktur 

34 

dc.l 

*dl Root 

; Zeiger auf Root-Node 

38 

de. 1 

*dl GV 

; Zeiger auf 'Global Vector 

42 

dc.l 

dl A2 

; DOS-interne Register- 

46 

dc.l 

dl A5 

; Zwischenspeicher 

50 

dc.l 

dl A6 


54 


dl SIZEOF 



dllib 

Die schon bekannte Library-Struktur zur Verwaltung der Li¬ 
brary durch Exec. 

*dl_Root 

Ein Zeiger auf eine weitere Struktur, die im Anschluß an 
diese beschrieben wird. 

*dl_GV 

Dieser Zeiger ist nur für BCPL-Programme wichtig und soll 
uns nicht weiter interessieren. 

dl_A2, dl_A5, dl_A6 

Diese Einträge werden vom DOS zur internen Zwischenspeiche¬ 
rung der gleichnamigen Adreßregister verwendet. 


12.2.2 Die RootNode-Struktur 

Der einzige interessante Eintrag in der Basisstruktur ist 
der Zeiger auf die 'RootNode', die wir uns auch sogleich an- 
sehen wollen: 


00 

dc.l 

*rn TaskArray 

BCPL-Zeiger auf 

CLI-Task-Tabelle 

04 

dc.l 

*rn ConsoleSegment 

BCPL-Zeiger auf 

Konsolen-Handler 

08 

ds.b 

rn Time,12 

Systemzeit im DateStamp-Format 

20 

dc.l 

*rn RestartSeg 

BCPL-Zeiger auf 

Disk-Validator 

24 

dc.l 

*rn Info 

BCPL-Zeiger auf 

Dosinfo-Struktur 

28 

32 

dc.l 

*rn FileHandlerSegment 
rn_SIZE0F 

BCPL-Zeiger auf 

File-Handler 


*rn_TaskArray 

Der Zeiger weist auf eine Tabelle bestehend aus Langwörtern. 
Das erste Langwort gibt die Anzahl der folgenden Einträge 
an. Ab dem zweiten Langwort folgen die Zeiger auf die Pro¬ 
zeß-Strukturen der einzelnen CLI-Tasks. 

*rn_ConsoleSegment 

Dieser Zeiger weist auf das Programmsegment für den CLI-Kon- 
solen-Handler (der für die Tastatureingabe und Bildschirm¬ 
ausgabe zuständig ist). 

rn_Time 

Die hier im DateStamp-Format abgelegte Systemzeit wird stän¬ 
dig aktualisiert. 
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*rn_RestartSeg 

Hier wird ein Zeiger auf das Programmsegment für den Disk- 
Validator, der neu eingelegte Disketten auf gültigkeit über¬ 
prüft, eingetragen. 

*rn_Info 

Ein Zeiger auf eine weitere interessante Struktur, Dosinfo, 
die gleich besprochen wird. 

*rn_FileHandlerSegment 

Noch ein Progranunsegment-Zeiger, diesmal für den File-Hand- 
ler, der die Verbindung vom DOS zum Filesystem darstellt. 


Beachten Sie, daß sich die hier verwendeten BCPL-Zeiger 
(siehe Kommentare in der Struktur) von "normalen" Zeigern 
unterscheiden (siehe Abschnitt 4.2.2). 


12.2.3 Die Dosinfo-Struktur 

Die DOS-Basis ist wirklich ganz schon "verzeigert". Nun sind 
wir schon bei der dritten Unterstruktur angekommen, und es 
geht noch weiter. Die Dosinfo-Struktur beinhaltet zur Zeit 
nämlich nur einen interessanten Eintrag: 


00 

dc.l 

*di McName 

; Derzeit nicht benutzt 

04 

dc.l 

*di Devlnfo 

; BCPL-Zeiger auf Device- 

08 

dc.l 

*di Devices 

; Derzeit nicht benutzt 

12 

dc.l 

*di Händlers 

; Derzeit nicht benutzt 

16 

dc.l 

*di NetHand 

; Derzeit nicht benutzt 

20 


di SIZEOF 


*di 

McName, 

*di Devices, 

*di Händlers, *di_NetHand 


Irgendwann war es wohl einmal vorgesehen, den Amiga mit ei¬ 
nem Netzwerk-Betriebssystem auszustatten. Dazu ist es aber 
nicht gekommen, nur diese vier nicht benutzten Einträge der 
Dosinfo-Struktur zeugen von dem Vorhaben. 

*di Devlnfo 

Das Zeigern geht munter weiter. Devlnfo weist auf eine ver¬ 
kettete Strukturliste, in der alle Geräte (Devices), Disket¬ 
ten (Volumes) und zugewiesenen Verzeichnisse (assigned Di- 
rectories) aufgeführt sind. 


12.2.4 Die DevList-Struktur 

Diese Struktur kann drei verschiedene Formen annehmen, je 
nachdem, ob ein Gerät, eine Diskette oder ein Verzeichnis 
mit ihr beschrieben wird. Einige Einträge sind in allen For¬ 
men gleich, einige sind unterschiedlich. 
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Die DevList-Struktur für Devices (DeviceNode) 

Stellt die DevList-Struktur ein Gerät dar, hat sie den Namen 
DeviceNode und folgendes Aussehen: 


00 

de. 1 

*dn Next 

; BCPL-Zeiger auf nächste Struktur 

04 

dc.l 

dn Type 

; Struktur-Typ (bei Devices 0) 

08 

dc.l 

*dn Task 

; Zeiger auf Device-Task 

12 

dc.l 

*dn Lock 

; Für Devices nicht benutzt 

16 

dc.l 

*dn Händler 

; Handler-Dateiname als BCPL-String 

20 

dc.l 

dn StackSize 

; Stack-Größe für neue Tasks 

24 

dc.l 

dn Priority 

; Priorität für neue Tasks 

28 

dc.l 

*dn Startup 

; BCPL-Zeiger auf FileSysStartupMsg 

32 

dc.l 

*dn SegList 

; BCPL-Zeiger auf Händler-Segment 

36 

dc.l 

*dn GlobalVec 

; Zeiger auf globalen Vektor 

40 

dc.l 

*dn Name 

; Name des Devices als BCPL-String 

44 


dn SIZEOF 



*dn_Next 

Die DeviceNode-Strukturen sind zu einer einfach verketteten 
Liste verbunden, d.h. jede Struktur bis auf die letzte ent¬ 
hält einen Zeiger auf die nächste. 

dn_Type 

Gibt den Typ der DevList-Struktur an. Für DeviceNode muß 
hier eine 0 stehen. 

*dn_Task 

Zeiger auf den Task, der das Device bedient. 

*dn_Handler, *dn SegList 

In dn_SegList wird ein Zeiger auf das Programmsegment des 
Device-Handlers eingetragen. Fehlt dieser, so wird der BCPL- 
String dn_Handler als Name der Handlerdatei interpretiert 
und diese eingeladen. 

dn_stacksize, dn_Priority 

Hier werden die Stackgröße und die Priorität der vom Device 
aus neu gestarteten Tasks eingetragen. 

*dn_Startup 

Ein Zeiger auf eine weitere Struktur, genannt FileSysStar- 
tupMsg. Diese wird weiter unten besprochen. 

*dn_GlobalVec 

Nur für BCPL-Programmierer interessant. 

*dn_Name 

Der Name des Devices als BCPL-String, z.B. "DFO:". 


Die DevList-Struktur für Disketten 

Auch alle eingelegten Disketten werden über eine DevList- 
Struktur in die DOS-Base eingebunden. Hier die Struktur: 
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00 

dc.l 

*dl Next 

; BCPL-Zeiger auf nächste Struktur 

04 

dc.l 

dl Type 

; Struktur-Typ (für Disks 2) 

08 

dc.l 

*dl Task 

; BCPL-Zeiger auf Handler-Task 

12 

dc.l 

*dl Lock 

; Für Disks nicht benutzt 

16 

ds.b 

dl VolumeDate,12 

; Erstellungsdatum (DateStamp!) 

28 

dc.l 

*dl LockList 

; BCPL-Zeiger auf Disk-Locks 

32 

dc.l 

dl DiskType 

; Diskettentyp (z.B. $444F5300) 

36 

dc.l 

dl unused 

; Nicht belegt 

40 

dc.l 

*dl Name 

; Diskname als BCPL-String 

44 


dl_SIZE0F 


*dl 

LockList 



Hier findet sich ein Zeiger auf die erste Struktur des er¬ 
sten Locks, das auf die Diskette geholt wurde (über DOS-Rou- 
tinen). 

dl_DiskType 

Dieser Eintrag entspricht dem ersten Langwort im Disk-Boot¬ 
block (Filesystem-Kennung). 


12.2.5 Die FileSysStartupMsg-Struktur 

Diese Struktur, die per Zeiger über die DeviceNode-Struktur 
erreicht werden kann, enthält erstens Informationen, die zum 
öffnen des Devices per Exec-OpenDevice nötig sind. Zweitens 
sind die physikalischen Werte des Devices (Anzahl Tracks, 
Anzahl Sektoren usw.) abgelegt, was z.B. für die Untersu¬ 
chung von Festplatteneinteilungen sehr nützlich ist. 


00 

dc.l 

fssm Unit 

; Exec-Unit-Nummer (für OpenDevice) 

04 

dc.l 

*fssm Device 

; Devicename als BCPL-String 

08 

dc.l 

*fssm Environ 

; BCPL-Zeiger auf Environment-Tab. 

12 

dc.l 

fssm Flags 

; Flags für OpenDevice 

14 


fssm SIZEOF 



Die Environment-Tabelle, auf die der Zeiger fssm_Environ 
weist, ist folgendermaßen aufgebaut ('de' steht für Disk En¬ 
vironment) : 


00 

dc.l 

de TableSize 

; Anzahl Langworte in der Tabelle 

04 

dc.l 

de SizeBlock 

; Größe eines Blocks in Langworten 

08 

dc.l 

de SecOrg 

; Nicht benutzt; muß 0 sein 

12 

dc.l 

de NumHeads 

; Anzahl der Schreib/Lese-Köpfe 

16 

dc.l 

de SecsPerBlk 

; Nicht benutzt, muß 1 sein 

20 

dc.l 

de BlksPerTrack 

; Anzahl Blöcke auf einer Spur 

24 

dc.l 

de ReservedBlks 

; Anzahl Sektoren im Bootblock 

28 

dc.l 

de Prefac 

; Nicht benutzt, Muß 0 sein 

32 

dc.l 

de Interleave 

; Gewöhnlich 0 

36 

dc.l 

de LowCyl 

; Nummer des ersten Zylinders 

40 

dc.l 

de UpperCyl 

; Nummer des letzten Zylinders 

44 

dc.l 

de NumBuffers 

; Anzahl der Speicherpuffer 

48 

dc.l 

de MemBufType 

; Speichertyp für Puffer 

52 


de SIZEOF 
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de_TableSize 

Den ersten Eintrag nicht mitgezählt umfaßt die Tabelle 11 
Langworte. Dies ist der Standardwert, der in der Regel im 
TableSize-Eintrag zu finden ist. 

deSizeBlock 

Der Standardwert ist 128, welcher sich wahrscheinlich auch 
nie ändern wird. 

de_NumHeads 

Diskettenlaufwerke haben zwei Schreib/Lese-Köpfe, bei Fest¬ 
platten z.B. kann der Wert variieren. 

deBlksPerTrack 

Der Standardwert für Disketten ist 11. Abweichungen bei an¬ 
deren Medien sind möglich. 

de ReservedBlks 

BeT den Amiga-Filesystems umfaßt der Bootblock immer 2 Sek¬ 
toren . 

de_Interleave 

Dieser Wert ist nur für Festplatten interessant. 

deLowCyl, de_HighCyl 

Der erste bzw. letzte Zylinder auf dem Speichermedium, der 
für dieses "Gerät" benutzt wird. Bei Disketten gewöhnlich 0 
bzw. 79, z.B. Festplatten können aber partitioniert, d.h. in 
mehrere logische Geräte eingeteilt werden, weshalb die An¬ 
gabe des ersten und letzten Zylinders wichtig ist. 

de_NumBuffers 

Die Anzahl der jeweils 512 Byte umfassenden Speicherpuffer. 
Je größer die Pufferzahl, desto mehr Blöcke können im Spei¬ 
cher zwischengelagert werden. 

de_MemBufType 

Die Wertebelegung für diesen Eintrag entspricht den Spei¬ 
chertyp-Werten bei Aufruf von z.B. AllocMem. MemBufType gibt 
an, welcher Speichertyp für die Puffer des Gerätes nötig 
ist. 


12.3 Programmstart mit der DOS-Library 

Um einen unabhängigen Task zu starten, kennen wir bisher nur 
die AddTask-Funktion der Exec-Library. Doch auch die Dos-Li- 
brary bietet uns die Möglichkeit, einen Task zu starten, und 
zwar mit der CreateProc-Funktion. 
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CreateProc 

= 

-138 (DOS-Library) 


Name 

dl 

< 

Zeiger auf den Namen, den der Prozess 
erhalten soll. 

Pri 

d2 

< 

Priorität, mit der der Prozess ausge¬ 
stattet werden soll. 

segList 

d3 

< 

Zeiger auf die Segment-Liste (LoadSeg) 
des zu startenden Prozesses. 

stacksize 

d4 

< 

Größe des Stackbereichs, der angelegt 
werden soll. 

Erklärung 



Die CreateProc-Funktion legt einen durch 


die angegebenen Parameter bestimmten 
Prozess an. 


Wie man sieht, benötigt die Funktion einen Zeiger auf eine 
Segment-Liste. Diese bekommen wir z.B., wenn ein Programm 
mittels LoadSeg geladen wurde. So könnten wir von unserem 
Programm aus ein zweites Programm einladen (LoadSeg) und mit 
CreatProc in Gang setzen. 

Neben dieser recht "netten" Möglichkeit bietet sich noch et¬ 
was viel besseres an. So können wir z.B. das eigene Programm 
durch CreateProc von dem laufenden CLI-Task abhängen. Dies 
käme einem Aufruf mit RUN gleich. Dabei benutzen wir die 
Section-Anweisung, die das Programm in verschiedene Sectio- 
nen (Segmente) auf teilt. Das hat zur Folge, daß das Pro¬ 
gramm, wenn es mit LoadSeg geladen wurde, nicht in einem ge¬ 
meinsamen Segment, sondern in zwei verschiedenen liegt. 


Start: 

move.1 ExecBase,a6 

Section "",Code ; hier wird das Programm geteilt 

Main: 

move.l ExecBase,a6 


Bild 12.n: Unterteilung eines Programmes mittels SECTION 

Wird dieses Programm in den Speicher geladen, wird es in 
zwei Segmente aufgeteilt, die nur durch einen BCPL-Zeiger 
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NSegPtr 

—> 

NSegPtr 

"Start" 


"Main" 


Verlassen des ersten 
freigegeben wird. 


(Next-Segment-Pointer) verbunden 
sind. Um nun den eigenen Prozess 
zu starten, lesen wir den Zeiger 
auf das zweite Segment aus und 
übergeben ihn an die CreateProc- 
Funktion. Danach müssen wir den 
Zeiger mit Null überschreiben. 
Dies ist notwendig, damit beim 
Segments nicht automatisch das zweite 


Wie man sieht, ist es gar nicht so schwierig. Sollten trotz¬ 
dem noch Probleme auftreten, wird hoffentlich das folgende 
Demonstrationsprogramm helfen. 


* 

* Kapitel 12 

* Demonstrationsprogramm zu CreateProc 

* 


ExecBase = 

4 


CreateProc 

-138 


OpenLib 

= 

-552 


CloseLib = 

-414 


Output 

= 

-60 


Write 

= 

-48 


Delay 

= 

-198 


Close 

= 

-36 


Open 

= 

-30 


Start: 

move.1 

ExecBase,a6 ; 

: Dos-Library öffnen 


lea 

DosName,al 



moveq 

#0,d0 



jsr 

OpenLib(a6) 



move.1 

d0,a6 



beq 

DosError 



move.1 

d0,DosBase 



lea 

Start-4,a0 ; 

: Adresse des Pointer nach aO 


move.1 

(a0),d3 ; 

: BCPL-Zeiger auslesen 


clr.l 

(aO) ; 

; und direkt löschen 


move.1 

#Name,dl l 

nun wird der Prozess gestartet 


move.1 

#-100,d2 

Priorität 


move.1 

#600,d4 

Stack 


jsr 

CreateProc(a6) , 

starten 


jsr 

Output(a6) 

; Ausgabekanal ermitteln 


move.1 

dO,dl 



move.1 

#Text,d2 



move.1 

#TextE-Text,d3 
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jsr 

Write(a6) ; Text ausgeben 

DosError: 

rts 

; Ende 

Text: 

dc.b 10,"Prozess wurde gestartet!",10 

dc.b "In fünf Sekunden erscheint das" 

dc.b " Fenster!",10,10 

TextE: 

even 

DosName:dc.b 

"dos.library",0 
even 


Section 

"",Code 

Main: move.l 

DosBase,a6 

move.1 

#5*50,dl 

jsr 

Delay(a6) 

move.1 

#Window,dl 

move.1 

#1005,d2 

jsr 

Open(a6) 

move.1 

d0,-(a7) 

move.1 

#10*50,dl 

jsr 

Delay(a6) 

move.1 

(a7)+,dl 

jsr 

Close(a6) 

move.1 

ExecBase,a6 

move.1 

DosBase,al 

jsr 

CloseLib(a6) 

rts 



; <<«< Trennung <««< 

; fünf Sekunden warten 

; Zeiger auf Fensterdaten 
; Modus 

; Fenster öffnen 
; zehn Sekunden warten 

; Fenster schließen 

; Dos-Lib schließen 


Name: 

dc.b 


even 

Window: 

dc.b 


even 

DosBase: 

dc.l 


"Test-Prozess",0 

"CON:50/80/540/40/Test-Prozess-Fenster (lOsec)",o 
0 


Programm 12.2: Demonstration CreateProc 


12.3.1 Die Prozess-Struktur 

Noch etwas sollte man zu der Funktion CreateProc erwähnen. 
Sie erstellt nicht nur eine Task-Struktur für das neue Pro¬ 
gramm, sondern eine Process-Struktur. Dies ist eine etwas 
aufgepeppte Variante der Task-Struktur. Sie setzt sich aus 
einer Task- und MessagePort-Struktur und aus noch 16 weite- 
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ren Einträgen zusammen. (BP = BPTR = BCPL-Zeiger = APTR/4 = 
Adresse/4) 

Process-Struktur: 


000 

dc.l 

*tc Succ 

004 

dc.l 

*tc Pred 

008 

dc.b 

tc Type 

009 

dc.b 

tc Pri 

010 

dc.l 

*tc Name 

014 

dc.b 

tc_Flags 

015 

dc.b 

tc State 

016 

dc.b 

tc IDNestCnt 

017 

dc.b 

tc TDNestCnt 

018 

dc.l 

tc SigAlloc 

022 

dc.l 

tc SigWait 

026 

dc.l 

tc SigRecvd 

030 

dc.l 

tc Except 

034 

dc.w 

tc TrapAlloc 

036 

dc.w 

tc TrapAble 

038 

dc.l 

tc ExceptData 

042 

dc.l 

tc ExceptCode 

046 

dc.l 

tc TrapData 

050 

dc.l 

tc TrapCode 

054 

dc.l 

tc SPReg 

058 

dc.l 

tc SPLower 

062 

dc.l 

tc SPUpper 

066 

dc.l 

*tc Switch 

070 

dc.l 

*tc Launch 

074 

dcb.b 

tc MemEntry,14 

088 

dc.l 

tc UserData 

092 

dc.l 

*mp Succ 

096 

dc.l 

*mp Pred 

100 

dc.b 

mp Type 

101 

dc.b 

mp Pri 

102 

dc.l 

*mp Name 

106 

dc.b 

mp Flags 

107 

dc.b 

mp SigBit 

108 

dc.l 

‘mpSigTask 

112 

dcb.b 

mpMsgList,14 

126 

dc.w 

pr Pad 

128 

dc.l 

*pr SegList 

132 

dc.l 

pr StackSize 

136 

dc.l 

pr GlobVec 

140 

dc.l 

pr TaskNum 

144 

dc.l 

pr StackBase 

148 

dc.l 

pr Result2 

152 

dc.l 

*pr CurrentDir 

156 

dc.l 

*pr CIS 

160 

dc.l 

*pr_COS 

164 

dc.l 

*pr ConsoleTask 

168 

dc.l 

*pr FileSystemTask 

172 

dc.l 

*pr_CLI 

176 

dc.l 

*pr RrturnAddr 
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Node-Struktur 


— Task-Struktur 
(pr_Task) 


— MessagePort-Struktur 
(pr_MsgPort) 


Füllwort 

BP Zeiger auf Segmentliste 
Größe des Stacks 
globaler Vektor 
Nummer des CLI-Tasks 
BP obere Grenze des Stacks 
zweiter Rückgabewert 
BP Zeiger auf Lock 
BP Zeiger auf Ausgabe-FileH 
BP Zeiger auf Eingabe-FileH 
Zeiger auf Console-Hd 
Zeiger auf File-System-Task 
BP Zeiger auf CLI-Struktur 
Zeiger auf End-Routine 
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180 dc.l *pr_PktWait ; eigene "Wait"-Routine 

184 dc.l *pr_WindowPtr ; Zeiger auf Fenster 

188 pr_SIZE0F 

prTask 

Da es sich bei einem Process eigentlich um einen Task han¬ 
delt, beinhaltet die Process-Struktur natürlich auch eine 
Task-Struktur. Die Signal-Bits des Tasks sind zum Teil vor¬ 
bestimmt . 


Name 

Bit # 

Bedeutung 

CTRL C 

12 

Ctrl-C gedrückt 

CTRL D 

13 

Ctrl-D gedrückt 

CTRL E 

14 

Ctrl-E gedrückt 

CTRL F 

15 

Ctrl-F gedrückt 


Mit Hilfe der gesetzten Bits kann man sehr einfach die Con¬ 
trol-Kombinationen Ctrl-C, Ctrl-D, Ctrl-E und Ctrl-F über¬ 
prüfen (näheres dazu gleich). 


pr_MsgPort 

In der Process-Struktur ist zusätzlich zu der Task-Struktur 
noch ein Message-Port eingebettet, der von DOS benutzt wird, 
um mit dem Task zu kommunizieren. 


pr_Pad 

Füllwort, um die folgenden Struktur-Daten auf Langwortgrenze 
zu bringen. Dies muß sein, da die Dos-Library, die auf die 
nachfolgenden Einträge zugreifen soll, mit der Programmier¬ 
sprache BCPL erstellt wurde. BCPL kann aber lediglich durch 
vier teilbare Adressen ansprechen (BCPL-Pointer 
Adresse/4). 

*pr_SegList (BCPL-Pointer!) 

Zeiger auf eine BCPL-Tabelle, die die BCPL-Pointer der Seg¬ 
mente enthält. 


*pr_SegList * 4 -> 


Anzahl Zeiger (n) 
BCPL-Pointer auf Segment 1 
BCPL-Pointer auf Segment 2 
BCPL-Pointer auf Segment n 


pr_StackSize 

Größe des Stackbereichs. 

pr_GlobVec 

Globaler Vektor für Prozesse. 
pr_TaskNum 

Nummer des CLI-Tasks, von dem dieser Process aufgerufen wor¬ 
den ist. Handelt es sich nicht um einen vom CLI gestarteten 
Process, ist der Eintrag mit Null initialisiert. 
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prStackBase (BCPL-Pointer!) 

Adresse des oberen Stackbereichs des Tasks. 

pr_Result2 

Der pr_Result2-Eintrag ist dafür vorgesehen, übergabewerte 
von aufgerufenen Funktionen zu bekommen, die als Fehlerer¬ 
kennung eine Null zurückliefern. 

*pr_CurrentDir (BCPL-Pointer!) 

Zeiger auf die Lock-Struktur des aktuellen Verzeichnisses. 
Dieses Verzeichnis wird immer dann benutzt, wenn eine Datei 
geöffnet wird, bei der keine explizite Verzeichnisangabe 
übergeben worden ist. 

*pr_CIS, *pr_COS (BCPL-Pointer!) 

Zeiger auf das FileHandel für die Aus- und Eingabeoperatio¬ 
nen. Diese Einträge sind nur belegt wenn es sich um einen 
Process handelt, der vom CLI gestartet wurde. 

*pr_ConsoleTask 

Zeiger auf den Händler, der für das Console-Fenster zustän¬ 
dig ist. 

*pr_FileSystemTask 

Zeiger auf das Device, welches zur Zeit vom Task benutzt 
wird. 

*pr_CLl (BCPL-Pointer!) 

Zeiger auf eine CommandLinelnterpreter-Struktur (wird gleich 
noch erklärt). Dieser Wert ist initialisiert, wenn der Pro¬ 
zess vom CLI aufgerufen worden ist. Sonst steht hier eine 
Null. 

*pr_ReturnAddr 

Zeiger auf die Rücksprungadresse, die auf dem Stack abgelegt 
ist. 

*pr_PktWait 

Zeiger auf eine Routine, die ausgeführt werden soll, bevor 
der Process auf eine Meldung wartet. Setzt man keinen Zeiger 
ein, wird direkt die Standardroutine aufgerufen. 

*pr_WindowPtr 

Der Eintrag *pr_WindowPtr hat Einfluß auf den Requester, der 
bei einer Fehlermeldung ausgegeben werden soll. 

Wert Erklärung 

-1L (SFFFFFFFF) Es wird kein Requester erstellt (der Task wird 

direkt über den aufgetretenen Fehler infor¬ 
miert) . 

OL ($00000000) Der Requester wird auf der WorkBench erstellt. 

‘Eigenes Fenster Der Requester wird in dem angegebenen Fenster 

erstellt. 
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12.3.2 Die CLI-Struktur 

Nachdem wir die Process-Struktur kennengelernt haben, wollen 
wir uns nun die angesprochene CommandLinelnterface-Struktur 
ansehen. 

CommandLinelnterface-Struktur: 


00 

dc.l 

cli Result2 


Fehlernummer 

04 

dc.l 

*cli SetName 

BP 

aktuelles Direktory 

08 

de. 1 

*cli CommandDir 

BP 

Zeiger auf Coimnand-Lock 

12 

dc.l 

cli ReturnCode 


FAILAT-Wert 

16 

dc.l 

*cli CommandName 

BP 

Name des Befehls 

20 

dc.l 

cli_FailLevel 


Fehlergrenze 

24 

dc.l 

*cli Prompt 

BP 

Zeiger auf Prompt-Text 

28 

dc.l 

*cli Standardinput 

BP 

Standard-Eingabekanal 

32 

dc.l 

*cli Currentinput 

BP 

umgeleitete Eingabe 

36 

dc.l 

*cli ConunandFile 

BP 

Name der Batchdatei 

40 

dc.l 

cli Interactive 


Interactive-Flag 

44 

dc.l 

cli Background 


Background-Flag 

48 

dc.l 

*cli CurrentOutput 

BP 

umgeleitete Ausgabe 

52 

dc.l 

cli Defaultstack 


Default-Stackgröße 

56 

dc.l 

*cli StandardOutPut 

BP 

Standard-Ausgabekanal 

60 

dc.l 

*cli Module 

BP 

Zeiger auf 1. Segment 

64 


cli SIZEOF 




cli_Result2 

Fehlernummer des letzten Fehlers. 

*cli_SetName (BCPL-Pointer!) 

BCPL-Zeiger auf einen BCPL-Strlng mit dem Namen des aktuel¬ 
len Directory. 

Zur Erinnerung des Aufbaus eines BCPL-Strings: 


Länge 


Zeichenkette 


*cli CommandDir (BCPL-Pointer!) 

Zeiger auf eine Lock-Struktur des Verzeichnisses, in dem 
nach dem angegebenem Befehl gesucht werden soll. 

cli_ReturnCode 

Der Entrag cli_ReturnCode enthält den Rückgabewert einer 
Routine, die durch den CLI-Befehl FAILAT überprüft wird. Da¬ 
bei werden folgende Werte unterstützt: 

Name Wert Bedeutung 


RETURN_OK 0 

RETURN_WARN 5 

RETURN_ERROR 10 

RETURN FAILT 20 


kein Fehler 
Warnung 

Fehler aufgetreten 

totaler Fehler bzw. mehrere Fehler 
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*cli_ConnnandName (BCPL-Pointer!) 

BCPL-Zeiger auf einen BCPL-String, der den Namen des aufge¬ 
rufenen Kommandos enthält. 

c1i_Fai1Leve1 

Durch den Wert cli_FailLevel wird festgelegt, durch welchen 
Fehler eine Meldung provoziert wird. 

*cli_Prompt (BCPL-Pointer!) 

BCPL-Zeiger auf einen BCPL-String, der den Prompt-Text ent¬ 
hält. 

*cli_StandardInput (BCPL-Pointer!) 

Zeiger auf den Standard-Eingabekanal, der zur Kommunikation 
benutzt werden soll. 

*cli_CurrentInput (BCPL-Pointer!) 

Sollte der Befehl mit den Eingabe- (<) und Ausgabeumlei¬ 
tungszeichen (>) gestartet worden sein, steht hier der Zei¬ 
ger auf den momentanen Eingabekanal (siehe auch 
cli_CurrentOutput). 

*cli_CommandFile (BCPL-Pointer!) 

Ist der laufende Prozess von einer Batchdatei aufgerufen 
worden, wird hier der BCPL-Zeiger auf eine BCPL-Zeichenkette 
eingetragen, die den Namen der Batchdatei enthält. 

cli_Interactive 

Dieser Eintrag legt fest, ob das CLI interaktiv ist. 

cli_Background 

Auch der cli_Background-Eintrag ist ein Flag. Er gibt an, ob 
der CLI-Prozess im Hintergrund (Background) läuft. 

*cli_CurrentOutput (BCPL-Pointer!) 

Zeiger auf den angegebenen Ausgabekanal, der momentan be¬ 
nutzt wird. 

cli_DefaultStack 

Der Wert von cli_DefaultStack gibt die Pflichtgröße des 
Stacks für den Task an. 

*cli_StandardOutput (BCPL-Pointer!) 

Zeiger auf den Standard-Ausgabekanal, der zur Kommunikation 
benutzt werden soll. 

*cli_Module (BCPL-Pointer!) 

Der Eintrag *cli_Module enthält die, durch vier geteilte An¬ 
fangsadresse des ersten Segments des gerade bearbeiteten 
Prozesses. 


Zum Schluß dieses Kapitels möchte ich nochmals agf die schon 
belegten Signal-Bits für die Control-Kombinationen eingehen. 
Sie werden an unseren Task gesendet, wenn eine der Control- 
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Kombinationen gedrückt worden ist. Wie man sich das zunutze 
machen kann, soll das folgende Programm zeigen: 


* Kapitel 12 

* Demonstrationsprogramm für die CTRL-Überwachung 


ExecBase = 

4 


SetException = 

-312 


OpenLib 

-552 


CloseLib = 

-414 


Output = 

-60 


Write 

-48 


Exit 

-144 


move.1 

ExecBase,a6 


lea 

DosName,al ; 

Dos-Library öffnen 

moveq 

#0,d0 

jsr 

OpenLib(a6) 


move.1 

dO,DosBase 


beq 

DosError 


move.1 

276(a6),a0 ; 

Zeiger auf laufenden Task "holen" 

move.1 

#Exception,42(aO) ; Zeiger auf Exception-Code 


/ 

eintragen 

move.1 

C) 

move.1 

#%1000000000000, 

do ; Exception-Signal setzen (Ctrl 

d0,dl 


jsr 

SetException(a6) 


move.1 

DosBase,a6 ; 

Ausgabekanal ermitteln 

jsr 

Output(a6) 


move.1 

d0,d7 


Loop: move.1 

d7,dl 

#Text,d2 


move.1 


move.1 

#TextE-Text,d3 


jsr 

Write(a6) ; 

Text ausgeben 

btst 

#0,BranchFlag ; 

Branchflag nicht gesetzt, dann 

beq 

Loop ; 

Schleife erneut durchlaufen 

move.1 

ExecBase,a6 


move.1 

DosBase,al 


jsr 

DosError: 

rts 

CloseLib(a6) ; 

Library schließen 


Exception: 
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cmp.l #%1000000000000,d0 ; Wurde die Task-Exception durch 

bne Restart ; das Ctrl-C-Bit ausgelöst ? 

bset #0,BranchFlag ; Ja, dann BranchFlag setzen 

Restart:rts 


BranchFlag: 
DosBase: 
DosName: 

dc.w 

0 

dc.l 

dc.b 

0 

"dos.library",0 

Text: 

even 

dc.b 

"Bitte Ctrl-C drücken!",10 

TextE: 

even 




Programm 12.3: Überwachung der CTRL-Tastenkombinationen 


12.4 Kommunikation auf Dos-Ebene 

Die Kommunikation auf Dos-Ebene ist eigentlich nur eine Spe¬ 
zialisierung des Message-Systems von Exec. So besteht das 
StandardPacket aus einer Message-Struktur und der DosPacket- 
Struktur. 

StandardPacket-Struktur: 

00 ds.b sp_Msg,20 ; Message-Struktur 

20 ds.b sp_Pkt,48 ; DosPacket-Struktur 

68 sp_SIZE0F 

sp Msg 

Bei dieser Struktur handelt es sich um eine normale Exec- 
Message-Struktur, die die Grundlage für den Umgang mit den 
DosPackets bildet. Dabei wird jedoch der Eintrag mn_Name 
nicht als Zeiger auf eine Zeichenkette verstanden, sondern 
als Zeiger auf die DosPacket-Struktur, die mit ihr versendet 
werden soll. 

spPkt 

Die zweite Struktur ist eine DosPacket-Struktur, deren Ein¬ 
träge gleich näher beschrieben werden. 


Wie man sieht, besteht ein StandardPacket aus einer Message- 
Struktur, mit der die DosPacket-Struktur verschickt werden 
soll. In dieser DosPacket-Struktur ist das Kommando, sowie 
die Parameter abgelegt. 


DosPacket-Struktur: 

00 dc.l *dp_Link ; Zeiger auf die Message-Struktur 

04 dc.l *dp_Port ; Zeiger auf ReplyPort 
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08 dc.l 

12 dc.l 

16 dc.l 

20 dc.l 

24 dc.l 

28 dc.l 

32 dc.l 

36 dc.l 

40 dc.l 

44 dc.l 

48 

*dp_Link 

In dp_Link ist die Adresse der Message-Struktur abgelegt, 
mit der die DosPacket-Struktur gesendet werden soll. 

*dpPort 

Der in dp_Port abgelegte Wert zeigt auf den ReplyPort, der 
benutzt werden soll. 

dp Type /dp Action 

Durch den Wert im Eintrag dp_Type (auch dp_Action genannt) 
wird der Befehl festgelegt, der ausgeführt werden soll. Da¬ 
bei stehen folgende Befehle zur Verfügung. 


Name Wert Bedeutung 

ACTION_NIL 0 keine Aktion 

ACTION_GET_BLOCK 2 Block von Diskette laden 

ACTION_S ET_MAP 4 SetMap 

ACTION_DIE 5 Die 

ACTION_EVENT 6 Event 

ACTION_CURRENT_VOLUME 7 CurrentVolume 

ACTION_LOCATE_OBJECT 8 LocateObject 

dp_Argl = Lock (BPTR) 
dp_Arg2 = Name (BSTR) 
dp_Arg3 = Modus 
dp_Resl = Lock (BPTR) 
ACTION_RENAME_DISK 9 RenameDisk 

dp_Argl = NewName (BPTR) 
dp Resl = TURE/FALSE 
ACTION_WRITE 'W' Wrlte 

dp_Argl = FileHandle (BPTR) 
dp_Arg2 = Buffer 
dp_Arg3 = Length 
dp_Resl = TRUE/FALSE 
ACT I ON_R E AD ' R' Read 

dp_Argl = FileHandle (BPTR) 
dp_Arg2 = Buffer 
dp_Arg3 = Length 
dpResl = TRUE/FALSE 
ACT I ON_FREE_LOCK 15 FreeLock 

dp_Argl = Lock (BPTR) 
dp_Resl = TRUE/FALSE 


dp_Type/dp_Action ; Kommando 

dp_Resl/dp_Status ;-i Rückgabewerte 

dp_Res2/dp_Status2 

dp_Argl/dp_BufAddr 

dp_Arg2 ; 

dp_Arg3 ; Argumente 

dp_Arg4 ; 

dp_Arg5 ; 

dp_Arg6 ; 

dp_Arg7 

dp SIZEOF 
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ACTION_DELETE_OBJECT 

16 

DeleteObject 

ACTION_RENAME_OBJECT 

17 

dp_Argl = Lock (BPTR) 
dp Arg2 = Name (BSTR) 
dp Resl = TRUE/FALSE 
RenameObject 

ACTION MORE CACHE 

18 

dp Argl = FromLock (BPTR) 
dp Arg2 = FromName (BSTR) 
dp Arg3 = ToLock (BPTR) 
dp Arg4 = ToName (BSTR) 
dp_Resl = TURE/FALSE 

MoreCache 

ACTION COPY DIR 

19 

CopyDir 

ACTION WAIT_CHAR 

20 

dp Argl = Lock (BPTR) 
dp Resl = Lock (BPTR) 

WaltChar 

ACTION SET PROTECT 

21 

dp Argl = Timeout 
dp Resl = TRUE/FALSE 

SetProtect 

ACTION CREATE_DIR 

22 

dp Arg2 = Lock (BPTR) 
dp Arg3 = Name (BSTR) 
dp Arg4 = Maske 
dp Resl = TRUE/FALSE 

CreateDir 

ACTION EXAMINE_OBJECT 

23 

dp Argl = Lock (BPTR) 
dp Arg2 = Name (BSTR) 
dp REsl = Lock (BPTR) 

Examine 

ACTION_EXAMINE_NEXT 

24 

dp_Argl = Lock (BPTR) 

dp Arg2 = FilelnfoBlock (BPTR) 

dp_Resl = TRUE/FALSE 

ExNext 

ACTION_DISK_INFO 

25 

dp Argl = Lock (BPTR) 

dp Arg2 = FilelnfoBlock (BPTR) 

dp Resl = TRUE/FALSE 

Diskinfo 

ACTION INFO 

26 

dp Argl = InfoData (BPTR) 

Info 

ACTION FLUSH 

27 

Flush 

ACTION_SET_COMMENT 

28 

SetComment 

ACTION_PARENT 

29 

dp Arg2 = Lock (BPTR) 
dp Arg3 = Name (BSTR) 
dp Arg4 = Comment (BSTR) 
dp_Resl = TRUE/FALSE 

Parent 

ACTION TIMER 

30 

dp Argl = Lock (BPTR) 
dp Resl = ParentLock 

Timer 

ACTION_INHIBIT 

31 

Inhibit 

ACTION DISK TYPE 

32 

dp Argl = TRUE/FALSE 
dp Resl = TRUE/FALSE 

DiskType 

ACTION DISK CHANGE 

33 

Diskchange 

ACTION SET DATE 

34 

SetDate 

ACTION SCREEN MODE 

994 

ScreenMode 

ACTION READ RETURN 

1001 

ReadReturn 

ACTION WRITE RETURN 

1002 

WriteReturn 
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ACTION_SEEK 1008 

ACTION_FINDUPDATE 1004 

ACTION_FINDINPUT 1005 

ACTI0N_FINDOUTPUT 1006 

ACTION_END 1007 

ACTIONJTRUNCATE 1022 

ACTION WRITE PROTECT 1023 


Seek 

dp_Argl = FileHandle (BPTR) 

dp_Arg2 = new rel. Position 

dp_Arg3 = Modus 

dp_Resl = old Position 

FileUpDate 

OpenOldFile 

dp_Argl = FileHandle (BPTR) 
dpArg2 = Lock (BPTR) 
dp_Arg3 = Name (BSTR) 
dp_Resl = TRUE/FALSE 
OpenNewFile 

dp_Argl = FileHandle (BPTR) 
dp_Arg2 = Lock (BPTR) 
dp_Arg3 = Name (BSTR) 
dpResl = TRUE/FALSE 
Close 

dp_Argl = FileHandle (BPTR) 
FFS only 
FFS only 


dp_Resl/dp_Status, dp_Res2/dp_Status2, 

Diese beiden Einträge enthalten, nachdem das "Packet" 
zurückgekonunen ist, die Rückgabewerte. 

dpAr g 1 /dp BufAddr, dp_Arg2, dpArg3, dp Arg4, dp Arg5, dp Arg6, dp_Arg7 

Die Einträge dp Arg[1..7] müssen, bevor das "Packet" abge¬ 
schickt wird, mit den Ubergabewerten belegt werden, die je 
nach Kommando unterschiedlich ausfallen können. 


12.5 Parameterübergabe vom CLI 

Ist ein Programm vom CLI aufgerufen worden, so erhält es 
nicht nur die Länge und die Adresse der übergebenen Parame¬ 
terzeichenkette, sondern noch weitere Werte in den Adreßre¬ 
gistern 1 bis 6. 


a0 Zeiger auf die übergebene Zeichenkette 

al Adresse des Stacks 

a2 Zeiger auf Dispatcher-Tabelle 

a3 Größe des Stackbereichs 

a4 Adresse des Programms 

a5 Adresse der Dos-Dispatcher-Routine 

a6 Rücksprungadresse 

do Anzahl der übergebenen Zeichen 


653 






Kapitel 12 


12.6 Parameterübergabe von der WorkBench 

Nachdem wir uns mit der relativ einfachen Parameterübergabe 
bei CLI-Programmen beschäftigt haben, stellt sich die Frage, 
wie dies beim Aufruf durch ein Icon realisiert wird. Dabei 
benutzt man den, in der Process-Struktur eingerichteten Mes¬ 
sage-Port, an den uns die WorkBench eine Nachricht schickt. 
Diese Nachricht können wir, wie üblich, mit den Befehl 
GetMsg empfangen und dann auswerten. 

Dabei erhält man eine Nachricht folgender Struktur: 

WBStartup-Struktur: 


00 

ds.b 

sm Message,20 

; Message-Struktur 

20 

dc.l 

*sm Preocess 

; Zeiger auf Process-Descriptor 

24 

dc.l 

*sm Segment 

; Zeiger auf Segment-Descriptor 

28 

dc.l 

sm NumArgs 

; Anzahl der Elemente der ArgList 

32 

dc.l 

*sm Toolwindow 

; Zeiger auf Fenster-Descriptor 

36 

40 

dc.l 

*sm ArgList 
sm SIZEOF 

; Zeiger auf Argumentenliste 


Die Adresse, die im sm_ArgList-Eintrag abgespeichert worden 
ist, zeigt auf eine WBArg-Struktur, in der die eigentlichen 
Parameter abgelegt werden. Diese Parameter bestehen nicht 
aus einer Zeichenkette, sondern aus einem Zeiger auf die 
Lock-Struktur des zusätzlich aktivierten Icons (Shift+LMB) 
und dessen Namen. 

WBArg-Struktur: 

00 dc.l *wa_Lock ; Zeiger auf Lock 

04 dc.l *wa_Name ; Zeiger auf Namen 

08 wa SIZEOF 


12.7 Aufbau der ".info"-Datei 

Die ".info"-Dateien kennen wir ja schon aus dem vorangegan¬ 
genen Kapitel. Sie enthalten die Grafikdaten für das Icon, 
welches für eine bestimmte Datei erscheinen soll. Man kann 
sie mittels eines Icon-Editors anlegen oder sie mit einem 
kleinen Hilfsprogramm selbst zusammenbasteln. Dazu müssen 
wir uns zunächst den Aufbau einer solchen Datei ansehen. 


12.7.1 Die DiskObj ect-Struktur 

Jede ".info"-Datei fängt mit einer DiskObject-Struktur an: 
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Diskobj ect-Struktur: 


00 

dc.w 

do Magic 

02 

dc.w 

do Version 

04 

dc.l 

*gg NextGadget 

08 

dc.w 

gg LeftEdge 

10 

dc.w 

gg TopEdge 

12 

dc.w 

gg Width 

14 

dc.w 

gg Height 

16 

dc.w 

gg Flags 

18 

dc.w 

gg Activation 

20 

dc.w 

gg GadgetType 

22 

dc.l 

*gg GadgetRender 

26 

dc.l 

*gg SelectRender 

30 

dc.l 

*gg GadgetText 

34 

dc.l 

gg MutualExclude 

38 

dc.l 

*gg Speciallnfo 

42 

dc.w 

gg GadgetID 

44 

dc.l 

gg User 

48 

dc.w 

do Type 

50 

dc.l 

do DefaultTool 

54 

dc.l 

*do ToolTypes 

58 

dc.l 

do CurrentX 

62 

dc.l 

do CurrentY 

66 

dc.l 

*do DrawerData 

70 

dc.l 

do ToolWindow 

74 

dc.l 

do StackSize 

78 


do SIZEOF 


; Erkennungsmarke 
; Version 


Gadget-Struktur 


Diskobject Typ 
Standard-Tool 

Zeiger auf ToolTypes Einträge 

X-Position 

Y-Position 

Zeiger auf DrawerData-Struktur 
Fenster (Tool) 

Größe des Stackbereichs (Tool) 


do_Magic 

Die ".info"-Dateien müssen mit einem Erkennungswort begin 
nen. 


WBDISK_MAGIC = $e310 

doVersion 

Versionsnummer 

doGadget 

Gadget-Struktur, die benutzt wird, um das Icon zu beschrei¬ 
ben. Dabei werden nicht alle Einträge berücksichtigt. 

do_Type 

Angabe des Typs der ".info"-Datei. Folgende Typen stehen zur 
Auswahl: 

Name Wert Bedeutung 


WBDISK 1 
WBDRAWER 2 
WBTOOL 3 
WBPROJECT 4 
WBGARBAGE 5 


Disketten-Icon 

Unterverzeichnis-Icon 

Tool-Icon 

Project-Icon 

Trashcan-Icon 
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do DefaultTool 

Zeiger auf Standard-Tool. 

*do ToolTypes 

Zeiger auf Tool-Types Einträge. Bei den Tool-Types-Einträgen 
handelt es sich um Zeichenketten, die nähere Informationen 
über das Programm geben können. Die Einträge der Tools wer¬ 
den wie folgt abgelegt. 


dc.l 4 * (AnzahlEinträge + 1) 
de.1 Länge_der_Zeichenkette 
dc.b "Text..",0 
de.1 Länge der_Zeichenkette 
dc.b "Text..",0 

do_CurrentX, do_CurrentY 

Momentane X- und Y-Position des Icons. Dabei gibt $80000000 
an, daß dem Icon noch keine Position zugewiesen ist. 

*do DrawerData 

Zeiger auf DrawerData-Struktur, die benutzt wird, wenn es 
sich um Unterverzeichnisse handelt. 


do ToolWindow 

Zeiger auf Standard-Fenster (nur bei Tools). 
doStackSize 

Größe des Stackbereichs, der verwendet wird (nur bei Tools). 

12.7.2 Die DrawerData-Struktur 


Sollte es sich um eine " .info"-Datei des Typs "Drawer" han¬ 
deln, so wird der Eintrag do_DrawerData mit einem Zeiger auf 
folgende Struktur versehen: 

DrawerData-Struktur: 


00 

dc.w 

nw LeftEdge 

1 ' 

02 

dc.w 

nw TopEdge 

/ 

04 

dc.w 

nw Width 

/ 

06 

dc.w 

nw Height 

f 

08 

dc.b 

nw DetailPen 

/ 

09 

dc.b 

nw BlockPen 

; 

10 

dc.l 

nw IDCMPFlags 

/ 

14 

dc.l 

nw Flag 

/ 

18 

dc.l 

nw FirstGadget 

/ 

22 

dc.l 

nw CheckMark 

i 

26 

dc.l 

nw Title 

t 

30 

dc.l 

nw Screen 

; 

34 

dc.l 

nw BitMap 

/ 

38 

dc.w 

nw MinWidth 

/ 

40 

dc.w 

nw MinHeight 

i 

42 

dc.w 

nw MaxWidth 

r 

44 

dc.w 

nw MaxHeight 

t 

46 

dc.w 

nw Type 

t 
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48 dc.l dd_CurrentX ; X-Koordinate 

52 dc.l dd_CurrentY ; Y-Koordinate 

56 dd_SIZEOF 

dd_NewWindow 

Die DrawerData-Struktur besteht zum größten Teil aus einer 
NewWindow-Struktur, die das zu öffnende Fenster für das Un¬ 
terverzeichnis beschreibt. 

ddCurrentX, dd CurrentY 

Momentane Position des Unterverzeichnisfensters. 


12.7.3 Demonstrationsprograinin 

Um nun eine ".info"-Datei zu erstellen, benötigen wir ein 
kleines Hilfsprogramm, welches die Daten direkt (ohne 
"Hunk"-Kennungen) speichert: 


* 

* Kapitel 12 

* Demonstrationsprogramm zum Anlegen einer ".info"-Datei 

* 


ExecBase = 

4 


Open 

-30 


Close 

-36 


Write = 

-48 


OpenLib = 

-552 


CloseLib = 

-414 


move.1 

ExecBase,a6 

; Dos-Library öffnen 

lea 

DosName,al 


moveg 

#0,d0 


jsr 

OpenLib(a6) 


move.1 

dO,DosBase 


move.1 

d0,a6 


move.1 

#Name,dl 


move.1 

#1006,d2 


jsr 

0pen(a6) 

; Datei öffnen 

move.1 

dO,Handle 


move.1 

Handle,dl 


move.1 

#Data,d2 


move.1 

#DEnd-Data,d3 


jsr 

Write(a6) 

; Daten speichern 

move.1 
jsr 

Handle,dl 
Close(a6) 

; Datei schließen 

move.1 

DosBase,al 


move. 1 

ExecBase,a6 


jsr 

CloseLib(a6) 

; Dos-Library schließen 
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rts 


* Datenbereich 


DosName: 

dc.b 


even 

Name: 

dc.b 


even 

DosBase: 

de. 1 

Handle: 

de. 1 


"dos.library",0 

"ram:test.info'',0 

0 

0 


Data: 

DEnd: 


Daten der ".info"-Datei 


Programm 12.4: Icon-Erstellung, Programm-Teil 


Als nächstes müssen wir uns die Daten ansehen. Wir gehen da¬ 
von aus, daß wir eine info"-Datei für das Unterverzeichnis 
"ram:test" erstellen wollen. Wichtig ist dabei, daß wir ge¬ 
nau auf die Reihenfolge, DiskObject-Struktur, DrawerData- 
Struktur, Image-Struktur, Image-Data und ToolTypes-Einträge, 
achten. 


dc.w 

$e310 

Erkennungsmarke 

dc.w 

1 

Versionsnummer 

dc.l 

0 

gg NextGadget (unwichtig) 

dc.w 

0 

gg LeftEdge 

dc.w 

0 

gg TopEdge 

dc.w 

128 

gg Width 

dc.w 

60 

gg Height 

dc.w 

6 

gg Flags 

dc.w 

3 

gg Activation 

dc.w 

1 

gg GadgetType 

dc.l 

IDatal 

gg GadgetRender (1.Image) 

dc.l 

IData2 

gg SelectRender (2.Image) 

dc.l 

0 

gg GadgetText (unwichtig) 

dc.l 

0 

gg MutualExclude (unw.) 

dc.l 

0 

gg Speciallnfo (unwichtig) 

dc.w 

0 

gg GadgetID (unwichtig) 

dc.l 

0 

gg User (unwichtig) 

dc.w 

$200 

do Type = Drawer 

dc.l 

0 

do DefaultTool 

dc.l 

TTData 

do ToolTypes 

dc.l 

$80000000 

do CurrentX, do CurrentY 

dc.l 

$80000000 

(nicht bestimmt) 

dc.l 

DrawerData 

do DrawerData 

dc.l 

0 

do ToolWindow 

dc.l 

0 

do StackSize 
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DrawerData: 


; dd NewWindow 



dc.w 

0,0 ; 

nw LeftEdge/TopEdge 


dc.w 

240,200 

nw Width/Height 


dc.b 

0,0 ; 

1 


dc.l 

0,0,0,0,0,0,0,0 

; | unwichtig 


dc.w 

0,0,0,0,0 ; 

1 


dc.l 

0 

J 

IDatal: 

dc.w 

0,0 ; 

ig LeftEdge/TopEdge 


dc.w 

128,60 

ig Width/Height 


dc.w 

2 ; 

ig Depth 


dc.l 

ImageDatal ; 

ig ImageData 


dc.b 

%U,0 ; 

ig PlanePick/PlaneOnOff 


dc.l 

o 

ig HextImage 

ImageDatal: 

incbin 

PrgDisk:Kapitel_ 

12/ImageDatal.BM 



/ 

Image-Data einladen 

IData2: 

dc.w 

0,0 

ig LeftEdge/TopEdge 


dc.w 

128,60 

ig Width/Height 


dc.w 

2 

ig Depth 


dc.l 

ImageData2 

ig ImageData 


dc.b 

%11,0 

ig PlanePick/PlaneOnOff 


dc.l 

0 

ig NextGadget 

ImageData2: 

incbin 

PrgDisk:Kapitel_ 

12/ImgaData2.BM 



! 

Image-Data einladen 

TTData: 






dc.l 

4*3 ; (AnzahlEinträge + 1) * 4 


dc.l 

TTDatalE-TTDatal 




; Länge 

des Eintrags in Bytes 

TTDatal: 

dc.b 

"ToolTypes 1",0 


TTDatalE: 

dc.l 

TTData2E-TTData2 ; 




; Länge 

des Eintrags in Bytes 

TTData2: 

dc.b 

"ToolTypes 2",0 


TTData2E: 




DEnd: 





Programm 12.4: Icon-Erstellung, Daten-Teil 
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12.7 Aufbau einer "executable"-Datei 

Nachdem wir uns von Anfang an damit beschäftigt haben, ei¬ 
gene Programme zu schreiben, ist es jetzt an der Zeit, uns 
anzusehen, wie diese Programme in Dateien abgelegt werden. 
Dazu gehen wir am besten von einem konkreten Beispiel aus. 

Stellen wir uns vor, wir würden das folgende Programm assem- 
blieren: 


move.l #$4790,Data 
jmp Ende 

Data: de.1 0 

Ende: rts 


Bild 12.n: Ein Test-Programm 


Dabei hat uns Exec den Speicherbereich ab der Adresse $40000 
zur Verfügung gestellt. Nach dem Assemblieren enthält dann 
der Speicherbereich $40000-$40014 folgende Daten: 

Adresse OpCode ; Programm 


$40000 $23FC $0000 $4790 $0004 $0010 ; move.l#$4790,Data 

$4000A $4EF9 $0004 $0014 ; jmp Ende 

$40010 $0000 $0000 ; Data: 

$40014 $4E75 ; Ende: RTS 


Wie man sieht, werden die absoluten Adressen für den Move- 
Befehl als auch für den Jump-Befehl direkt gespeichert. 
Würde man diesen Bereich nun in einer Datei ablegen und zu 
einem späteren Zeitpunkt wieder laden, könnte es sein, daß 
wir einen anderen Speicherbereich von Exec zugewiesen bekom¬ 
men. Gehen wir davon aus, wir bekommen den Bereich von 
$50000-$50014. 

Adresse OpCode ; Programm 


$50000 $23FC $0000 $4790 $0004 $0010 ; move.l #$4790,Data 

$5000A $4EF9 $0004 $0014 ; jmp Ende 

$50010 $0000 $0000 ; Data: 

$50014 $4E75 ; Ende: RTS 


Wenn man das Programm jetzt abarbeitet, wird es mit hoher 
Wahrscheinlichkeit zu einem Absturz kommen. Dies liegt darin 
begründet, daß die absoluten Adressen nicht an die neue An¬ 
fangsadresse angepaßt worden sind. So würde der Jump-Befehl 
z.B. nach $40014 und nicht nach $50014 verzweigen. 
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Dieses Problem kann bei Monotasking-Betriebssystemen nicht 
auftreten, da die Programme immer an die gleiche Stelle ge¬ 
laden werden. Beim Amiga hingegen kann es sein, daß der 
Speicherbereich schon von einem anderen Programm oder ande¬ 
ren Daten belegt worden ist. 

AmigaDos löst diesen Konflikt, indem die absoluten Adressen 
nach dem Laden an die neue Position angepaßt (relokiert) 
werden. Es werden dabei nicht die absoluten Adressen, 
sondern die relativen Offsets zum Anfang des Segments 
abgespeichert. Außerdem werden die Positionen der absoluten 
Adressen, die später wieder angepaßt werden sollen, in einer 
Offsettabelle abgelegt. Bei unserem Beispielprogramm sähe 
das wie folgt aus: 

Adresse OpCode ; Programm 


$50000 $23FC $0000 $4790 $0000 $0010 

$5000A $4EF9 $0000 $0014 

$50010 $0000 $0000 

$50014 $4E75 


; move.l #$4790,Data 
; jmp Ende 
; Data: 

; Ende: RTS 


Offsettabelle: 

de. 1 6 

dc.l 12 


Nachdem das Programm geladen worden ist, wird die Anfangs¬ 
adresse des Segments ($50000) zu den Offsetwerten addiert, 
die an Stelle der absoluten Adressen stehen. Dabei benutzt 
man die in der Offsettabelle abgelegten Werte, um an die an¬ 
zupassende Stelle zu gelangen. 

Neben der angesprochenen Offsettabelle werden natürlich noch 
weitere Daten abgelegt. Alle diese Datenteile haben einen 
eigenen Zahlenwert, mit dem man sie erkennen kann: 


Name 


Dec /Hex 


Bedeutung 


hunk 

unit 

999 /$03e7 

Beginn einer Programmeinheit 

hunk' 

name 

1000/$03e8 

Namenskennung 


hunk' 

code 

1001/$03e9 

Kennung für ein Programmteil 

hunk' 

data 

1002/$03ea 

Kennung für ein Datenteil 

hunk' 

'bss 

1003/$03eb 

Kennung des BSS-Teils 

hunk 

reloc32 

1004/$03ec 

Relokationstabelle 

(32-Bit) 

hunk 

relocl6 

1005/$03ed 

Relokationstabelle 

(16-Bit) 

hunk 

reloc8 

l006/$03ee 

Relokationstabelle 

(08-Bit) 

hunk 

'ext 

1007/$03ef 

Externe Referenzen 


hunk' 

'symbol 

1008/$03f0 

Symbolteil 


hunk' 

'debug 

1009/$03f1 

Debuginformationen 


hunk' 

end 

1010/$03f2 

Ende-Kennung 


hunk 

header 

1011/$03f3 

Anfangs-Kennung 


hunk' 

overlay 

1013/$03f5 

Overlayblock 


hunk' 

break 

1014/$03f6 

Overlay-Endkennung 
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Folgende Abkürzungen werden verwendet: 
LdNiL Länge des Namens in Langworten 

LdCiL Länge des Codes in Langworten 

LdDiL Länge der Daten in Langworten 


Eine ausführbare Datei muß immer folgenden Aufbau vorweisen: 


hunk header 


weitere Hunks 


hunk end 


r 


Anfangskennung 


Hier können alle 
weiteren Hunks 
untergebracht werden 


Endkennung 


hunkunit 999/$3e7 

Durch die hunk_unit-Kennung wird ein Programm-Teil eingelei¬ 
tet. Nach der Kennung folgt die Länge des Namens in Langwor¬ 
ten und die Namensdaten selbst. 


hunk unit 

LdNiL 

Name 





hunkname 1000/$3e8 

Der Name eines Hunks wird durch die Kennung hunk_name einge¬ 
leitet . 


hunk name 

LdNiL 

Name 





hunk_code 1001/$3e9 

Der Hunk mit der Kennung hunk_code enthält Programmcode. Da¬ 
bei wird nach der Kennung die Länge des Codes in Langworten 
erwartet. 


hunk code 

LdCiL 

Code 





hunkdata 1002/$3ea 

Vergleichbar mit hunk_code findet man bei hunk data Daten 
mit bestimmten Werten (dc.x). 
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hunk data 

LdDiL 

Daten 





Auch ein Datenblock kann adreßabhängige Daten enthalten und 
deshalb auch mittels eines Relokationshunks angepaßt werden. 


hunk_bss 1003/$3eb 

Durch hunkbss wird ein Hunk definiert, der nur aus zwei 
Langworten besteht. Nach der Kennung folgt die Größe des 
Blocks in Langworten, der für Daten zur Verfügung gestellt 
werden soll (ds.x). 


hunk bss 


Größe 


hunk_reloc32, hunk relocl6, hunk_reloc8 l004-l006/$3ec-$3ee 

Durch diese drei Kennungen werden Hunks eingeleitet, die Da¬ 
ten zur Relokation enthalten. Diese Daten beziehen sich auf 
den davor liegenden Hunk. Nach der Kennung einer der Reloka- 
tions-Hunks schließt sich die Länge der Offsetwerte an, die 
relokiert werden müssen. Außerdem folgt die Hunknummer, 
dessen Basisadresse dazu addiert werden soll, und die 
Offsets selbst. Dann kann sich wiederum ein Offsettabelle 
oder ein Null als Endkennung anschließen. 


hunk relocX 


Länge 

Hunknr. 

Offsets 


Länge 

Hunknr. 

Offsets 


Länge = 0 


hunkext l007/$3ef 

Mit der Kennung hunk_ext wird ein Symbol-Hunk eingeleitet. 
Er besteht aus weiteren Symbol-Data-Units, wobei der Hunk 
letztlich durch ein Null-Langwort abgeschlossen wird. 


hunk ext 

SymbDatUnit 

SymbDatünit 

Ende = 0 


Jede dieser Symbol-Data-Units fängt wiederum mit einer Ken¬ 
nung an, welcher die Daten der Unit folgen. 
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Name: Wert: Bedeutung: 


ext symb 

000 

wird nur bei hunk symb benutzt 

ext_def 

001 

Definitionen (relokiert) 

ext abs 

002 

Definitionen (absolut) 

ext res 

003 

Definitionen residenter Libraries 

ext ref32 

129 

32-Bit Bezug auf Symbol 

ext refl6 

131 

16-Bit Bezug auf Symbol 

ext ref8 

132 

8-Bit Bezug auf Symbol 

ext common 

130 

32-Bit Bezug auf allgemeinen Block 


hunksymbol l008/$3f0 

Der symbol-Hunk hat grundsätzlich den gleichen Aufbau wie 
der ext-Hunk. Nach der Kennung folgen Symbol-Data-Units, die 
durch eine OL abgeschlossen werden. Der Unterschied besteht 
darin, daß dieser Hunk lediglich von Debuggern und nicht, 
wie hunk_ext, vom Linker benutzt wird. 


hunk_debug 1009/$3fl 

In diesem Hunk können Daten abgelegt werden, die vom Debug¬ 
ger benutzt werden können. Dabei ist der Aufbau dieser Daten 
völlig frei. Lediglich die Länge des Hunks muß angegeben 
werden. 


hunkdebug 


Länge 


Debugdaten 


hunkend 1010/$3f2 

Diese Kennung, die nur aus einem Langwort besteht, beendet 
das Programm. 


hunk end 


hunkheader I011/$3f3 

Durch die Kennung hunk_header wird der Anfang einer ausführ¬ 
baren Datei gekennzeichnet. Nach der Kennung folgt ein Lang¬ 
wort, welches die Länge des nachfolgenden Namens in Langwor¬ 
ten enthält, danach folgt der Name selbst. Nachdem die Na¬ 
menskette mit Null abgeschlossen worden ist, schließt sich 
zunächst ein Langwort mit der Anzahl der Hunks an. Diesem 
Langwort folgt die Nummer des zuerst und zuletzt zu ladenden 
Hunks, sowie die Längenangaben aller Hunks. 


hunk_debug 


LdNiL 


Name 


LdNiL 


Name 


LdNiL = 0 
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Anz.Hunks 

erster Hunk 

letzter H. 

L.d.Hunks 


Anz.Hunks 

L.d.Hunks 


Anzahl aller Hunks + 1 
Länge der Hunks in Langworten 


hunk_overlay 1013/$3f5 

Die hunk_overlay-Kennung führt einen Overlay an. Durch das 
Overlay-Prinzip werden einzelne Teile des Programms, wenn 
sie benötigt werden, nachgeladen. Dabei wird kein neuer 
Speicherbereich benutzt, sondern ein Bereich, der schon 
durch das Programm belegt worden ist. Diese Auslagerungs¬ 
technik kann bei speicherintensiven Programmen benutzt wer¬ 
den . 


hunk_overlay 


Länge 


Overlaydat 


3 


hunkbreak 1014/$3f6 

Durch hunk_break wird ein Teil eines Overlay-Blocks abge¬ 
schlossen . 


hunk break 
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Anhang A 


Dieser Anhang stellt eine Kurzübersicht über die wichtigsten 
Funktionen des CLI, die Sie zur Assemblerprogranunierung 
benötigen, dar. Sie werden etwas über das Dateisystem, die 
Gerätebezeichnungen, die Pfadnamen und die wichtigsten Be¬ 
fehle erfahren. Außerdem finden Sie einige Tips zur Erstel¬ 
lung einer Arbeitsdiskette. Dies hier soll allerdings kein 
kompletter CLI-Kurs werden. Falls Sie noch mehr zum CLI er¬ 
fahren möchten, empfehlen wir Ihnen die Lektüre des DOS- 
Handbuchs von Commodore etc. 

Die Abkürzung "CLI" steht für "Command Line Interface", also 
"Kommandozeilen-Schnittstelle". Im Grunde kann das CLI nur 
zwei Dinge: Texte (Programmnamen) von der Tastatur einiesen 
und diese Programme ausführen. Sämtliche Befehle sind in 
Wirklichkeit Programmdateien auf der Diskette, die bei jeder 
Benutzung eingelesen werden müssen. Das erste, was man zum 
Umgang mit dem CLI kennen muß, ist also die Art und Weise, 
wie Programm- und Datendateien auf der Diskette verwaltet 
werden. "Diskette" ist hier übrigens ein Sammelbegriff für 
alle Speichermedien, also z.B. auch Fest- und Wechselplat¬ 
ten . 


A.l Das hierarchische Dateisystem 

"Hierarchisches" Dateisystem bedeutet, daß eine gewisse 
"Rangordnung" im Diskettenaufbau vorherrscht. Da gibt es 
einmal die Diskette, die die höchste Instanz bildet. Dann 
kommen die Verzeichnisse, in denen schließlich die Dateien 
zu finden sind (dabei ist die Diskette eigentlich auch ein 
Verzeichnis, nämlich das Haupt-Verzeichnis). Die englische 
Bezeichnung "File" für eine Datei bedeutet eigentlich 
"Akte". Den Vergleich Datei-Akte kann man auch noch weiter¬ 
führen: Die Diskette (das Hauptverzeichnis) ist mit einem 
Aktenschrank vergleichbar. Ein Verzeichnis ist eine 
Schublade in diesem Schrank. Ein Unterverzeichnis ist eine 
weitere Schublade in einer Schublade (was vielleicht nicht 
mehr so ganz vorstellbar ist). Eine Datei schließlich ist 
eine Mappe mit Akten. 

Diese Mappe kann sich einmal im Aktenschrank befinden. Das 
trifft auf Dateien zu, die im Hauptverzeichnis einer 
Diskette stehen. Die Mappe kann sich auch in einer Schublade 
(in einem Verzeichnis) oder einer Unter-Schublade (in einem 
Unterverzeichnis) befinden. Wichtig ist, und da trifft unser 
Aktenschrank-Modell nicht mehr zu, daß Schubladen wieder 
beliebig viele Unter-Schubladen beinhalten können und diese 
wiederum Unter-Schubladen. 
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A.l.l Datei- und Verzeichnisnamen 

Lösen wir uns nun vom Aktenschrank-Modell und betrachten 
wir, wie man eine Amiga-Datei anspricht. Jede Datei bekommt 
zur Identifikation einen Namen. Dieser Name muß eindeutig 
sein, zwei Dateien gleichen Namens in einem Verzeichnis sind 
nicht möglich. Wohl aber dürfen in zwei verschiedenen Ver¬ 
zeichnissen Dateien gleichen Namens existieren, ja ein Ver¬ 
zeichnis darf sogar eine Datei beinhalten, die genauso heißt 
wie es selbst. Der Dateiname darf maximal 30 Zeichen lang 
sein und bis auf ":" und "/" alle druckbaren Zeichen bein¬ 
halten. Sollten allerdings Sonderzeichen wie das Leerzei¬ 
chen, das Pluszeichen o.ä. im Namen enthalten sein, muß der 
gesamte Name in Anführungszeichen gesetzt sein. Für die Wahl 
von Verzeichnisnamen gelten dieselben Regeln. 


A.1.2 Diskettennamen 

Die Wahl von Diskettennamen erfolgt nach denselben Regeln 
wie die von Datei- und Verzeichnisnamen. Sie dürfen aller¬ 
dings maximal 12 Zeichen lang sein. Im Anschluß an den Dis¬ 
kettennamen muß immer ein Doppelpunkt stehen. Man kann Dis¬ 
ketten aber nicht nur unter ihrem Namen, sondern auch unter 
der Bezeichnung des Laufwerks, in dem sie sich befinden, an¬ 
sprechen. Es gelten folgende Bezeichnungen: 

DFO: - Das erste interne Disklaufwerk 

DF1: - Das zweite Laufwerk (egal, ob intern oder extern) 

DF2: - Das dritte Laufwerk (falls vorhanden) 

DF3: - Das vierte Laufwerk 

DHO: - Die Festplatte 

DH1: - Die zweite Festplatte (erst mal eine haben ...) 

RAM: - Die RAM-Disk (simulierte Diskette im Speicher) 

Befindet sich z.B. eine Diskette namens "Assembler" im in¬ 
ternen Laufwerk, kann man sie mit "DFO:" oder "Assembler:" 
ansprechen. 


A.1.3 Pfadangaben 

Angenommen, Sie haben auf der Diskette im Laufwerk DFO: ein 
Verzeichnis namens PROGRAMME, in diesem ein Unterverzeichnis 
namens ANLEITUNGEN und darin eine Datei namens TEST-ANL. 
Dann müssen Sie, um die Datei TEST-ANL eindeutig anzuspre¬ 
chen, folgende Angabe benutzen: 

DFO:PROGRAMME/ANLEITUNGEN/TEST-ANL 

Dieses Gebilde nennt sich "Pfadangabe" oder "Pfadname". Der 
Schrägstrich trennt in einer Pfadangabe immer den Namen ei¬ 
nes Verzeichnisses von den Namen der untergeordneten Ver¬ 
zeichnisse oder Dateien. Anhand der kompletten Pfadangabe 
sucht sich das CLI seinen Weg durch die Dateistruktur der 
Diskette, angefangen im Hauptverzeichnis DFO:, dann ins 
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Verzeichnis PROGRAMME, von dort ins Unterverzeichnis ANLEI¬ 
TUNGEN, um dann die Datei TEST-ANL zu finden. 


A.1.4 Setzen des aktuellen Verzeichnisses 

Da die Eingabe des kompletten Pfadnamens bei Disketten mit 
vielen Unterverzeichnissen eine recht mühsame Sache sein 
kann, gibt es einen CLI-Befehl, der ein bestimmtes Verzeich¬ 
nis zum aktuellen Verzeichnis erhebt. Er nennt sich "CD", 
das steht für "Current Directory". In obigem Beispiel könnte 
man nach Eingabe von 

CD DFO:PROGRAMME/ANLEITUNGEN 

die Datei TEST-ANL durch einfache Angabe ihres Namens errei¬ 
chen. Die beiden Zeichen und "/" haben in diesem Zusam¬ 
menhang besondere Bedeutungen: Der Doppelpunkt steht für das 
Haupt-Verzeichnis der aktuellen Diskette, wenn keine Lauf¬ 
werksangabe vor ihm steht. Der Schrägstrich bedeutet, wenn 
er ganz links in der Pfadangabe steht, daß auf das überge¬ 
ordnete Verzeichnis zugegriffen werden soll. Ist also das 
Verzeichnis PROGRAMME/ANLEITUNGEN als das aktuelle gesetzt, 
und wollen Sie auf eine Datei namens TESTPRG im Verzeichnis 
PROGRAMME zugreifen, können Sie folgendermaßen verfahren: 

/TESTPRG 

Der Schrägstrich bedeutet, daß sich der folgende Dateiname 
auf das dem aktuellen Verzeichnis übergeordnete bezieht. 
Haben Sie eine Datei "TEST-2" im Hauptverzeichnis, können 
Sie so darauf zugreifen: 

:TEST-2 

Der Doppelpunkt bedeutet, daß vom Hauptverzeichnis der aktu¬ 
ellen Diskette ausgegangen werden soll. Ebenso wie es 
möglich ist, mit CD das aktuelle Verzeichnis zu wechseln, 
kann man auch das aktuelle Laufwerk wechseln: 

CD DF1: 

wechselt auf die Diskette, die im Laufwerk DF1: liegt. Wich¬ 
tig: Der Doppelpunkt bezieht sich immer auf das Hauptver¬ 
zeichnis des aktuellen Laufwerks, in diesem Beispiel wäre 
das also DF1:. 


A.2 Allgemeines zu CLI-Befehlen 

Wie schon erwähnt, sind alle CLI-Befehle in Wirklichkeit 
Programmdateien auf der Diskette. Wenn nun das CLI eine Ein¬ 
gabezeile bekommt, so gilt alles, was bis zum ersten Leer¬ 
zeichen an Text eingegeben wird, als Befehl bzw. als 
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Dateiname. Der Rest der Eingabe (falls vorhanden) ist die 
sog. "Kommandozeile", auch "Parametertext" genannt, der dem 
zu startenden Programm übergeben wird. Ein Parameter ist die 
Angabe, auf welches Objekt (oder auf welche Objekte) sich 
der Befehl bezieht. Bei "CD DFO:" z.B. ist das CD der Be¬ 
fehlsname und das DFO: der Parametertext. Es gibt natürlich 
auch Befehle ohne Parameter. Der DIR-Befehl ohne Verzeich¬ 
nisangabe z.B. gibt das aktuelle Verzeichnis aus. 

Das CLI macht bei der Benennung von Dateien, Verzeichnissen 
und Disketten keinen Unterschied zwischen Groß- und Klein¬ 
schreibung. So bezeichnen "Test-Datei", "TEST-DATEI" und 
"tEsT-DaTel" alle ein und dieselbe Datei. Bei der Auflistung 
von Verzeichnisinhalten wird allerdings die Schreibweise so 
aufgeführt, wie sie beim Anlegen der Datei angegeben wurde. 

Es gibt die Möglichkeit, Ausgabetexte von Befehlen, die nor¬ 
malerweise ins CLI-Fenster gehen würden, in eine beliebige 
Datei umzuleiten. Dazu muß nach dem Befehlsnamen, abgetrennt 
durch ein Leerzeichen, ein ">" (Größerzeichen) folgen, und 
nach diesem der Name der Datei (eventuell inklusive Geräte- 
und Pfadangabe), in welche die Ausgabe gehen soll. Beispiel: 
Der DIR-Befehl gibt den Inhalt eines Verzeichnisses im CLI- 
Fenster aus. Soll die Ausgabe aber in die Datei 
"df0:VerzInhalt" gehen, schreibt man folgendes: 

dir > df0:Verzlnhalt dfO: 

Das zweite DFO: ist dann der eigentliche Parameter, hier das 
auszugebende Verzeichnis. 

Des weiteren kann man durch Benutzung des "<" 
(Kleinerzeichens) eventuelle Eingaben, die ein Programm nor¬ 
malerweise von der Tastatur erwartet, aus einer Datei (oder 
von einem anderen Gerät) einiesen. Diese Möglichkeit wird 
aber nur sehr selten genutzt, daher wollen wir hier nicht 
näher darauf eingehen. 

Bei der Vorstellung eines neuen CLI-Befehls gelten folgende 
Regeln für die Angabe der Syntax: 

- CLI-Befehle und Schlüsselworte werden in GROSSBUCHSTABEN 
angegeben. 

- Vom Anwender einzusetzende Parameter sind in gemischter 
Schreibweise. 

- Wahlfreie Parameter (solche, die weggelassen werden kön¬ 
nen) stehen in eckigen Klammern. 
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A.3 Die Gerätebezeichnungen 

Neben den Diskettenlaufwerken und Festplatten existieren 
noch einige weitere Geräte. Hier eine vollständige Liste der 
Geräte mit ihren Bezeichnungen: 

Gerät Beschreibung 


DFO:-DF3: 
DHO:-DHn: 
RAM: 

RAD: 

CON: 

RAW: 
NEWCON: 

SER: 

PAR: 

PRT: 

SPEAK: 

NIL: 


Die maximal vier Diskettenlaufwerke 

Festplatten 

Die normale RAM-Disk 

Die resetfeste RAM-Disk (ab Kickstart 1.3) 
Konsolen-Fenster mit automatischer Editierung 
Konsolen-Fenster ohne automatische Editierung 
Eine verbesserte Version des CON-Gerätes (wird ab 
Kickstart 1.3 für die Shell verwendet) 

Die serielle Schnittstelle 

Die parallele Schnittstelle 

Der in den Preferences eingestelle Drucker 

Das Sprachausgabe-System 

Scheingerät, das alle Ausgaben verwirft 


A.3.1 Die beiden RAM-Disks RAM: und RAD: 

Eine RAM-Disk ist eine simulierte Diskette im Speicher des 
Computers. Sie kann zur Zwischenspeicherung von häufig ge¬ 
brauchten Befehlen und Dateien benutzt werden, da sie sehr 
hohe Zugriffsgeschwindigkeiten aufweist. CLI-Anwender, die 
nicht im Besitz einer Festplatte sind, können hier z.B. die 
CLI-Befehle ablegen, damit sie schneller geladen werden. 

Der wichtigste Unterschied zwischen RAM: und RAD: ist der, 
daß der Inhalt von RAM: nach einem Neustart (Reset oder Ein¬ 
schalten) gelöscht ist, der von RAD: aber erhalten bleibt. 
Des weiteren arbeitet RAM: mit sog. "dynamischer" Speicher¬ 
verwaltung, d.h. es nimmt immer so viel Speicherplatz ein, 
wie die vorhandenen Dateien benötigen. Das RAM: wird daher 
immer als zu 100% gefüllt angegeben. RAD: arbeitet mit 
"statischem" Speicher, es nimmt also immer so viel Platz 
ein, wie es maximal einnehmen kann (die Maximalgröße läßt 
sich einstellen). 

Um RAM: benutzen zu können, muß lediglich die Datei "ram- 
handler" im L-Verzeichnis der Startdiskette stehen. Diese 
Datei, die Routinen für die RAM-Verwaltung enthält, wird 
beim ersten Zugriff auf RAM: automatisch geladen und bleibt 
bis zum nächsten Reset im Speicher. 

Die RAD: ist hingegen ein Gerät, das nicht sofort beim Sy¬ 
stemstart zur Verfügung steht. Es muß erst mit Hilfe des 
CLI-Befehls "MOUNT" angemeldet werden. Dazu wird die Datei 
"ramdrive.device" im DEVS-Verzeichnis benötigt. Näheres dazu 
erfahren Sie im nächsten Abschnitt. 
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A.3.2 Die Konsolen-Geräte CON:, RAW: und NEWCON: 

Über diese Geräte hat man die Möglichkeit, Fenster zu öffnen 
und Eingaben aus diesen Fenstern entgegenzunehmen. Die Be¬ 
nutzung erfordert allerdings schon etwas Programmierwissen, 
weshalb wir uns im Kapitel 4 (über die DOS-Library) 
eingehend damit befaßt haben. An dieser Stelle nur soviel: 
Das Gerät NEWCON: muß erst angemeldet werden (Datei "newcon- 
handler" im L-Verzeichnis wird benötigt), während CON: und 
RAW: immer zur Verfügung stehen. 


A.3.3 Schnittstellenansprache mit SER:, PAR: und PRT: 

Diese drei Geräte dienen zum Senden von Daten an die seri¬ 
elle Schnittstelle (SER:), die parallele Schnittstelle 
(PAR:) und den im Preferences eingestellten Drucker (PRT:). 
Anstelle von PRT: können Sie auch SER: oder PAR: benutzen, 
je nachdem, an welcher Schnittstelle Ihr Drucker angeschlos¬ 
sen ist. So etwas wie eine Pfadangabe gibt es bei diesen Ge¬ 
räten natürlich nicht (wie sollte der Drucker auch Unterver¬ 
zeichnisse haben). Man spricht sie einfach über die Geräte¬ 
bezeichnung an. Um beispielsweise eine (Text-)Datei auszu¬ 
drucken, kann man die folgenden Befehle benutzen: 

COPY Datei TO PRT: oder 

TYPE > PRT: Datei 


A.3.4 Say it again, Amiga - Die Sprachausgabe 

Wenn Sie sich von Ihrem Amiga einmal so richtig 
"vollquatschen" lassen wollen, können Sie das Gerät "SPEAK:" 
benutzen. Es muß, genau wie RAD: und NEWCON:, über MOUNT an¬ 
gemeldet werden. Benötigt werden die Dateien "speak-handler" 
im L-Verzeichnis und "narrator.device" im DEVS-Verzeichnis. 
Die Ansteuerung erfolgt exakt genauso wie bei SER:, PAR: und 
PRT:. Mit folgenden Befehlen kann man sich eine Datei 
"vorlesen" lassen: 

COPY Datei TO SPEAK: oder 

TYPE > SPEAK: Datei 


A.3.5 NIL: - Das Nimmerland-Gerät 

Das NIL steht für "Nichts", und dementsprechend verwirft 
dieses Gerät einfach alles, was an es gesendet wird. In ei¬ 
nem Datei-Archivierungs-Programm namens "Zoo" wird das sehr 
treffend "send data to neverland" - "schicke Daten ins Nim¬ 
merland" genannt (Peter Pan läßt grüßen). 

Dieses Gerät dient dazu, unerwünschte Textausgaben von CLI- 
Befehlen zu unterdrücken. Man braucht die Textausgabe ledig¬ 
lich mittels des Größerzeichens nach dem Befehlsnamen nach 
NIL: umzuleiten. Ein Anwendungsbeispiel: Der SetClock-Befehl 
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lädt die Systemzeit aus der Echtzeituhr. Anschließend gibt 
er die gerade gelesene Uhrzeit auf dem Bildschirm aus. Wenn 
Sie nun anstatt "SETCLOCK LOAD" "SETCLOCK > NIL: LOAD" 
schreiben, wird die Ausgabe unterdrückt. 


A.3.6 Der MOUNT-Befehl - Anmeldung von Geräten 

Manche Geräte stehen nicht sofort bei Systemstart zur Verfü¬ 
gung, sondern müssen erst angemeldet werden. Dazu zählt die 
resetfeste RAM-Disk RAD:, der verbesserte Konsolen-Handler 
NEWCON: und die Sprachausgabe SPEAK:. Um die RAD: anzumel¬ 
den, genügt der Befehl 

MOUNT RAD: 

Der Mount-Befehl arbeitet über eine Text-Datei namens Mount- 
List, die sich im DEVS-Verzeichnis der Startdiskette befin¬ 
det. Für jedes Gerät, das per MOUNT angemeldet werden kann, 
findet sich dort ein Eintrag. Wir stellen hier die für RAD:, 
NEWCON: und SPEAK: nötigen Einträge vor, ohne allerdings im 
Detail auf die einzelnen Schlüsselworte einzugehen. Weiter¬ 
führende Informationen zum Thema MOUNT-Befehl finden Sie im 
Commodore-DOS-Handbuch. 


Device 

= 

ramdrive.device 

Unit 

- 

0 

Flags 

- 

0 

Surfaces 

= 

2 

BlocksPerTrack =11 
Reserved 

- 

2 

Interleave 

= 

0 

LowCyl 

- 

0 

HighCyl 

= 

10 

Buffers 

= 

20 

BufMemType 

= 

1 

Mount 


1 


Bild A.l: Der Mountlist-Eintrag für die RAD: 


Sie können die Größe der RAD: verändern, indem Sie einen 
anderen Wert für HighCyl eingeben. Die Größe in Bytes 
beträgt HighCyl-Wert * 22528. 


NEWCON: Händler = L:Newcon-Handler 
Priority = 5 

StackSize = 1000 

# 


Bild A.2: Der Mountlist-Eintrag für NEWCON: 
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SPEAK: 

Händler 

= L:Speak-Handler 


Priority 

= 5 


StackSize 

= 6000 

# 

GlobVec 

= -1 


Bild A.3: Der Mountlist-Eintrag für SPEAK: 


A.4 Die logischen Geräte 

Neben den "echten" Geräten, die wir bis jetzt kennengelernt 
haben, gibt es noch eine andere Art von Geräten: die logi¬ 
schen Geräte. Dabei handelt es sich um Verzeichnisse (oder 
auch Dateien), denen Gerätenamen zugewiesen werden. Beim Sy¬ 
stemstart werden automatisch folgende Zuweisungen, die sich 
alle auf die Diskette beziehen, von der gestartet wird, vor¬ 
genommen : 

Gerät Beschreibung 


SYS: Hauptverzeichnis 

C: C-Verzeichnis (hier werden die CLI-Befehle 

gesucht) 

DEVS: DEVS-Verzeichnis (beinhaltet die verschiedenen 

Gerätetreiber) 

FONTS: FONTS-Verzeichnis (dürfte wohl klar sein, was es 

beinhaltet) 

L: L-Verzeichnis (beinhaltet System-Programme, die 

bei Bedarf geladen werden) 

LIBS: LIBS-Verzeichnis (beinhaltet alle nicht im ROM 

stehenden Libraries) 

S: S-Verzeichnis (hier werden Batch-Dateien vom 

CLI-Befehl 'Execute' automatisch gesucht) 

T: T-Verzeichnis (hier legen diverse Programme ihre 

temporären Arbeitsdateien an) 


A.4.1 Geräte-Zuweisungen mit dem ASSIGN-Befehl 

Ansehen und verändern kann man diese Zuweisungen mit dem AS¬ 
SIGN-Befehl. Ohne Angabe von Parametern, listet dieser alle 
existierenden Zuweisungen auf. Ansonsten gilt folgendes For¬ 
mat : 

ASSIGN Dev: Verz 

Dem logischen Gerät 'Dev:' wird das Verzeichnis 'Verz' zuge¬ 
wiesen. Gewöhnlich werden neue Zuweisungen nur benötigt, 
wenn Programme, die z.B. in ein Verzeichnis auf einer Fest¬ 
platte kopiert wurden, bestimmte Disketten verlangen. Ange¬ 
nommen, Sie haben ein Textprogramm namens "WordMaster" in 
ein Verzeichnis namens "WM" auf Ihrer Festplatte kopiert. 
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das Programm aber verlangt immer wieder mit "Insert volume 
WordMaster in any drive" das Einlegen der Programmdiskette 
(z.B. weil irgendwelche Daten nachgeladen werden müssen). 
Dann können Sie den Computer mit dem Befehl 

ASSIGN WordMaster: DH0:WM 

dazu bringen, das "Gerät" (also die Diskette) WordMaster un¬ 
ter dem Verzeichnis DHO:WM anzusprechen. 

Ein weiteres Einsatzgebiet von ASSIGN ist die Änderung der 
System-Zuweisungen für C:, L: usw. Wenn Sie z.B. die CLI-Be- 
fehle in ein Verzeichnis namens "CLI" in der RAM-Disk ko¬ 
piert haben und den Computer anweisen wollen, alle CLI-Be- 
fehle ab jetzt im RAM zu suchen, können Sie das so tun: 

ASSIGN C: RAM:CLI 

Analog können Sie auch die Standard-Suchverzeichnisse für 
Libraries, Fonts, Devices usw. verändern. 


A.5 Sonstige wichtige CLI-Befehle 

Nun eine Zusammenstellung der wichtigsten Befehle, die man 
im täglichen Umgang mit dem CLI braucht. Da dies hier al¬ 
lerdings kein CLI-Kurs werden soll, werden wir die Befehle 
nur kurz vorstellen. Für weitere Informationen und Beispiele 
lesen Sie bitte im DOS-Handbuch nach. 


A.5.1 ADDBUFFERS 

Syntax: ADDBUFFERS Laufw Anz 

Dieser Befehl erhöht die Anzahl der Pufferspeicher für ein 
Laufwerk. Je mehr Pufferspeicher vorhanden ist, desto mehr 
Daten können zwischengelagert werden, bevor ein erneuter 
Diskzugriff nötig ist, was die Diskgeschwindigkeit spürbar 
erhöhen kann. Jeder Puffer belegt 512 Bytes im Speicher. Am 
günstigsten ist die Erhöhung der Pufferanzahl um 25. Ein 
noch größerer Speicher bringt kaum noch Zeitvorteile. 


A.5.2 ASSIGN 

Syntax: ASSIGN [Laufw [Verz]] 

Assign ohne Parameter listet alle bestehenden Zuweisungen 
auf. Falls nur ein Gerätename angegeben wird, das Verzeich¬ 
nis aber fehlt, wird die Zuweisung aufgehoben. Weitere In¬ 
formationen finden Sie im Abschnitt "Die logischen Geräte". 
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A.5.3 COPY 

Syntax: COPY [Quelle] TO Ziel [ALL] [QUIET] 

Der Datei-Kopier-Befehl. Quelle und Ziel können sowohl Ver¬ 
zeichnisse als auch Dateien sein. Wenn Quelle fehlt, werden 
alle Dateien des aktuellen Verzeichnisses kopiert. Ziel 
sollte dann ein Verzeichnis sein. ALL bewirkt, daß auch alle 
Unterverzeichnisse des angegebenen Quellverzeichnisses mit¬ 
kopiert werden. QUIET unterdrückt die Ausgabe der Dateina¬ 
men, die gerade kopiert werden. 


A.5.4 DELETE 

Syntax: DELETE Name [Name...] [ALL] [QUIET] 

Löscht Dateien und Verzeichnisse. Verzeichnisse können nur 
gelöscht werden, wenn sie leer sind. ALL bewirkt das Löschen 
aller Unterverzeichnisse des angegebenen Verzeichnisses. 
QUIET unterdrückt die Bildschirmausgabe. 


A.5.5 DIR 

Syntax: DIR Name [OPT A] [OPT I] 

Zeigt das angegebene Verzeichnis an. OPT A bewirkt die Aus¬ 
gabe aller Unterverzeichnisse, und OPT I leitet den interak¬ 
tiven Modus ein. Dabei haben Sie nach jedem ausgegebenen 
Verzeichniseintrag die Möglichkeit, durch Eingabe eines 
Kennbuchstabens zu entscheiden, wie es weitergehen soll. 
Diese Buchstaben sind: 

Q - Beendet die Verzeichnisausgabe. 

E - Wenn der derzeitige Eintrag ein Unterverzeichnis ist, 
können Sie es mit E öffnen und durchgehen. 

B - Wechselt aus einem Unterverzeichnis in das übergeord¬ 
nete Verzeichnis zurück. 

DEL - Löscht den aktuellen Eintrag (falls es eine Datei oder 
ein leeres Verzeichnis ist). 


A.5.6 ENDCLI 
Syntax: ENDCLI 

Beendet den aktuellen CLI-Prozeß. 


A.5.7 EXECUTE 

Syntax: EXECUTE Stapeldatei [Argumente] 

Interpretiert jeweils eine Zeile der Stapeldatei als CLI-Be- 
fehl und führt diese nacheinander aus. Wenn der Dateiname 
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keine Pfadangabe hat, wird automatisch im S-Verzeichnis ge¬ 
sucht. Die Datei "STARTUP-SEQUENCE" im S-Verzeichnis wird 
immer automatisch bei Systemstart ausgeführt. 


A.5.8 FORMAT 

Syntax: FORMAT DRIVE Laufw NAME Diskname [NOICONS] [QUICK] 

Formatiert eine Diskette (oder auch Festplatte). NOICONS 
verhindert das Anlegen des Trashcan auf den Diskette. QUICK 
löscht nur das Hauptverzeichnis, was sehr viel schneller 
geht als die normale Formatierung, aber nur Sinn hat, wenn 
die Diskette schon einmal formatiert wurde und nur schnell 
gelöscht werden soll. 


A.5.9 INFO 

Syntax: INFO 

Gibt Informationen über alle eingelegten Disketten in jedem 
angeschlossenen Laufwerk aus. 


A.5.10 MAKEDIR 

Syntax: MAKEDIR Verzeichnis 

Erstellt ein neues Unterverzeichnis. Die Angabe des neuen 
Verzeichnisses bezieht sich, falls kein kompletter Pfadname 
angegeben wird, auf das aktuelle Verzeichnis. 


A.5.11 NEWCLI 

Syntax: NEWCLI 

Öffnet ein neues CLI-Fenster. 


A. 5.12 RELABEL 

Syntax: RELABEL [DRIVE] Laufw [NAME] Name 

Gibt der Diskette im Laufwerk 'Laufw' den neuen Namen 
'Name'. Die Schlüsselworte DRIVE und NAME können wegfallen. 

A.5.13 RENAME 

Syntax: RENAME [FROM] Alt [TO] Neu 

Benennt eine Datei oder ein Verzeichnis um. Dabei ist auch 
eine Verschiebung in ein anderes Unterverzeichnis möglich, 
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wenn komplette Pfadnamen angegeben werden. Die Verschiebung 
auf eine andere Diskette ist allerdings nicht möglich. 


A.5.14 RUN 

Syntax: RUN Befehl 

Führt den angegebenen Befehl im Hintergrund aus. Falls das 
letzte Zeichen im Befehl ein " + " ist, kann ein weiterer Be¬ 
fehl eingegeben werden, der dann auch im Hintergrund ausge¬ 
führt wird. Die Ausführung beginnt erst, wenn ein Befehl 
ohne "+" am Ende eingegeben wird. 


A.5.15 SETMAP 

Syntax: SETMAP Tastaturbelegung 

Stellt eine länderspezifische Tastaturbelegung ein. Die 
Wichtigesten Kürzel sind 'D' für die deutsche Tastatur, 'GB' 
für die englische und 'USAO' für die amerikanische Standard- 
Belegung. Die entsprechenden Dateien müssen im DEVS/KEYMAPS- 
Verzeichnis stehen. 


A.5.16 TYPE 

Syntax: TYPE Datei [TO Ziel] [OPT N] [OPT H] 

Gibt eine Textdatei auf dem Bildschirm oder, wenn TO Ziel 
angegeben ist, in eine Datei (oder auch auf dem Drucker) 
aus. OPT N bewirkt die Numerierung der Zeilen und OPT H eine 
Ausgabe als Hex-Dump. 
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ABCD Dx,Dy Addiere Dezimal mit X-Flag 

ABCD -(Ax),-(Ay) 

ADD.x <ea>,Dn Addiere binär 

ADD.x Dn,<ea> 

S: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 
D: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ADDA.W <ea>,An Addiere Adresse 

ADDA.L <ea>,An 

S: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs,L,d(PC),d(PC,Xi),#Imm 
ADDI.x #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 
ADDQ.x #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ADDX.x Dx,Dy Addiere mit X-Flag 

ADDX.x -(Ax),-(Ay) 

AND.x <ea>,Dn Ond-Verknüpfung 

AND.x Dn,<ea> 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 
D: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ANDI.x #Konst,<ea> Und-Verknüpfung mit Konstaten 

D: Dn,An, (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ANDI #Konst,CCR Und-Verknüpfung mit demBedingungscode-Register 

ANDI #Konst,SR Und-Verknüpfung mit Statusregiter 

ASL.x Dx,Dy Arithmetisch schieben 

ASL.x #Konst,Dn 

ASL <ea> 

ASR.x Dx,Dy 

ASR.x |Konst,Dn 

ASR <ea> 

D: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

Bcc Lab bedingter Sprung 

Bcc.S Lab 

BCHG Dn,<ea> Prüfe ein Bit und wechsle 

BCHG #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

BCLR Dn,<ea> Prüfe ein Bit und lösche 

BCLR #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

BRA Lab Springe immer 

BRA.S Lab 
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BSET Dn,<ea> Prüfe ein Bit und setze 

BSET #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

BSR Lab Springe ins Unterprogramm 

BSR.S Lab 


BTST Dn,<ea> Prüfe ein Bit 

BTST Dn,#Konst 

BTST #Konst,<ea> 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 

CHK <ea>,Dn Prüfe Registerinhalte gegen Grenzen 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

CLR.x <ea> Lösche ein Operand 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 


CMP.x <ea>,Dn Vergleiche 

S: Dn,An, (An), (An) + ,-(An) ,d(An) ,d(An,Xi) ,Abs.W,Abs.L, ( i^(^C) ,d(PC,Xi) ,#Imm 

CMPA.x <ea>,An Vergleiche Adresse 

S: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,f 


■r 


••L,d(PC),d(PC,Xi),#Imm 


CMPI. #Konst,<ea> Vergleiche nachfolgend 

D: Dn, (An), (An) +, — (An) ,d(An) ,d(An,Xi) ,Ahs r W,Abs.L 

CMPM.x (Ax)+,(Ay)+ Vergleiche Speicher 

, v ^ 

DBcc Dn,Lab Prüfe Bedingung und springe 

DBRA Dn,Lab 

DIVS <ea>,Dn Vpfzeichenbehaftete Division 

S: Dn,(An),(An) + ,-(Ar; ^(Än),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

DIVU <ea>,Dn Vorzeichenlose Division 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#lmm 


EOR.x Dn,<ea> Ausschließliche Oder-Verknüpfung 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 


EORI.x #Konst,<ea> Verknüpfe ausschließlich mit nachfolgendem Wert 
D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 


EORI #Konst,CCR 
EORI |Konst,SR 
EXG Rx,Ry 
EXT.x Dn 
ILLEGAL 


Verknüpfe ausschließlich mit Bedingungsregister 
Verknüpfe ausschließlich mit dem Status-Register 
Vertausche Registerinhalte 
Erweitere Vorzeichen 
Unerlaubter Befehl 
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JMP <ea> Springe 

S: (An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 

JSR <ea> Springe ins Unterprogramm 

S: (An) ,d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 

LEA <ea>,An Lade Adresse 

S: (An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 

LINK An,#Konst Binde und reserviere 

LSL.x Dx,Dy Logisches Schieben 

LSL.x #Konst,Dn 

LSL.W <ea> 

LSR.x Dx,Dy 

LSR.x #Konst,Dn 

LSR.W <ea> 

S: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

MOVE.x <ea>,<ea> Verschiebe Daten von Quelle nach Ziel 

S: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

MOVEA.x<ea>,An Verschiebe Adresse 

S: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 
MOVE <ea>,CCR Verschiebe ins CC-Register 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

MOVE <ea>,SR Verschiebe ins Status-Register 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

MOVE USP,An Verschiebe USP/A7 

MOVE An,USP 

MOVEM.LRegList,<ea> Verschiebe mehrere Registerinhalte 

MOVEM.L <ea>,RegList 

S: (An),(An)+,d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 

D: (An),-(An),d(An),d(An,Xi),Abs.W,Abs.L 

MOVEP.xDx,d(Ay) Verschiebe Peripherie-Daten 

MOVEP.xd(Ax),Dy 

MOVEQ |Konst,Dn Verschiebe schnell 

MULS <ea>,Dn Vorzeichenbehaftete Multiplikation 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs,L,d(PC),d(PC,Xi),flmm 

MULU <ea>,Dn Vorzeichenlose Multiplikation 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 

NBCD <ea> Negiere dezimal mit Erweiterung 

S: Dn, (An), (An) + ,-(An) ,d(An) ,d(An,Xi),Abs.W,Abs.L 

NEG.x <ea> Negiere 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 
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NEGX.x <ea> Negiere mit Erweiterung 

S: Dn, (An), (An) + ,-(An) ,d(An) ,d(An,Xi) ,Abs.W,Abs.L 

NOP Keine Operation 

NOT.x <ea> Logische Komplimentierung 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

OR.x <ea>,Dn Einschließliche Oder-Verknüpung 

OR.x Dn,<ea> 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi),#Imm 
D: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ORl.x fKonst,<ea> Einschließliche Oder-Verknüpfung nachfolgend 

D: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 


ORI 

fKonst,CCR 

Einschließliche Verknüpfung mit 

CC-Register 

ORI 

fKonst,SR 

Einschließliche Verknüpfung mit 

Status-Register 

PEA 

<ea> 

Adresse auf Stack ablegen 



D: (An),d(An),d(An,Xi),Abs.W,Abs.L,d(PC),d(PC,Xi) 


RESET 


Externe 

Einheiten zurücksetzen 

ROL.x 

Dx,Dy 

Rotiere 

(ohne Erweiterung) 

ROL.x 

fKonst,Dx 



ROL.W 

<ea> 



ROR.x 

Dx,Dy 



ROR.x 

fKonst,Dx 



ROR.W 

<ea> 




S: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

ROXL.x Dx,Dy Rotiere mit Erweiterung 

ROXL.x fKonst,Dx 
ROXL.W <ea> 

ROXR.x Dx,Dy 
ROXR.X §Konst,Dx 
ROXR.W <ea> 

S: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

RTE Rückkehr von Ausnahmezustand 

RTR Kehre zurück und lade CCR 

RTS Kehre vom Unterprogramm zurück 

SBCD Dy,Dx Subtrahiere dezimal mit Erweiterung 

SBCD -(Ax),-(Ay) 

SCO <ea> Setze, je nach CCR 

S: Dn, (An), (An) + ,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

STOP fKonst Lade Status-Register und halte 
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SUB.x <ea>,Dn Subtrahiere binär 

SUB.x Dn,<ea> 

S: Dn,An, (An), (An) + ,-(ftn),d(An) ,d(An,Xi) ,Abs.W,Abs.L,d(PC),d(PC,Xi), jflmm 
D: (An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

SUBA.W <ea>,An Subtrahiere Adresse 

SUBA.L <ea>,An 

S: Dn,An, (An), (An) + ,-(An) ,d(An) ,d(An,Xi) ,Abs.W,Abs.L,d(PC) ,d(PC,Xi) ,#Imm 

SUBI.x #Konst,<ea> Subtrahiere nachfolgend 

D: Dn, (An), (An) + ,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

SUBQ.x #Konst,<ea> Subtrahiere schnell 

D: Dn,An,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

SUBX.x Dx,Dy Subtrahiere mit Erweiterung 

SUBX.x -(Ax),-(Ay) 

SWAP Dn Vertausche Registerhälften 

TAS <ea> Prüfe und setze Operand 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

TRAP #Konst Falle 

TRAPV Falle bei Überlauf 

TST.x <ea> Prüfe Operanden 

S: Dn,(An),(An)+,-(An),d(An),d(An,Xi),Abs.W,Abs.L 

UNLK An Binden rückgängig machen 


688 









Anhang D 



690 



















Zeichencode-Tabellen 


D.2 Der ASCII-Zeichensatz 


-_■ > O 3 Ö) 3 

if*ys > s 

!nj W= 3= (U J3 

^ s ^ a Q 3 ! nFj I ^ 

# CO Ü M = 0; Ul 

: - N ! n = ,0» & 

Ü1L- H' < C HS‘ Ö 1 

9 & py .. * A 


X «5* ■ X *X .00 

i(_, ,'N «e- •'■ ■ 

* 

"n-iy ä fi i > 

V 3 tJ 3 II T 

i ■ 3 • > Z • v 

o o o \ 


0 \ 






Anhang D 


- □* q< isi». & q* 

- □ B’ „» t 3 !£• !O ä Üb io 5 

- q.*q* 3 lj Jt» & 3 si 8 io« 

* □ □ I ; % L <J ’^J 1 il’S 'O 1 

” □ 3 □ s w M ÜC -0 o 

« □§ Qs yJ yj ^2 ■<) 1 i .-0 s 

cä s □ i* j +i <^z Jp 

• n^a 5 o < a ns *o 

ooo><cd<JOuju_ 



00 CJ> < CD O Q ÜJ LL 
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Anhang E 


E.l ANSI-Steuersequenzen 


ANSI-Sequenz 


Bedeutung 


$9b,["n"],$40 
$9b,["n"],$41 
$9b,["n"],$42 
$9b,["n"},$43 
$9b,["n"],$44 
$9b,[“n"],$45 
$9b,["n"],$46 
$9b,["z"],[$3b,"s"],$48 


$9b,$4a 

$9b,$4b 

$9b,$4c 

$9b,$4d 

$9b,["n"],$50 

$9b,["n"],$53 

$9b,["n"},$54 

$9b,$32,$30,$68 

$9b,$32,$30,$6c 

$9b,$6e 


n Leerzeichen ab Cursorposition einfügen 
Cursor n Zeilen nach oben setzen 
Cursor n Zeilen nach unten setzen 
Cursor n Zeilen nach rechts setzen 
Cursor n Zeilen nach links setzen 
Cursor hoch 
Cursor runter 

Cursor in z (Zeile)/s (Spalte) setzen. Dabei 
kann die Angabe für die Spalte (s) vernach¬ 
lässigt werden. 

Fenster ab Cursorposition löschen 

Zeile ab Cursorpositin löschen 

Zeile einfügen 

Zeile löschen 

n Zeilen löschen 

n Zeilen nach oben schieben 

n Zeilen nach unten schieben 

Linefeed in Return+Linefeed konvertieren 

Linefeed nur zu Linefeed konvertieren 

Aktuelle Cursorposition senden. Dabei erhält 

man eine Zeichenkette folgenden Aufbaus: 


$9b,"S;V;H",$6d 


$9b,("h"),$74 

$9b,("b"),$75 
$9b,("a"),$78 

$9b,("a"),$79 

$9b,$30,$20,$70 
$9b,$20,$70 
$ 9b,$ 71 


$9b,''z",$3b,"s\$52 
(z/s Zeile/Spalte) 

Stil, Vordergrundfarbe und Hintergrundfarbe 
setzen. 

s (Stil) 0 = normal 

1 = fett 

3 = schräg 

4 = unterstrichen 
7 = invertieren 

v (Vordergr.) 30-37 Farben 0-7 

h (Hintergr.) 40-47 Farben 0-7 

Setzt die maximale Anzahl der Zeilen auf h 
fest. 

Setzt die maximale Zeilenlänge auf b fest. 
Setzt den Abstand (a) vom linken Rand des 
Fensters, ab dem die Ausgabe beginnen soll. 
Setzt den Abstand (a) vom oberen Rand des 
Fensters, ab dem die Ausgabe beginnen soll. 
Cursor unsichtbar machen 
Cursor sichtbar machen 

Fensterausmaße senden. Dabei bekommt man eine 
Zeichenkette folgenden Formats wieder. 

$9b,$31,$3b,$31,$3b,"z",$3b,"s",$73 
(z/s Zeile/Spalte) 


Wenn man die in eckigen Klammern gesetzten Werte wegläßt, so 
wird als Parameter 1 übergeben. 
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Wenn man die in runden Klammern gesetzten Werte wegläßt, so 
wird der Standardwert wieder eingestellt.. 


E.2 Drucker-Steuersequenzen 


Kommando Wert ESC-Sequenz Bedeutung 


aRIS 

0 

ESCC 

aRIN 

1 

ESCjfl 

alND 

2 

ESCD 

aNEL 

3 

ESCE 

aRI 

4 

ESCM 

aSGRO 

5 

ESC[0m 

aSGR3 

6 

ESC[3m 

aSGR23 

7 

ESC[23m 

aSGR4 

8 

ESC[4m 

aSGR24 

9 

ESC[24m 

aSGRl 

10 

ESC[lm 

aSGR22 

11 

ESC[llm 

aSFC 

12 

ESC[3nm 

aSBC 

13 

ESC[4nm 

aSHORPO 

14 

ESC[0w 

aSHORP2 

15 

ESC[2w 

aSHORPl 

16 

ESC[lw 

aSHORP4 

17 

ESC[4w 

aSHORP3 

18 

ESC[3w 

aSHORP6 

19 

ESC[6w 

aSHORT5 

20 

ESC[5w 

aDEN6 

21 

ESC[6"z 

aDEN5 

22 

ESC[5"Z 

aDEN4 

23 

ESC(4"z 

aDEN3 

24 

ESC[3"z 

aDEN2 

25 

ESC[2"z 

aDENl 

26 

ESC[ l"z 

aSUS2 

27 

ESC[2V 

aSUSl 

28 

ESC[lv 

aSUS4 

29 

ESC[4v 

aSUS3 

30 

ESC[3v 

aSUSO 

31 

ESC[Ov 

aPLU 

32 

ESCL 

aPLD 

33 

ESCK 

aFNTO 

34 

ESC(B 

aFNTl 

35 

ESC(R 

aFNT2 

36 

ESC(K 

aFNT3 

37 

ESC(A 

aFNT4 

38 

ESC(E 

aFNT5 

39 

ESC(H 

aFNT6 

40 

ESC(Y 


Drucker-Reset ausführen 
Drucker initialisieren 
Zeilenvorschub 

Wagenrücklauf + Zeilenvorschub 
Zeile nach oben 

Standard-Zeichensatz 
Kursivschrift ein 
Kursivschrift aus 
Unterstrichen ein 
Unterstrichen aus 
Fettdruck ein 
Fettdruck aus 

Vordergrundfarbe n (0-9) einstellen 
Hintergrundfarbe n (0-9) einstellen 

Normale Druckbreite 
Elite-Druckdichte ein 
Elite-Druckdichte aus 
Schmalschrift ein 
Schmalschrift aus 
Breitschrift ein 
Breitschrift aus 

Schattendruck ein 
Schattendruck aus 
Doppeldruck ein 
Doppeldruck aus 
NLQ ein 
NLQ aus 

Hochstellen ein 
Hochstellen aus 
Tiefstellen ein 
Tiefstellen aus 
Normale Schriftstellung 
Teillinie aufwärts 
Teillinie abwärts 

Zeichensatz USA 
Zeichensatz Frankreich 
Zeichensatz Deutschland 
Zeichensatz England 
Zeichensatz Dänemark 1 
Zeichensatz Schweden 
Zeichensatz Italien 
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aFNT7 

41 

ESC(Z 

aFNT8 

42 

ESC( J 

aFNT9 

43 

ESC (6 

aFNTIO 

44 

ESC(C 

aPROP2 

45 

ESC[2p 

aPROPl 

46 

ESC[lp 

aPROPO 

47 

ESC[Op 

aTSS 

48 

ESC[n E 

aJFY5 

49 

ESC[5 F 

aJFY7 

50 

ESC[7 F 

aJFY6 

51 

ESC[6 F 

aJFYO 

52 

ESC[0 F 

aJFY2 

53 

ESC[2 F 

aJFY3 

54 

ESC[3 F 

aVERPO 

55 

ESC[0z 

aVERPl 

56 

ESC[lz 

aSLPP 

57 

ESC[nt 

aPERF 

58 

ESC[ng 

aPERFO 

59 

ESC[0q 

aLMS 

60 

ESC|9 

aRMS 

61 

ESCfO 

aTMS 

62 

ESC|8 

aBMS 

63 

ESC#2 

aSTBM 

64 

ESC[Pn;mr 

aSLRM 

65 

ESC[Pn;ms 

aCAM 

66 

ESC#3 

aHTS 

67 

ESCH 

aVTS 

68 

ESCJ 

aTBCO 

69 

ESC[0g 

aTBC3 

70 

ESC[3g 

aTBCl 

71 

ESC[lg 

aTBC4 

72 

ESC[4g 

aTBCALL 

73 

ESC|4 

aTBSALL 

74 

ESC#5 

aEXTEND 

75 

ESC[Pn"x 


Zeichensatz Spanien 
Zeichensatz Japan 
Zeichensatz Norwegen 
Zeichensatz Dänemark 2 

Proportional ein 
Proportional aus 

Proportional-Einstellung löschen 
Proportional-Offset n einstellen 
Linksausrichtung 
Rechtsausrichtung 
Zentrierte Ausrichtung 
Ausrichtung aus 
Wortabstand (Zentrierung) 
Buchstabenabstand (Ausrichtung) 

Zeilenabstand 1/8" 

Zeilenabstand 1/6" 

Seitenlange n einstellen 
Überspringe n (n>0) Zeilen 
Überspringen aus 

Linker Rand gesetzt 

Rechter Rand gesetzt 

Oberer Rand gesetzt 

Unterer Rand gesetzt 

Setze Ränder auf n oben, m unten 

Setze Ränder auf n links, m rechts 

Ränder löschen 

Horizontal-Tabulator setzen 
Vertikal-Tabulator setzen 
Horizontal-Tabulator löschen 
Alle Horizontal-Tabulatoren löschen 
Vertikal-Tabulator löschen 
Alle Vertikal-Tabulatoren löschen 
Alle V- und H-Tabulatoren löschen 
Standard-Tabulatoren setzen 
Erweitertes Kommando n ausführen 
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System-Fehlermeldungen 


DOS-Fehlermeldungen 
Guru-Meditation-Fehlermeldungen 




Anhang F 


F.l Die DOS-Fehlermeldungen 


DOS-Fehlermeldung Wert Bedeutung 


NO_FREE_STORE 

TASK_TABLE_FULL 

LINE_TOO_LONG 

FILE_NOT_OBJECT 

INVALID_RE SIDENT_LIBRARY 

OBJECT_IN USE 

OBJECT EXISTS 

OBJECT_NOT_FOUND 

ACTION_NOT_KNOWN 

INVALID_COMPONENT_NAME 

INVALID_LOCK 

OBJECT_WRONG_TYPE 

DISK_NOT_VALIDATED 

DISK_WRITE_PROTECTED 

RENAME_ACROSS_DEVICES 

DIRECTORY_NOT_EMPTY 

DEVICE_NOT_MOUNTED 

SEEK_ERROR 

COMMENT_TOO_BIG 

DISK_FULL 

DELETE_PROTECTED 

WRITE_PROTECTED 

READ_PROTECTED 

NOT_A_DOS_DISK 

NO_DISK 

NO MORE ENTRIES 


103 Zu wenig Speicherplatz 

105 Zu viele CLI-Tasks eingerichtet 

120 CLI-Eingabezeile zu lang 

121 Datei ist nicht ausführbar 

122 Residente Lib beim Laden fehlerhaft 

202 Gewünschtes Objekt wird schon benutzt 

203 Objekt schon vorhanden 
205 Objekt nicht gefunden 

209 Filesystem erhielt unbekanntes Packet 

210 CLI-Eingabe enthält ungültige Zeichen 

211 Ungültiges Lock verwendet 

212 File als Dir angesprochen oder umgekehrt 

213 Diskette nicht für gültig erklärt 

214 Diskette ist schreibgeschützt 

215 Rename auf anderen Datenträger versucht 

216 Löschversuch auf nicht-leeres Verzeichnis 

218 Gerät nicht angemeldet 

219 Seek-Aufruf außerhalb der Dateigrenzen 

220 Dateikommentar zu lang 

221 Diskette voll 

222 Datei ist löschgeschützt 

223 Datei ist schreibgeschützt 

224 Datei ist lesegeschützt 

225 Keine DOS-Diskette im Laufwerk 

226 Gar keine Diskette im Laufwerk 

232 ExNext: Keine weiteren Verz.einträge 


F.2 Die Guru-Meditation-Fehlermeldungen 


Die Guru-Fehlermeldungen bestehen aus zwei Langworten. Das 
erste gibt den Fehler an, das zweite die Task-Struktur- 
Adresse des absturzenden Tasks. Die Fehlernummer ist folgen¬ 
dermaßen aufgebaut: 


3 2 10 

Bit 10987654321098765432109876543210 

L_^_J l_ r _J I_I 

—DeadEnd/Recovery-Flag 

1 —Systemkomponente, die den Fehler verursachte 
1 —Aufgetretener Fehler 

■— "Ziel" des Fehlers 
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F.2.1 Die allgemeinen Fehlercodes 

Es gibt zwei Arten von Fehlermeldungen: Die allgemeinen und 
die speziellen. Auf die allgemeine Form bezieht sich die 
obige Grafik. 

Das DeadEnd/Recovery-Flag (höchstes Bit) gibt an, ob nach 
der Guru-Meldung ein Reset ausgelöst wird (DeadEnd - totes 
Ende für alle Programme) oder das laufende Programm weiter¬ 
geht (Recovery - "erholbarer" Guru). 

Für die auslösende Systemkomponente gelten folgende Zuord¬ 
nungen : 


Systemkomponente Wert Bedeutung 


AN CPUTrap 

$00000000 

CPU-Exception 

AN ExecLib 

$01000000 

Exec-Library 

AM GraphicsLib 

$02000000 

Graphics-Library 

AN LayersLib 

$03000000 

Layers-Library 

AN Intuition 

$04000000 

Intuition-Library 

AN MathLib 

$05000000 

Math...-Library 

AN CListLib 

$06000000 

CList-Library 

AN DOSLib 

$07000000 

DOS-Library 

AN RAMLib 

$08000000 

RAMLib-Library 

AN IconLib 

$09000000 

Icon-Library 

AN ExpansionLib 

$0a000000 

Expansion-Library 

an AudioDev 

$10000000 

Audio-Device 

AN ConsoleDev 

$11000000 

Console-Device 

AN GamePortDev 

$12000000 

Gameport-Device 

AN KeyboardDev 

$13000000 

Keyboard-Device 

AN TrackDiskDev 

$14000000 

Trackdisk-Device 

AN TimerDev 

$15000000 

Timer-Device 

AN CIARsrc 

$20000000 

CIA-Resource 

AN DiskRsrc 

$21000000 

Disk-Resource 

AN MiscRsrc 

$22000000 

Misc-Resource 

AN Bootstrap 

$30000000 

Resident-Routine für Bootvorgang 

AN Workbench 

$31000000 

Workbench-Programm 

AN DiskCopy 

$32000000 

Diskcopy-Programm 

Folgende Nummern gehören 

zu den aufgetretenen Fehlern 

Fehler 

Wert 

Bedeutung 


AG_NoMemory 

AG_MakeLib 

AG_OpenLib 

AG_OpenDev 

AG_OpenRes 

AGIOError 

AG_NoSignal 


$00010000 

$00020000 

$00030000 

$00040000 

$00050000 

$00060000 

$00070000 


Nicht genug Speicherplatz 
Fehler bei Library-Erstellung 
Fehler beim öffnen einer Library 
Fehler beim Öffnen eines Devices 
Fehler beim öffnen einer Resource 
Fehler bei Bearbeitung eines IORequest 
Kein Signal empfangen 
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Anhang F 


Die Systemkomponenten, auf die sich der Fehler bezieht, be¬ 
kommen folgende Nummern: 


Fehlerobjekt Wert Bedeutung 


AO ExecLib 

$00008001 

Exec-Library 

AO GraphicsLib 

$00008002 

Graphics-Library 

AO LayersLib 

$00008003 

Layers-Library 

AO Intuition 

$00008004 

Intuition-Library 

AO MathLib 

$00008005 

Math...-Library 

AO CListLib 

$00008006 

CList-Library 

AO DOSLib 

$00008007 

DOS-Library 

AO RAMLib 

$00008008 

RAMLib-Library 

AO IconLib 

$00008009 

Icon-Library 

AO ExpansionLib 

$0000800a 

Expansion-Library 

AO AudioDev 

$00008010 

Audio-Device 

AO ConsoleDev 

$00008011 

Console-Device 

AO GamePortDev 

$00008012 

Gameport-Device 

AO KeyboardDev 

$00008013 

Keyboard-Device 

AO TrackDiskDev 

$00008014 

Trackdisk-Device 

AO TimerDev 

$00008015 

Timer-Device 

AO CIARsrc 

$00008020 

CIA-Resource 

AO DiskRsrc 

$00008021 

Disk-Resource 

AO MiscRsrc 

$00008022 

Misc-Resource 

AO BootStrap 

$00008030 

Resident-Routine für Bootvorgang 

AO Workbench 

$00008031 

Workbench-Programm 


Die auf diese Weise ermittelten Werte müssen für die endgül¬ 
tige Guru-Nummer OR-verknüpft werden. Beispiel: Der DeadEnd- 
Fehler "DOS-Library konnte Trackdisk-Device nicht öffnen" 
wird kodiert als 

$80000000 (DeadEnd) OR $07000000 (Quelle: DOS-Library) OR $00040000 
(Fehler beim Device-Öffnen) OR $00008014 (Objekt: Trackdisk-Device) 

Das ergibt die Fehlernummer $87048014. 


F.2.2 Die speziellen Fehlercodes 

Neben den allgemeinen Fehlercodes, die man sich aus den eben 
besprochenen drei Codebereichen zusammensetzen kann, gibt es 
für die einzelnen Systemkomponenten noch spezielle Fehlerco¬ 
des, die nun aufgelistet werden sollen. 


Prozessor-Exceptions 

Fehler Wert Bedeutung 


Bus Error 
Address Error 
Illegal Instruction 
Divion By Zero 
CHK Instruction 


$00000002 

$00000003 

$00000004 

$00000005 

$00000006 


Busfehler 
Adreßfehler 
Illegale Instruktion 
Division durch 0 
CHK-Befehl 
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System-Fehlermeldungen 


TRAPV Instruction 
Privilege Violation 
Trace 

Line A Emulation 
Line F Emulation 


$00000007 

$00000008 

$00000009 

$0000000a 

$0000000b 


TRAPV-Befehl 

Privileg-Verletzung 

Trace-Modus 

Befehl mit %1010-Bitfolge am Anfang 
Befehl mit %1111-Bitfolge am Anfang 


Exec-Library 


Fehler 

Wert 

Bedeutung 

AN ExcptVect 

AN BaseChkSum 

AN LibChkSum 
AN_LibMem 

AN MemCorrupt 

AN IntrMem 
AN_InitAPtr 

AN SemCorrupt 

AN FreeTwice 

AN BogusExcpt 

$81000001 

$81000002 

$81000003 

$81000004 

$81000005 

$81000006 

$81000007 

$81000008 

$81000009 

$8100000a 

Checksumme der Prozessor-Exception falsch 
Checksumme der ExecBase falsch 

Checksumme der Library falsch 

Kein Speicherplatz für Library-Erstellung 
Memory-List zerstört 

Kein Speicherplatz für Interrupt-Server 
Fehler bei Ausführung von InitStruct 
Semaphore in fehlerhaftem Zustand 
Speicherbereich zweimal freigegeben 
Illegale Exception durchgeführt 

Graphics-Library 


Fehler 

Wert 

Bedeutung 

AN_GfxNoMem 

AN LongFrame 

AN ShortFrame 

AN TextTmpRas 
AN_BltBitMap 

AN RegionMemory 

AN MakeVPort 

AN GfxNoLCM 

$82010000 

$82010006 

$82010007 

$02010009 

$8201000a 

$8201000b 

$82010030 

$82011234 

Kein Speicherplatz für Graphics 

Kein Speicher für Longframe-Copperlist 

Kein Speicher für Shortframe-Copperlist 
Kein Speicher für Text-TmpRas 

Kein Speicher für BltBitMap-Routine 

Kein Speicher für Region 

Kein Speicher für MakeVPort-Routine 
Notfall-Speicher nicht verfügbar 

Layers-Library 



Fehler 

Wert 

Bedeutung 

AN LayersNoMem 

$83010000 

; Kein Speicherplatz für Layers 


Intuition-Library 

Fehler Wert Bedeutung 


AN_GadgetType 

AN_BadGadget 

AN_CreatePort 

ANItemAlloc 

AN_SubAlloc 

AN_PlaneAlloc 

AN_ItemBoxTop 

AN_OpenScreen 


$84000001 

$04000001 

$84010002 

$84010003 

$84010004 

$84010005 

$84000006 

$84010007 


Unbekannter Gadget-Typ 

Recovery-Form von AN_GadgetType 

Kein Speicher für Message-Port 

Kein Speicher für Item-Plane 

Kein Speicher für Sub 

Kein Speicher für Plane 

Oberkante der Item-Box < Nullkoordinaten 

Kein Speicher für neuen Screen 
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AN OpenScrnRast 

AN SysScrnType 
AN_AddSWGadget 

AN OpenWindow 

AN BadState 

AN BadMessage 

AN WeirdEcho 

AN NoConsole 

$84010008 

$84000009 

$8401000a 

$8401000b 

$8400000c 

$8400000d 

$8400000e 

$8400000f 

Kein Speicher für neuen Screen-Raster 
Unbekannter Typ des System-Screens 

Kein Speicher für System-Window-Gadgets 

Kein Speicher für neues Window 
"Bad State" beim Start von Intuition 
"Bad Message" von IDCMP empfangen 

Unbekannte Meldung 

Console-Device ließ sich nicht öffnen 

DOS-Library 



Fehler 

Wert 

Bedeutung 

AN StartMem 

AN EndTask 
AN_QPktFail 

AN AsyncPkt 

AN FreeVec 

AN DiskBlkSeg 

AN BitMap 

AN KeyFree 

AN BadChkSum 

AN DiskError 

AN KeyRange 

AN BadOverlay 

$07010001 

$07000002 

$07000003 

$07000004 

$07000005 

$07000006 

$07000007 

$07000008 

$07000009 

$0700000a 

$0700000b 

$0700000c 

Kein Speicherplatz in Startphase 

Fehler beim Beenden eines Tasks 
QPacket-Fehler 

Unerwartetes Packet empfangen 

Fehler bei FreeVec-Funktion 

Fehler in der Diskblock-Seguenz 

Bitmap fehlerhaft 

Diskblock schon freigegeben 

Falsche Checksumme 

Disk-Fehler 

Blocknummer nicht im erlaubten Bereich 
Ungültiger Overlay 

RAMLib-Library 



Fehler 

Wert 

Bedeutung 

AN BadSegList 

$08000001 

Overlays in Libraries nicht erlaubt 

Expansion-Library 


Fehler 

Wert 

Bedeutung 


AN_BadExpansionFree $0a000001 Fehlerhafte Expansion-Freigabe 


Trackdisk-Device 


Fehler 

Wert 

Bedeutung 

AN TDCalibSeek 

AN TDDelay 

$14000001 

$14000002 

Such-Fehler beim Kalibrieren 

Fehler beim Warten auf Timer-Signal 

Timer-Device 



Fehler 

Wert 

Bedeutung 

AN TMBadReg 

AN TMBadSupply 

$15000001 

$15000002 

Fehlerhafte Anfrage 

Stromversorgung unterstützt Ticks nicht 
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Disk-Resource 



Fehler 

Wert 

Bedeutung 

AN DRHasDisk 

AN_DRIntNoAct 

$21000001 

$21000002 

GetUnit hat bereits Diskzugriff 
Interrupt-Fehler: Keine active Unit 

Bootstrap 



Fehler 

Wert 

Bedeutung 

AN BootError 

$30000001 

Fehler beim Bootvorgang 
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Anhang G 


G.l 

Diskfont 

-Strukturen 

und -Flags 

TextAttr 



00 

de. 1 

*ta Name 

; Zeiger auf Font-Name 

04 

dc.w 

ta YSize 

; Vertikale Größe des Fonts 

06 

dc.b 

ta Style 

; Stil des Fonts 

07 

dc.b 

ta Flags 

; Art des Fonts 

08 


ta_SIZEOF 


Font-Flag 

Wert 

Bedeutung 

FPF 

ROMFONT 

1 

Font ist im ROM 

FPF" 

"DISKFONT 

2 

Font wurde von Disk geladen 

FPF" 

REVPATH 

4 

Ausrichtung von rechts nach links 

FPF" 

'TALLDOT 

8 

Hires-Noninterlaced-Font 

FPF" 

WIDEDOT 

16 

Lores-Interlaces-Font 

FPF' 

“PROPORTIONAL 32 

Proportional-Font 

FPF" 

'DESIGNED 

64 

Font ist gezeichnet, nicht berechnet 

FPF' 

jlEMOVED 

128 

Font wurde per Lib-Routine entfernt 

TextFont 



00 

ds.b 

tf Message,20 

; Eine Exec-Message (siehe unten) 

20 

dc.w 

tf YSize 

; Y-Größe des Fonts 

22 

dc.b 

tf_Style 

; Schreibstil 

23 

dc.b 

tf Flags 

; Font-Eigenschaften 

24 

dc.w 

tf XSize 

; Standard-Fontbreite 

26 

dc.w 

tf Baseline 

; Grundlinie 

28 

dc.w 

tf BoldSmear 


30 

dc.w 

tf Accessors 

; Anzahl der Zugriffe 

32 

dc.b 

tf LoChar 

; Erstes ASCII-Zeichen im Font 

33 

dc.b 

tf HiChar 

; Letztes ASCII-Zeichen im Font 

34 

dc.l 

*tf CharData 

; Zeiger auf die Zeichen-Daten 

38 

dc.w 

tf Modulo 


40 

dc.l 

*tf CharLoc 


44 

dc.l 

*tf CharSpace 

; Zeiger auf Proportional-Daten 

48 

dc.l 

‘tf CharKern 

; Zeiger auf Kerning-Daten 

52 


tf SIZEOF 



AvailFontsHeader 


00 

dc.w 

afh 

NumEntries 

; Anzahl der folgenden AF-Strukturen 

02 

ds.b 

afh 

AF, 10 

; Die erste AvailFonts-Struktur 

12 

ds.b 

afh" 

AF, 10 

; Die zweite AvailFonts-Struktur 


usw. 






Datenstrukturen und Flags 


AvailFonts 



oo dc.w 

02 dc.l 

06 dc.w 

08 dc.b 

09 dc.b 

10 

af Type 
*af Name,0 
af YSize 
af Style 
af Flags 
af_SIZE0F 

; AFF_MEMORY oder AFF_DISK 
/ " 

; TextAttr- 
; Struktur 

! 

Font-Typ 

Wert 

Bedeutung 

AFF MEMORY 

AFF DISK 

1 

2 

Suche Fonts im ROM 

Suche Fonts auf der Diskette 


FontContentsHeader 


000 

dc.w 

fch 

FilelD 

002 

dc.w 

fch 

NumEntries 

004 

ds.b 

fch 

FH,260 

264 

ds.b 

fch 

FH,260 


FontContents 

000 

ds.b 

fc FileName,256 

256 

dc.w 

fc YSize 

258 

dc.b 

fc Style 

259 

dc.b 

fc Flags 

260 


fc SIZEOF 


DiskFontHeader 

000 

ds.b 

dfh DF,14 

014 

dc.w 

dfh FilelD 

016 

dc.w 

dfh Revision 

018 

dc.l 

dfh Segment 

022 

ds.b 

dfh Name,256 

278 

ds.b 

dfh TF,52 

330 


dfh SIZEOF 


G.2 DOS-Strukturen und -Flags 


FilelnfoBlock (FIB1 


000 

dc.l 

fib DiskKey 

004 

dc.l 

fib DirEntryType 

008 

ds.b 

fib FileName,108 

116 

dc.l 

fib Protection 

120 

dc.l 

fib EntryType 


$ofoo 

Anzahl der folgenden fc-Strukturen 
Die erste FC-Struktur 
Die zweite FC-Struktur 
usw. 


; Name der Fontdatei (O-terminiert) 
; Y-Größe 
; Schreibstil 
; Font-Eigenschaften 


; Ein Exec-Node (siehe unten) 
; $0f80 

; Revisionsnummer des Fonts 
; Segment-Adresse nach Laden 
; Name der Fontdatei 
; Eine TextFont-Struktur 


; Nummer des Verwaltungsblocks 
; > 0 bei Verz., sonst Datei 
; Dateiname, max. 30 Zeichen 
; Schutzstatus 
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124 

dc.l 

fib_Size 

128 

dc.l 

fib NumBlocks 

132 

ds.b 

fib DateStamp,12 

144 

ds.b 

fib Comment,116 

260 


fib_SIZEOF 

InfoData 


00 

dc.l 

id NumSoftErrors 

04 

dc.l 

id UnitNumber 

08 

dc.l 

id DiskState 

12 

dc.l 

id NumBlocks 

16 

dc.l 

id NumBlocksUsed 

20 

dc.l 

id BytesPerBlock 

24 

dc.l 

id DiskType 

28 

dc.l 

id VolumeNode 

32 

dc.l 

id Inüse 

36 


id SIZEOF 


; Dateilänge in Bytes 

; Zeitpunkt der letzten Änderung 
; Dateikommentar 


; Anzahl "weicher" Fehler 
; Nummer des Laufwerks 
; Disketten-Zustand, siehe unten 
; Anzahl Datenblöcke 
; Anzahl belegter Blöcke 
; Anzahl Bytes in einem Block 
; Disketten-Typ, siehe unten 

; 1 = Disk wird benutzt 


Diskstatus 

Wert 

Bedeutung 

ID WRITE PROTECTED 

80 

Schreibgeschützt 

ID VALIDATING 

81 

Wird gerade auf Gültigkeit überprüft 

ID_VALIDATED 

82 

Ist gültig 

Disk-Typ 

Wert 

Bedeutung 

ID NO DISK PRESENT 

-1 

Keine Disk im Laufwerk 

ID UNREADABLE DISK 

$42414400 

Disk nicht lesbar 

ID NOT REALLY DOS 

$4E444F53 

Keine DOS-Disk 

ID DOS DISK 

$444F5300 

Disk o.k. 

ID FFS DISK 

S444F5301 

FastFileSystem-Disk 

ID KICKSTART DISK 

$4B49434B 

AlOOO-Kickstart-Disk 


Datei-Zuariff 


Öffnungs-Modus 

Wert 

Bedeutung 

MODE OLDFILE 

1005 

Öffnet bestehende Datei 

MODE READWRITE 

1004 

Öffnet neue oder bestehende Datei 

MODE NEWFILE 

1006 

Erstellt neue Datei 

0ffset-Anaaben 

für Seek 

Offset-Typ 

Wert 

Bedeutung 

OFFSET BEGINNING 

-1 

Relativ zum Dateianfang 

OFFSET CURRENT 

0 

Relativ zur derzeitigen Position 

OFFSET END 

1 

Relativ zum Ende 
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Datenstrukturen und Flags 


Lock-Tvoen 



Lock-Typ 

Wert 

Bedeutung 

EXCLUSIVE LOCK 

-1 

Exklusiv-Recht des aufrufenden Programms 

ACCESS WRITE 

-1 

Siehe EXCLUSIVE LOCK 

SHARED LOCK 

-2 

Kein Exklusiv-Recht 

ACCESS READ 

-2 

Siehe SHARED_LOCK 

Protection-Attribute 


Schutzattribut 

Wert 

Bedeutung 

FIBF DELETE 

1 

Löschschutz 

FIBF EXECUTE 

2 

Ausführungsschutz 

FIBF WRITE 

4 

Schreib-(Veränderungs-)schütz 

FIBF READ 

8 

Leseschutz 

FIBF ARCHIVE 

16 

Datei ist archiviert 

FIBF PURE 

32 

Datei ist resident ladbar 

FIBF SCRIPT 

64 

Datei ist eine Batch-Datei 

FIBF HIDE 

128 

Datei soll nicht angezeigt werden 

DOS-Librarv-Basis 


00 ds.b 

dl lib,34 

; Library-Struktur 

34 dc.l 

*dl Root 

; Zeiger auf Root-Node 

38 dc.l 

*dl GV 

; Zeiger auf 'Global Vector 1 

42 dc.l 

dl A2 

; DOS-interne Register- 

46 dc.l 

dl A5 

; Zwischenspeicher 

50 dc.l 

dl A6 


54 

dl SIZEOF 



RootNode 


00 

dc.l 

*rn TaskArray ; 

BCPL-Zeiger auf CLI-Task-Tabelle 

04 

dc.l 

*rn ConsoleSegment ; 

BCPL-Zeiger auf Konsolen-Handler 

08 

ds.b 

rn_Time,12 ; 

Systemzeit im DateStamp-Format 

20 

dc.l 

*rn RestartSeg ; 

BCPL-Zeiger auf Disk-Validator 

24 

dc.l 

*rn_Info ; 

BCPL-Zeiger auf Doslnfo-Struktur 

28 

32 

dc.l 

*rn FileHandlerSegment; 
rn SIZEOF 

BCPL-Zeiger auf File-Handler 


DosInfo 


00 

dc.l 

*di McName 

04 

dc.l 

*di Devlnfo 

08 

dc.l 

*di Devices 

12 

dc.l 

*di Händlers 

16 

dc.l 

*di NetHand 

20 


dfSIZEOF 


; Derzeit nicht benutzt 
; BCPL-Zeiger auf Device-List 
; Derzeit nicht benutzt 
; Derzeit nicht benutzt 
; Derzeit nicht benutzt 
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Anhang G 


DeviceNode 


00 

de. 1 

*dn Next 

04 

dc.l 

dn Type 

08 

dc.l 

*dn Task 

12 

dc.l 

*dn Lock 

16 

dc.l 

*dn Händler 

20 

dc.l 

dn StackSize 

24 

dc.l 

dn Priority 

28 

dc.l 

*dn Startup 

32 

dc.l 

*dn SegList 

36 

dc.l 

*dn GlobalVec 

40 

dc.l 

*dn Name 

44 


dn_SIZEOF 


DevList (VolumeNode ) 


00 

dc.l 

*dl_Next 

04 

dc.l 

dl Type 

08 

dc.l 

*dl Task 

12 

dc.l 

*dl_Lock 

16 

ds.b 

dl VolumeDate 

28 

dc.l 

*dl LockList 

32 

dc.l 

dl DiskType 

36 

dc.l 

dl unused 

40 

dc.l 

*dl Name 

44 


dl_SIZEOF 


FileSvsStartupMsg 


00 

dc.l 

fssm Unit 

04 

dc.l 

*fssm Device 

08 

dc.l 

*fssm Environ 

12 

dc.l 

fssm Flags 

14 


fssm SIZEOF 


Disk- 

-Environment 

00 

dc.l 

de TableSize 

04 

dc.l 

de SizeBlock 

08 

dc.l 

de SecOrg 

12 

dc.l 

de NumHeads 

16 

dc.l 

de SecsPerBlk 

20 

dc.l 

de BlksPerTrack 

24 

dc.l 

de ReservedBlks 

28 

dc.l 

de Prefac 

32 

dc.l 

de Interleave 

36 

dc.l 

de LowCyl 

40 

dc.l 

de UpperCyl 

44 

dc.l 

de NumBuffers 

48 

dc.l 

de MemBufType 

52 


de SIZEOF 


BCPL-Zeiger auf nächste Struktur 
Struktur-Typ (bei Devices 0) 
Zeiger auf Device-Task 
Für Devices nicht benutzt 
Handler-Dateiname als BCPL-String 
Stack-Größe für neue Tasks 
Priorität für neue Tasks 
BCPL-Zeiger auf FileSysStartupMsg 
BCPL-Zeiger auf Händler-Segment 
Zeiger auf globalen Vektor 
Name des Devices als BCPL-String 


BCPL-Zeiger auf nächste Struktur 
Struktur-Typ (für Disks 2) 
BCPL-Zeiger auf Handler-Task 
Für Disks nicht benutzt 
Erstellungsdatum (DateStamp!) 
BCPL-Zeiger auf Disk-Locks 
Diskettentyp (z.B. $444F5300) 
Nicht belegt 

Diskname als BCPL-String 


Exec-Unit-Nummer (für OpenDevice) 
Devicename als BCPL-String 
BCPL-Zeiger auf Environment-Tab. 
Flags für OpenDevice 


Anzahl Langworte in der Tabelle 
Größe eines Blocks in Langworten 
Nicht benutzt; muß 0 sein 
Anzahl der Schreib/Lese-Köpfe 
Nicht benutzt, muß 1 sein 
Anzahl Blöcke auf einer Spur 
Anzahl Sektoren im Bootblock 
Nicht benutzt, Muß 0 sein 
Gewöhnlich 0 

Nummer des ersten Zylinders 
Nummer des letzten Zylinders 
Anzahl der Speicherpuffer 
Speichertyp für Puffer 
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Datenstrukturen und Flags 


Process 



000 

dc.l 

*tc Succ 

_ 


004 

dc.l 

*tc Pred ; 



008 

dc.b 

tc Type ; 


— Node-Struktur 

009 

dc.b 

tc Pri ; 



010 

dc.l 

*tc Name 



014 

dc.b 

tc Flags ; 


015 

dc.b 

tc State ; 


016 

dc.b 

tc IDNestCnt ; 


017 

dc.b 

tc TDNestCnt ; 


018 

dc.l 

tc SigAlloc ; 


022 

dc.l 

tc SigWait ; 


026 

dc.l 

tc_SigRecvd ; 

— Task-Struktur 

030 

dc.l 

tc Except ; 

(pr Task) 

034 

dc.w 

tc TrapAlloc ; 


036 

dc.w 

tc TrapAble ; 


038 

dc.l 

tc ExceptData ; 


042 

dc.l 

tc ExceptCode ; 


046 

dc.l 

tc TrapData ; 


050 

dc.l 

tc_TrapCode ; 


054 

dc.l 

tc SPReg ; 


058 

dc.l 

tc SPLower ; 


062 

dc.l 

tc SPUpper ; 


066 

dc.l 

*tc Switch ; 


070 

dc.l 

*tc Launch ; 


074 

dcb.b 

tc MemEntry,l4 ; 


088 

dc.l 

tc UserData 

J 


092 

dc.l 

*mp Succ 

n 


096 

dc.l 

*mp Pred ; 


100 

dc.b 

mp Type ; 


101 

dc.b 

mp Pri ; 


102 

dc.l 

*mp Name ; 

— MessagePort-Struktur 

106 

dc.b 

mp Flags ; 

(pr MsgPort) 

107 

dc.b 

mp SigBit ; 


108 

dc.l 

»mpSigTask ; 


112 

dcb.b 

mpMsgList,14 

j 


126 

dc.w 

pr Pad ; 

Füllwort 

128 

dc.l 

*pr SegList ; 

BP Zeiger auf Segmentliste 

132 

dc.l 

pr StackSize ; 

Größe des Stacks 

136 

dc.l 

pr GlobVec ; 

globaler Vektor 

140 

dc.l 

pr TaskNum ; 

Nummer des CLI-Tasks 

144 

dc.l 

pr StackBase ; 

BP obere Grenze des Stacks 

148 

dc.l 

pr Result2 ; 

zweiter Rückgabewert 

152 

dc.l 

*pr CurrentDir ; 

BP Zeiger auf Lock 

156 

dc.l 

*pr CIS ; 

BP Zeiger auf Ausgabe-FileH 

160 

dc.l 

*pr COS 

BP Zeiger auf Eingabe-FileH 

164 

dc.l 

*pr ConsoleTask ; 

Zeiger auf Console-Hd 

168 

dc.l 

*pr FileSystemTask ; 

Zeiger auf File-System-Task 

172 

dc.l 

*pr CLI 

BP Zeiger auf CLI-Struktur 

176 

dc.l 

*pr RrturnAddr ; 

Zeiger auf End-Routine 

180 

dc.l 

*pr_PktWait ; 

eigene "Wait"-Routine 

184 

dc.l 

*pr WindowPtr ; 

Zeiger auf Fenster 

188 


pr SIZEOF 
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Anhang G 


Name Bit # Bedeutung 


CTRL 

C 


12 

Ctrl-C gedrückt 

CTRL" 

"D 


13 

Ctrl-D gedrückt 

CTRL" 

"E 


14 

Ctrl-E gedrückt 

CTRL" 

"F 


15 

Ctrl-F 

gedrückt 

CLI 







00 


dc.l 

cli Result2 



Fehlernummer 

04 


dc.l 

*cli SetName 

i 


BP aktuelles Direktory 

08 


dc.l 

*cli CommandDir 

1 


BP Zeiger auf Command-Lock 

12 


dc.l 

cli ReturnCode 



FAILAT-Wert 

16 


dc.l 

*cli CommandName 


BP Name des Befehls 

20 


dc.l 

cli FailLevel 



Fehlergrenze 

24 


dc.l 

*cli Prompt 



BP Zeiger auf Prompt-Text 

28 


dc.l 

*cli Standardinput 


BP Standard-Eingabekanal 

32 


dc.l 

*cli Currentinput 


BP umgeleitete Eingabe 

36 


dc.l 

*cli CommandFile 


BP Name der Batchdatei 

40 


dc.l 

cli Interactive 


Interactive-Flag 

44 


dc.l 

cli Background 



Background-Flag 

48 


dc.l 

*cli Currentoutput 


BP umgeleitete Ausgabe 

52 


dc.l 

cli Defaultstack 


Default-Stackgröße 

56 


dc.l 

*cli Standardoutput 


BP Standard-Ausgabekanal 

60 


dc.l 

*cli Module 



BP Zeiger auf 1. Segment 

64 



cli SIZE0F 




Name 



Wert 

Bedeutung 

RETURN 

OK 

0 

kein Fehler 

RETURN 

WARN 

5 

Warnung 


RETURN 

ERROR 

10 

Fehler aufgetreten 

RETURN 

FAILT 

20 

totaler 

Fehler bzw. mehrere Fehler 

DosPacket 





00 


dc.l 

*dp Link 



Zeiger auf die Message-Struktur 

04 


dc.l 

*dp Port 



Zeiger auf ReplyPort 

08 


dc.l 

dp Type/dp Action 


Kommando 

12 


dc.l 

dp Resl/dp Status 


RUckgabewerte 

16 


dc.l 

dp Res2/dp_Status2 



20 


dc.l 

dp Arg1/dp BufAddr 

- 


24 


dc.l 

dp Arg2 




28 


dc.l 

dp Arg3 



Argumente 

32 


dc.l 

dp Arg4 




36 


dc.l 

dp_Arg5 




40 


dc.l 

dp Arg6 




44 


dc.l 

dp Arg? 




48 



dp SIZEOF 
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Datenstrukturen und Flags 


WBStartuD 



00 

ds.b 

sm Message,20 

; Message-Struktur 

20 

dc.l 

*sm Preocess 

; Zeiger auf Process-Descriptor 

24 

dc.l 

*sm Segment 

; Zeiger auf Segment-Descriptor 

28 

dc.l 

sm NumArgs 

; Anzahl der Elemente der ArgList 

32 

dc.l 

*sm ToolWindow 

; Zeiger auf Fenster-Descriptor 

36 

dc.l 

*sm ArgList 

; Zeiger auf Argumentenliste 

40 


sm SIZEOF 



G.3 Exec-Strukturen und -Flags 


G.4 Graphics-Strukturen und -Flags 
RastPort 


000 

dc.l 

*rp Layer 

004 

dc.l 

*rp BitMap 

008 

dc.l 

*rp AreaPtrn 

012 

dc.l 

*rp_TmpRas 

016 

dc.l 

*rp Areainfo 

020 

dc.l 

*rp Geisinfo 

024 

dc.b 

rp Mask 

025 

dc.b 

rp FgPen 

026 

dc.b 

rp BgPen 

027 

dc.b 

rp AOLPen 

028 

dc.b 

rp DrawMode 

029 

dc.b 

rp AreaPtSz 

030 

dc.b 

rp Dummy 

031 

dc.b 

rp linpatcnt 

032 

dc.w 

rp Flags 

034 

dc.w 

rp LinePtrn 

036 

dc.w 

rp cp x 

038 

dc.w 

r P_cp_y 

040 

ds.b 

rp minterms,8 

048 

dc.w 

rp PenWidth 

050 

dc.w 

rp PenHeight 

052 

dc.l 

*rp Font 

056 

dc.b 

rp AlgoStyle 

057 

dc.b 

rp TxFlags 

058 

dc.w 

rp TxHeight 

060 

dc.w 

rp TxWidth 

062 

dc.w 

rp TxBaseline 

064 

dc.w 

rp TxSpacing 

066 

dc.l 

*rp RP User 

070 

ds.b 

rp reserved,30 

100 


rpjlZEOF 


; Zeiger auf den Layer des Rastports 
; Zeiger auf zugehörige BitMap 
; Zeiger auf Füllmuster 
; Zeiger auf Zwischenspeicher 
; Zeiger auf Area-Struktur 
; Zeiger auf Gelslnfo-Struktur 

; Vordergrundfarbe 
; Hintergrundfarbe 
; Begrenzungsfarbe beim Füllen 
; Zeichenmodus 

; Anzahl Worte im Füllmuster 
; Nicht benutzt 

; System-Flags 
; Linienmuster 

; x-Position des Zeichencursors 
; y-Position des Zeichencursors 
; Blittermaske (Grafik-Hardware) 

; Breite des Zeichenstiftes 
; Höhe des Zeichenstiftes 
; Zeiger auf TextFont-struktur 
; Font-Stil 
; Font-Flags 
; Höhe des Fonts 
; Breite des Fonts 
; Position der Font-Grundlinie 
; Leer-Abstand der Fontzeichen 
; Zeiger auf Reply-Port 
; Reserviert für Erweiterungen 
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Anhang G 


TmpRas (Temporal Rastport) 


00 dc.l 

*tr RasPtr 


Zeiger auf den Speicherbereich 

04 dc.l 

tr Size 


Größe dieses Bereichs 

08 

tr_SIZEOF 



Areainfo 




oo dc.l 

*ai VctrTbl 


Beginn der Vektortabelle 

04 dc.l 

*ai VctrPtr 


Nächster Vektoreintrag 

08 dc.l 

*ai FlagTbl 


Beginn der Flagtabelle 

12 dc.l 

*ai FlagPtr 


Nächster Flageintrag 

16 dc.w 

ai Count 


Derzeitige Vektoreintragsnummer 

18 dc.w 

ai MaxCount 


Maximalzahl Vektoreinträge 

20 dc.w 

ai FirstX 


x-Koord. des ersten Punktes 

22 dc.w 

ai FirstY 


y-Koord. des ersten Punktes 

24 

ai_SIZE0F 



Drawmode 




Zeichenmodus 

Wert 

Bedeutung 

JAM1 

0 

Normal 


JAM2 

1 

Gelöschte Punkte in Hintergrundfarbe 

COMPLEMENT 

2 

Vorhandene Grafik NOT-verknüpfen 

INVERSVID 

4 

Zu zeichnende Grafik invertieren 

Schriftstil 




Schriftstil 

Wert 

Bedeutung 

FSF NORMAL 

0 

Kein besonderer Stil 

FSF ONDERLINED 

1 

Unterstrichen 

FSF BOLD 

2 

Fettdruck 

FSF ITALIC 

4 

Kursiv 

-(Schräg-(Druck 

FSF EXTENDED 

8 

Doppelte Breite (bei normalen Fonts nicht 



möglich) 

ViewMode 




View-Mode 

Wert 

Bedeutung 


GENLOCK VIDEO 

$0002 

Bindet eine externe Signalquelle ein 

EXTRA HALFBRITE 

$0080 

64-Farben Modus 

DUALPF 

$0400 

Dual-Playfield 

Hold-And-Modify 

$0800 

HAM-Modus (4096 Farben) 

VP HIDE 

$2000 

Kein Bild 

SPRITES 

$4000 

View mit Hardware-Sprites 

HIRES 

$0004 

Verdoppelt Auflösung in x-Richtung 

LACE 

$8000 

Verdoppelt Auflösung in y-Richtung 
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Datenstrukturen und Flags 


View 



00 

dc.l 

*v ViewPort 

04 

dc.l 

*v LOFCprList 

08 

dc.l 

*v_SHFCprList 

12 

dc.w 

v DyOffset 

14 

dc.w 

v DxOffset 

16 

dc.w 

v Modes 

18 


V_SIZEOF 

ViewPort 


00 

dc.l 

*vp Next 

04 

dc.l 

*vp ColorMap 

08 

dc.l 

*vp Dsplns 

12 

dc.l 

*vp Sprlns 

16 

dc.l 

*vp Clrlns 

20 

dc.l 

*vp UCopIns 

24 

dc.w 

vp DWidth 

26 

dc.w 

vp DHeight 

28 

dc.w 

vp DxOffset 

30 

dc.w 

vp DyOffset 

32 

dc.w 

vp Modes 

34 

dc.w 

vp_reserved 

36 

dc.l 

*vp Rasinfo 

40 


vp_SIZE0F 


ColorMao 


00 

dc.b 

cm Flags 

01 

dc.b 

cm Type 

02 

dc.w 

cm Count 

04 

dc.l 

*cm ColorTable 

08 


cm SIZEOF 

BitMai 

ß 


00 

dc.w 

bm BytesPerRow 

02 

dc.w 

bm Rows 

04 

dc.b 

bm Flags 

05 

dc.b 

bm Depth 

06 

dc.b 

bm Pad 

08 

ds.l 

*bm Planes,8 

40 


bm_SIZE0F 

Rasinfo 


00 

dc.l 

*ri_Next 

04 

dc.l 

*ri BitMap 

08 

dc.w 

riRxOffset 

10 

dc.w 

ri RyOffset 

12 


ri SIZEOF 


; Zeiger auf den ersten ViewPort 
; Zeiger auf Longframe-Copperlist 
; Zeiger auf Shortframe-Copperlist 
; y-Startkoordinate des View 
; x-Startkoordinate des View 
; Bildschirmauflösung etc. 


; Zeiger auf den nächsten ViewPort 
; Zeiger auf ColorMap-Struktur 
; Zeiger auf Display-Copperliste 
; Zeiger auf Sprite-Copperliste 
; Zeiger auf Color-Copperliste 
; Zeiger auf User-Copperliste 
; Breite des ViewPorts 
; Höhe des ViewPorts 
; x-Startkoordinate 
; y-Startkoordinate 
; Bildschirmauflösung etc. 

; Reserviert für Erweiterungen 
; Zeiger auf Rasinfo-Struktur 


; Interne Flags 
; Betriebssystemsversion 
; Anzahl der Farbeinträge 
; Zeiger auf Farbtabelle 


; Anzahl Bytes in einer Grafikzeile 
; Anzahl Zeilen in der Grafik 
; System-Flags 
; Tiefe, Anzahl Bitplanes 
; Reserviert für Erweiterungen 
; 8 Langwort-Planezeiger 


; Zeiger auf nächste Rasinfo 
; Zeiger auf Bitmap 
; x-Roordinate des Rasters 
; y-Koordinate des Rasters 
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Anhang G 


SimpleSprite 


00 

dc.l 

*ss posctldata 

Zeiger auf Grafik-Daten 

04 

dc.w 

ss height 

Höhe 

06 

dc.w 

SS X 

x-Position 

08 

dc.w 

ss_y 

y-Position 

10 

dc.w 

ss num 

Sprite-Nummer 

12 


ss SIZEOF 


Geisinfo 



00 

dc.b 

gi sprRsrvd 

Zu benutzende Hardware-Sprites 

01 

dc.b 

gi_Flags 


02 

dc.l 

*gi gelHead 

Erstes Gel 

06 

dc.l 

*gi gelTail 

Letztes Gel 

10 

dc.l 

*gi nextLine 

System-Zeiger 

14 

dc.l 

*gi lastColor 

System-Zeiger 

18 

dc.l 

*gi collHandler 

Zeiger auf Sprungtabelle für Koll 

22 

dc.w 

gi leftmost 

Linker Rand 

24 

dc.w 

gi rightmost 

Rechter Rand 

26 

dc.w 

gi topmost 

Oberer Rand 

28 

dc.w 

gi bottommost 

Unterer Rand 

30 

dc.l 

*gi firstBlissObj 


34 

dc.l 

*gi lastBlissObj 


38 


gi SIZEOF 


VSprite (für VSprites) 


00 

dc.l 

*vs NextVSprite 

Zeiger auf den nächsten VSprite 

04 

dc.l 

*vs PrevVSprite 

Zeiger auf den letzten VSprite 

08 

dc.l 

*vs DrawPath 

— 

12 

dc.l 

*vs ClearPath 

— 

16 

dc.w 

vs Oldy 

— 

18 

dc.w 

vs Oldx 

— 

20 

dc.w 

vs VSFlags 

VSprite-Flags 

22 

dc.w 

vs Y 

y-Koordinate 

24 

dc.w 

vs_X 

x-Koordinate 

26 

dc.w 

vs Height 

Höhe in Pixeln 

28 

dc.w 

vs Width 

Breite in Words (immer 1) 

30 

dc.w 

vs Depth 

Tiefe (immer 2) 

32 

dc.w 

vs MeMask 

Kollisionsmaske 1 

34 

dc.w 

vs HitMask 

Kollisionsmaske 2 

36 

dc.l 

*vs ImageData 

Zeiger auf Grafikdaten 

40 

dc.l 

*vs BorderLine 

Zeiger auf BorderLine-Wort 

44 

dc.l 

*vs CollMask 

Zeiger auf CollMask-Plane 

48 

dc.l 

*vs SprColors 

Zeiger auf Wortfeld für Farben 

52 

dc.l 

*vs Bob 

— 

56 

dc.b 

vs PlanePick 

— 

57 

dc.b 

vs PlaneOnOff 



58 vs_SIZEOF 

VSprite-Flag Wert Bedeutung 

VSF VSPRITE $001 Gesetzt für VSprite, gelöscht für Bob 
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Datenstrukturen und Flags 


VSF 

MUSTDRAW 

$008 

VSprite muß gezeichnet werden 

VSF 

GELGONE 

$400 

VSprite ragt Uber Begrenzung hinaus 

VSF 

OVERFLOW 

$800 

Zu viele VSprites in einer Zeile 

VSDrite (für Bobs) 



00 

de. 1 

*vs NextVSprite 


Zeiger auf den nächsten Bob 

04 

dc.l 

*vs PrevVSprite 


Zeiger auf den letzten Bob 

08 

dc.l 

*vs DrawPath 


Reihenfolge beim Zeichnen 

12 

dc.l 

*vs ClearPath 


Reihenfolge beim Löschen 

16 

dc.w 

vs Oldy 


Vorige y-Koordinate 

18 

dc.w 

vs Oldx 


Vorige x-Koordinate 

20 

dc.w 

vs VSFlags 


VSprite-Flags 

22 

dc.w 

vs Y 


y-Koordinate 

24 

dc.w 

vs X 


x-Koordinate 

26 

dc.w 

vs Height 


Höhe in Pixeln 

28 

dc.w 

vs Width 


Breite in Words 

30 

dc.w 

vs Depth 


Tiefe 

32 

dc.w 

vs MeMask 


Kollisionsmaske 1 

34 

dc.w 

vs HitMask 


Kollisionsmaske 2 

36 

dc.l 

*vs ImageData 


Zeiger auf Grafikdaten 

40 

dc.l 

*vs BorderLine 


Zeiger auf BorderLine-Wort 

44 

dc.l 

*vs CollMask 


Zeiger auf CollMask-Plane 

48 

dc.l 

*vs SprColors 


— 

52 

dc.l 

*vs Bob 


Zeiger auf Bob-Struktur 

56 

dc.b 

vs PlanePick 


Maske für benutze Planes 

57 

dc.b 

vs PlaneOnOff 


Plane-Maske zum Ein/Ausschalten 

58 


vs_SIZEOF 



Bob 




00 

dc.w 

bob BobFlags 


Bob-Flags 

02 

dc.l 

*bob SaveBuffer 


Speicher zur Bitmap-Sicherung 

06 

dc.l 

*bob ImageShadow 

Zeigt auf die CollMask 

10 

dc.l 

*bob Before 


Für Zeichenreihenfolge 

14 

dc.l 

*bob After 


Für Zeichenreihenfolge 

18 

dc.l 

*bob VSprite 


Zeiger zurück zu VSprite 

22 

dc.l 

*bob BobComp 


Zeiger auf AnimComp-Struktur 

26 

dc.l 

*bob DBuffer 


Zeiger für double-buffering 

30 


bobSIZEOF 



Bob-Flag 

Wert 

Bedeutung 

VSF 

VSPRITE 

$001 

Gesetzt für VSprite, gelöscht für Bob 

VSF 

SAVEBACK 

$002 

Bitmap unter Bob sichern 

VSF 

OVERLAY 

$004 

Bob-Pixel in Farbe 0 durchsichtig 

VSF 

BACKSAVED 

$100 

Bitmap unter Bob wurde gesichert 

VSF 

BOBUPDATE 

$200 

System-intern 

VSF 

GELGONE 

$400 

VSprite ragt über Begrenzung hinaus 


BF SAVEBOB 

$0001 

Hintergrund nicht restaurieren 

BF BOBISCOMP 

$0002 

Bob gehört zu einer Animation 

BF BWAITING 

$0100 

Intern 

BF BDRAWN 

$0200 

Intern 
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Anhang G 


BF_BOBSAWAY $0400 
BF_BOBNIX $0800 
BF_SAVEPRESERVE $1000 
BF OUTSTEP $2000 


Bob beim nächsten Zeichnen entfernen 

Bob wurde entfernt 

Intern 

Intern 


Gel-Kollisionen mit Rahmen 


Hit-Flag Wert Bedeutung 


TopHit 

BottomHit 

LeftHit 

RightHit 


1 Obere Begrenzung überschritten 

2 Untere Begrenzung überschritten 

4 Linke Begrenzung überschritten 

8 Rechte Begrenzung überschritten 


Graphics-Librarv-Basis 


000 

ds.b 

gb LibNode,34 

034 

dc.l 

*gb ActiView 

038 

dc.l 

*gb copinit 

042 

dc.l 

*gb cia 

046 

dc.l 

*gb blitter 

050 

dc.l 

*gb LOFlist 

054 

dc.l 

*gb SHFlist 

058 

dc.l 

*gb blthd 

062 

dc.l 

*gb blttl 

066 

dc.l 

*gb bsblthd 

070 

dc.l 

*gb bsblttl 

074 

ds.b 

gb vbsrv,22 

096 

ds.b 

gb timsrv,22 

118 

ds.b 

gb bltsrv,22 

140 

ds.b 

gb TextFonts,14 

154 

dc.l 

*gb DefaultFont 

158 

dc.w 

gb Modes 

160 

dc.b 

gb VBlank 

161 

dc.b 

gb Debug 

162 

dc.w 

gb BeamSync 

164 

dc.w 

gb System bplconO 

166 

dc.b 

gb SpriteReserved 

167 

dc.b 

gb bytereserved 

168 

dc.w 

gb Flags 

170 

dc.w 

gb BlitLock 

172 

dc.w 

gb BlitNest 

174 

ds.b 

gb BlitWaitQ,14 

188 

dc.l 

*gb BlitOwner 

192 

ds.b 

gb TOF WaitQ,14 

206 

dc.w 

gb DisplayFlags 

208 

dc.l 

*gb SimpleSprites 

212 

dc.w 

gb MaxDisplayRow 

214 

dc.w 

gb MaxDisplayColumn 

216 

dc.w 

gb NormalDisplayRow 

218 

dc.w 

gb NormalDisplayCol 

220 

dc.w 

gb NormalDPMX 

222 

dc.w 

gb NormalDPMY 

224 

dc.l 

*gb LastChanceMemory 
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Library-Struktur 

Zeiger auf aktuellen View 

Zeiger auf Copper-Startup-Liste 

intern 

intern 

Zeiger auf LOF-Copperliste 

Zeiger auf SHF-Copperliste 

intern 

intern 

intern 

intern 

Interrupt-Server für Vert. Blank 

Interrupt-Server für Timer 

Interrupt-Server für Blitter 

Listenkopf der Textfont-Liste 

Zeiger auf Standard-Font 

intern 

intern 

intern 

intern 

intern 

intern 

Füllbyte 

Library-interne Flags 

intern 

intern 

Interner Listenkopf 

Zeiger auf Blitter-Besitzertask 

Interner Listenkopf 

Darstellungsmodus 

Zeiger auf SimpleSprites 

Maximalzahl Bildschirmzeilen 

Maximalzahl Bildschirmspalten 

Standardwert Bildschirmzeilen 

Standardwert Bildschirmspalten 

intern 

intern 

Zeiger auf "Notfall-Speicher" 



Datenstrukturen und Flags 


228 

dc.l 

*gb LCMptr 

; intern 

232 

dc.w 

gb MicrosPerLine 

; intern 

234 

ds.b 

gb reserved,8 

; Für zukünftige Erweiterungen 

242 


gb_SIZEOF 



G.5 Intuition-Strukturen 

und -Flags 

NewWindow 




00 

dc.w 

nw LeftEdge 


linke Ecke 

02 

dc.w 

nwTopEdge 


obere Ecke 

04 

dc.w 

nw Width 


Breite 

06 

dc.w 

nw Height 


Höhe 

08 

dc.b 

nw DetailPenl 


Vordergrundfarbe 

09 

dc.b 

nw_BlockPen 


Hintergrundfarbe 

10 

dc.l 

nw IDCMPFlags 


IDCMP-Flags 

14 

dc.l 

nw Flag 


Flags 

18 

dc.l 

*nw FirstGadget 


Zeiger auf erstes Gadget 

22 

dc.l 

*nw CheckMark 


Grafik für Menühaken 

26 

dc.l 

*nw Title 


Name des Festers 

30 

dc.l 

*nw Screen 


Zeiger auf Screen 

34 

dc.l 

*nw BitMap 


Zeiger auf eigene BitMap 

38 

dc.w 

nw MinWidth 


X-Minimum des Fensters 

40 

dc.w 

nw_MinHeight 


Y-Minimum des Fensters 

42 

dc.w 

nw MaxWidth 


X-Maximum des Fensters 

44 

dc.w 

nw MaxHeight 


Y-Maximum des Fensters 

46 

dc.w 

nw Type 


Art des Screens, auf dem das 





Window erscheint 

48 


nw SIZEOF 



IDCMP-Flag 

Wert 

Bedeutung 

SIZEVERIFY 

$00000001 

Größe des Fensters soll verändert werden 

NEWSIZE 

$00000002 

Größe des Fensters wurde verändert 

REFRESHWINDOW 

$00000004 

Fenster wurde überlagert 

ACTIVEWINDOW 

$00040000 

Fenster wurde aktiviert 

INACTIVEWINDOW $00080000 

Fenster wurde deaktiviert 

GADGETDOWN 

$00000020 

GADGIMMADIATE-Gadget wurde gewählt 

GADGETUP 

$00000040 

RELVERIFY-Gadget wurde angewählt 

CLOSEWINDOW 

$00000200 

Close-Gadget wurde angewählt 

REQSET 


$00000080 

Erster Requester wurde geöffnet 

REQCLEAR 

$00001000 

Letzter Requester wurde geschlossen 

REQVERIFY 

$00000800 

Requester soll geöffnet werden 

MENÜPICK 

$00000100 

Menüpunkt wurde gewählt 

MENUVERIFY 

$00002000 

Menü soll gezeigt werden 

MOUSEBÜTTONS 

$00000008 

Eine Maustaste wurde gedrückt 

MOUSEMOVE 

$00000010 

Maus wurde bewegt 

DELTAMOVE 

$00100000 

Mausbewegung relativ 

INTUITICKS 

$00400000 

Jede zehntel Sekunde ein Nachricht 

NEWPREFS 

$00004000 

Preferences wurden geändert 

DISKINSERTED 

$00008000 

Diskette wurde eingelegt 

DISKREMOVED 

$00010000 

Diskette wurde entnommen 
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Anhang G 


RAWKEY 


$00000400 

Tastatureingabe mit RAW-Codes 

VANILLAKEY 

$00200000 

Eingabe mit bearbeiteten KeyCodes 

WBENCHMESSAGE 

$00020000 

Nachricht von der WBench 

LONELYMESSAGE 

$80000000 

Keine IDCMP-Nachricht 

Windowflag 

Wert 

Bedeutung 

SIZEBRIGHT 

$00000010 

Size-Gadget im rechten Rand 

SIZEBOTTOM 

$00000020 

Size-Gadget im unteren Rand 

WINDOWSIZING 

$00000001 

Gadget für Größeneinstellung 

WINDOWDRAG 

$00000002 

Fenster 

kann verschoben werden 

WINDOWDEPTH 

$00000004 

DEPTH-Gadget wird eingebunden 

WINDOWCLOSE 

$00000008 

Close-Gadget wird eingebunden 

BACKDROP 

$00000100 

Fenster 

direkt auf Screen legen 

GIMMEZEROZERO 

$00000400 

Getrennte Verwaltung Inhalt & Rand 

BORDERLESS 

$00000800 

Fenster 

ohne Ränder darstellen 

ACTIVATE 

$00001000 

Fenster 

wird beim öffnen aktiv 

REPORTMOUSE 

$00000200 

Mauskoordinaten werden gemeldet 

RMBTRAP 

$00010000 

RightMouseButtonTRAP (kein Menü) 

NOCAREREFRESH 

$00020000 

Keine Meldung wenn Fenster beschädigt 

SIMPLE 

REFRESH 

$00000040 

Fensterinhalt wird nicht erneuert 

SMART 

REFRESH 

$00000000 

verdeckte Bereiche sichern 

SUPER 

BITMAP 

$00000080 

Restauration aus eigener BitMap möglich 

Window 




000 

dc.l 

*wd NextWindow 


Zeiger auf nächstes Window 

004 

dc.w 

wd LeftEdge 


linke Ecke 

006 

dc.w 

wd TopEdge 


obere Ecke 

008 

dc.w 

wd Width 


Breite 

010 

dc.w 

wd Height 


Höhe 

012 

dc.w 

wd MouseY 


Y-Mauskoordinate 

014 

dc.w 

wd MouseX 


X-Mauskoordinate 

016 

dc.w 

wd MinWidth 


minimale Breite 

018 

dc.w 

wd MinHeight 


minimale Höhe 

020 

dc.w 

wd MaxWidth 


maximale Breite 

022 

dc.w 

wd MaxHeight 


maximale Höhe 

024 

dc.l 

wd Flags 


Window-Flags 

028 

dc.l 

*wd MenuStrip 


Zeiger auf Menü-Struktur 

032 

dc.b 

*wd Title 


Zeiger auf Titelzeile 

036 

dc.l 

*wd FirstRequester 

Zeiger auf ersten Requester 

040 

dc.l 

*wd DMRequest 


Zeiger auf Double-Menu-Req. 

044 

dc.w 

wd ReqCount 


Zähler der Requester 

046 

dc.l 

*wd WScreen 


Zeiger auf Screen 

050 

dc.l 

*wd RPort 


Zeiger auf RastPort 

054 

dc.b 

wd BorderLeft 



055 

dc.b 

wd BorderTop 



056 

dc.b 

wd BorderRight 


057 

dc.b 

wd BorderBottom 


058 

dc.l 

*wd BorderRPort 

Zeiger auf Border RastPort 

062 

dc.l 

*wd FirstGadget 

Zeiger auf erstes Gadget 

066 

dc.l 

*wd Parent 


vorhergehendes Fenster 

070 

dc.l 

*wd Descendant 


nachfolgendes Fenster 

074 

dc.w 

*wd Pointer 


Zeiger auf Mausdaten 

078 

dc.b 

wd PtrHeight 


Höhe des Mauszeigers 
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079 

dc.b 

wd PtrWidth ; 

Breite des Mauszeigers 

080 

dc.b 

wd XOffset ; 

X-Koordinate des HOTSPOT 

081 

dc.b 

wd YOffset ; 

Y-Koordinate des HOTSPOT 

082 

dc.l 

wd_IDCMPFlag ; 

IDCMP-Flags 

086 

dc.l 

*wd UserPort ; 

Zeiger 

auf UserPort 

090 

dc.l 

*wd WindowPort ; 

Zeiger 

auf WindowPort 

094 

dc.l 

*wd MessageKey ; 

Zeiger auf MessageKey 

098 

dc.b 

wd DetailPen ; 

Farbe für Vordergrund 

099 

dc.b 

wd BlockPen ; 

Farbe für Hintergrund 

100 

dc.l 

*wd_CheckMark ; 

Zeiger auf Grafikdaten 

104 

dc.b 

*wd ScreenTitle ; 

Zeiger 

auf Screentitel 

108 

dc.w 

wd GZZMouseX ; 

Mauskoordinaten für GZZ 

110 

dc.w 

wd_GZZMouseY ; 



112 

dc.w 

wd GZZWidth ; 



114 

dc.w 

wd GZZHeight ; 



116 

dc.b 

*wd ExtData ; 

Zeiger 

auf externe Daten 

120 

dc.b 

*wd UserData ; 

Zeiger auf eigene Daten 

124 

dc.l 

*wd WLayer ; 

Zeiger auf Window-Layer 

128 

dc.l 

*wd IFont ; 

Zeiger 

auf TextFontStruktur 

132 


wd SIZEOF 



Intui 

-Message 



00 

dc.l 

*ln Succ ;■ 

.. 


04 

dc.l 

*ln Pred ; 



08 

dc.b 

ln Type ; 

Node 


09 

dc.b 

ln Pri ; 


Message 

10 

dc.l 

*ln Name ;■ 



14 

dc.l 

*mn ReplyPort ; 



18 

dc.w 

mn Length ; 

■ 


20 

dc.l 

im Class ; 

IDCMP-Flag der Nachricht 

24 

dc.w 

im Code ; 

Nachrichten-abhängige Daten 

26 

dc.w 

im Qualifier ; 



28 

dc.l 

im IAddress ; 

Zeiger auf den Auslöser 

32 

dc.w 

im MouseX ; 

Mauskoordinate (X) 

34 

dc.w 

im MouseY ; 

Mauskoordinate (Y) 

36 

dc.l 

im Seconds ; 

Sekunden 

40 

dc.l 

im Micros ; 

Mikros 


44 

dc.l 

*im IDCMPWindow ; 

Zeiger auf Fenster 

48 

dc.l 

*im_SpecialLink ; 

Systemspezifisch 

52 


im SIZEOF 



NewScreen 




00 

dc.w 

ns LeftEdge ; 

X-Koordinate des Screens 

02 

dc.w 

ns TopEdge ; 

Y-Koordinate des Screens 

04 

dc.w 

ns Width ; 

Breite 


06 

dc.w 

ns Height ; 

Höhe 


08 

dc.w 

ns Depth ; 

Anzahl 

BitPlanes 

10 

dc.b 

ns DetailPen ; 

Farben 

für den Vordergrund 

11 

dc.b 

ns BlockPen ; 

und den Hintergrund 

12 

dc.w 

ns_ViewModes ; 

Auflösung 

14 

dc.w 

ns Type ; 

Screen-Typ 

16 

dc.l 

*ns Font ; 

TextAttr-Struktur 
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20 

dc.l 

*ns DefaultTitle 

; Zeiger auf Titelzeile 

24 

de. 1 

*ns Gadgets 

; Custom-Gadgets 

28 

dc.l 

*ns CustomBitMap 

; eigene BitMap-Struktur 

32 


ns SIZEOF 



Screentyp 


Wert 

Bedeutung 

WBENCHSCREEN 


$0001 

Screen 

ist der WBench-Screen 

CUSTOMSCREEN 


S000F 

Screen 

ist Custom-Screen 

CUSTOMBITMAP 


$0040 

Keine BitMap erstellen 

SCREENBEHIND 


$0080 

Screen 

im Hintergurnd öffnen 

SCREENQUIET 


$0100 

System-Gadgets/Titelzeile abschalten 

SHOWTITLE 


$0010 

Intuition-intern 

BEEPING 


$0020 

Intuition-intern 

View-Mode 


Wert 

Bedeutung 

GENLOCK VIDEO 


$0002 

Bindet 

eine externe Signalquelle ein 

EXTRA 

HALFBRITE 

$0080 

64-Farben Modus 

DUALPF 


$0400 

Dual-Playfield 

Hold- 

And-Modify 

$0800 

HAM-Modus (4096 Farben) 

VP HIDE 


$2000 

Kein Bild 

SPRITES 


$4000 

Screen mit Hardware-Sprites 

HIRES 



$0004 

Verdoppelt Auflösung in X-Richtung 

LACE 



$8000 

Verdoppelt Auflösung in Y-Richtung 

Screen 





000 

dc.l 

*sc 

NextScreen 


Zeiger auf nächsten Screen 

004 

dc.l 

*sc 

’FirstWindow 


Zeiger auf erstes Window 

008 

dc.w 

sc LeftEdge 


linke Ecke 

010 

dc.w 

SC 

TopEdge 


rechte Ecke 

012 

dc.w 

sc 

"width 


Breite 

014 

dc.w 

sc" 

"Height 


Höhe 

016 

dc.w 

sc" 

MouseY 


Y-Mauskoordinaten 

018 

dc.w 

sc" 

"MouseX 


X-Mauskoordinaten 

020 

dc.w 

sc" 

"Flags 


Screen-Flags 

022 

dc.l 

*sc" 

"Title 


Zeiger auf Titelstring 

026 

dc.l 

*sc" 

"DefaultTitle 

Default-Titelstring 

030 

dc.b 

sc] 

"BarHeight 


Höhe der Titelleiste 

031 

dc.b 

sc] 

BarVBorder 


vertikaler Rand 

032 

dc.b 

sc] 

BarHBorder 


horizontaler Rand 

033 

dc.b 

sc] 

MenuVBorder 


vertikaler Rand (Menü) 

034 

dc.b 

sc" 

"MenuHBorder 


horizontaler Rand (Menü) 

035 

dc.b 

sc WBorTop 


Breite, Window-Rand oben 

036 

dc.b 

sc] 

"WBorLeft 


Breite, Window-Rand links 

037 

dc.b 

sc" 

"WBorRight 


Breite, Window-Rand rechts 

038 

dc.b 

sc 

"WBorBottom 


Breite, Window-Rand unten 

039 

dc.b 

sc" 

KludgeFillOO 

Füllbyte 

040 

dc.l 

*sc" 

Font 


TextAttr-Struktur 

044 

ds.b 

sc] 

ViewPort,40 


ViewPort-Struktur 

084 

ds.b 

sc 

RastPort,100 

RastPort-Struktur 

184 

ds.b 

sc BitMap,40 


BitMap-Struktur 

224 

ds.b 

sc 

LayerInfo,92 

Layer Inf o-Struktur 

316 

dc.l 

*sc FirstGadget 


Zeiger auf erstes Gadget 
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320 

dc.b 

sc DetailPen 

; Farbtab.nr. für Vordergrund 

321 

dc.b 

sc BlockPen 

; Farbtab.nr. für Hintergrund 

322 

dc.w 

sc SaveColorO 

; BEEPING SaveMem 

324 

dc.l 

*sc BarLayer 

; Zeiger auf Layer 

328 

dc.l 

*sc ExtData 

; Zeiger auf externe Daten 

332 

dc.l 

*sc UserData 

; Zeiger für UserDaten 

336 


sc SIZEOF 


IntuiText 



00 

dc.b 

it FrontPen 

; Farben 

01 

dc.b 

it BackPen 

} 

02 

dc.b 

it DrawMode 

; Zeichenmodus 

03 

dc.b 

it RludgeFillOO ; Füllbyte 

04 

dc.w 

it LeftEdge 

; relative X-Koordinate 

06 

dc.w 

it TopEdge 

; relative Y-Koordinate 

08 

dc.l 

*it ITextFont 

; TextAttr-Struktur 

12 

dc.l 

*it IText 

; Zeiger auf Zeichenkette 

16 

dc.l 

*it NextlText 

; nächste intuiText-Struktur 

20 


it_SIZEOF 


Zeichenmodus 

Wert 

Bedeutung 

JAM1 


0 

Normal 

JAM2 


1 

Gelöschte Punkte in Hintergrundfarbe 

COMPLEMENT 

2 

Vorhandene Grafik NOT-verknüpfen 

INVERSVID 

4 

Zu zeichnende Grafik invertieren 


Border 



00 

dc.w 

bd LeftEdge 

X-Koordinate 

02 

dc.w 

bd TopEdge 

Y-Koordinate 

04 

dc.b 

bd FrontPen 

Vordergrund 

05 

dc.b 

bd BackPen 

Hintergrund 

06 

dc.b 

bd DrawMode 

Zeichenmodus 

07 

dc.b 

bd Count 

Anzahl der XY-Paare 

08 

dc.l 

*bd XY 

Zeiger auf XY-Paare 

12 

16 

dc.l 

*bd NextBorder 
bd SIZEOF 

Zeiger auf nächsten Border 

Imaae 

00 

dc.w 

ig LeftEdge 

X-Koordinate 

02 

dc.w 

ig TopEdge 

Y-Koordinate 

04 

dc.w 

ig Width 

Breite des Images 

06 

dc.w 

ig Height 

Höhe des Images 

08 

dc.w 

ig Depth 

Tiefe (Anzahl der BitMaps) 

10 

dc.l 

*ig ImageData 

Zeiger auf ImageData 

14 

dc.b 

ig_PlanePick 

PlanePick-Daten 

15 

dc.b 

ig PlaneOnOff 

PlaneOnOff-Daten 

16 

20 

dc.l 

*ig NextImage 
ig_SIZEOF 

Zeiger auf nächstes Image 
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Gadaet 




00 dc.l 

*gg NextGadget 


Zeiger auf nächstes Gadget 

04 dc.w 

gg LeftEdge 


X-Position 

06 dc.w 

gg TopEdge 


Y-Position 

08 dc.w 

gg Width 


Breite des Gadgets 

10 dc.w 

gg Height 


Höhe des Gadgets 

12 dc.w 

gg Flags 


Gadget-Flags 

14 dc.w 

gg Activation 


Activation-Flags 

16 dc.w 

gg GadgetType 


Gadgettyp 

18 dc.l 

*gg GadgetRender 

"normale" Datenstruktur 

22 dc.l 

*gg SelectRender 

"aktivierte" Datenstruktur 

26 dc.l 

*gg GadgetText 


Zeiger auf IntuiText 

30 dc.l 

gg MutualExclude 

MutualExclude-Daten 

34 dc.l 

gg Speciallnfo 


Speciallnfo 

38 dc.w 

gg GadgetID 


Gadgetidentifikationsnummer 

40 dc.l 

gg User 


User-Daten 

44 

gg SIZEOF 



Gadget-Flag 

Wert 

Bedeutung 

GADGHCOMP 

$0003 

Hit-Box bei Aktivierung invertieren 

GADGHBOX 

$0001 

Hit-Box wird umrandet 

GADGHIMAGE 

$0002 

SelectRender-Grafik wird angezeigt 

GADGHNONE 

$0003 

keine 

leaktion 

GRELBOTTOM 

$0008 

Y-Position relativ zum Boden 

GRELRIGHT 

$0010 

X-Position relativ zur rechten Seite 

GRELWIDTH 

$0020 

Breite proportional zum Fenster 

GRELHEIGHT 

$0040 

Höhe proportional zum Fenster 

SELECTED 

$0080 

Gadget aktiviert 

GADGDISABLED 

$0100 

Gadget nicht auswählbar 

GADGIMAGE 

$0004 

GadgetRender und SelectRender sind 



Zeiger auf Image-Strukturen 

Activation-Flag Wert 

Bedeutung 

TOGGLESELECT 

$0100 

Schalter-Gadget statt Taster-Gadget 

RELVERIFY 

$0001 

Taste wurde über Gadget losgelassen 

GADGIMMEDIATE 

$0002 

Gadget wird direkt aktiviert 

RIGHTBORDER 

$0010 

Gadget 

in rechten Rand des Fensters 

LEFTBORDER 

$0020 

Gadget in linken Rand des Fensters 

TOPBORDER 

$0040 

Gadget in oberen Rand des Fensters 

BOTTOMBORDER 

$0080 

Gadget in unteren Rand des Fensters 

STRINGCENTER 

$0200 

Zeichenkette zentrieren 

STRINGRIGHT 

$0400 

Zeichenkette rechtsbündig 

LONGINT 

$0800 

String-Gadget zu Integer-Gadget 

ALTKEYMAP 

$1000 

Tastaturtabelle auf Eingabe anwenden 

BOOLEXTEND 

$2000 

Zusatzstruktur für Boolean-Gadgets 

ENDGADGET 

$0004 

ENDGADGET des Requesters 

FOLLOWMOUSE 

$0008 

Mausposition wird gemeldet 

Gadgettyp-Flag Wert 

Bedeutung 

B00LGADGET 

$0001 

Boolean-Gadget 

GADGET0002 

$0002 

(noch nicht benutzt) 

PROPGADGET 

$0003 

Proportional-Gadget 
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STRGADGET 

$0004 

String-Gadget 

SYSGADGET 

$8000 

System-Gadgets 

SCRGADGET 

$4000 

Screen-Gadget 

GZZGADGET 

$2000 

Gadget für GZZ-Window 

REQGADGET 

$1000 

Reguester-Gadget 

SIZING 


$0010 

Size-Gadget 

WDRAGGING 

$0020 

Gadget für Window Verschiebung 

SDRAGGING 

$0030 

Gadget für Screen Verschiebung 

WDOWNBACK 

$0060 

Gadget WindowToBack 

SDOWNBACK 

$0070 

Gadget ScreenToBack 

WUPFRONT 

$0040 

Gadget WindowToFront 

SUPFRONT 

$0050 

Gadget ScreenToFront 

CLOSE 


$0080 

Close-Gadget 

Strinalnfo 




00 

dc.l 

*si Buffer 


Zeiger auf Text-Puffer 

04 

dc.l 

*si UndoBuffer 


Zeiger auf Undo-Puffer 

08 

dc.w 

si BufferPos 


Position im Puffer 

10 

dc.w 

si MaxChars 


maximale Anzahl Zeichen 

12 

dc.w 

si DispPos 


Pos. des ersten Zeichens 

14 

dc.w 

si UndoPos 


Position im Undo-Puffer 

16 

dc.w 

si NumChars 


Anzahl Zeichen im Puffer 

18 

dc.w 

si DispCount 


Ausgabeposition 

20 

dc.w 

si CLeft 


relative X-Position zum Win 

22 

dc.w 

si CTop 


relative Y-Position zum Win 

24 

dc.l 

*si~LayerPtr 


Zeiger auf Layer 

28 

dc.l 

si Longlnt 


Zahlernwert der Eingabe 

32 

dc.l 

*si AltKeyMap 


eigene Tastaturtabelle 

36 


si SIZEOF 



ProDlnfo 




00 

dc.w 

pi Flags 


Flags 

02 

dc.w 

pi HorizPot 


X-Position des Schalters 

04 

dc.w 

pi VertPot 


Y-Position des Schalters 

06 

dc.w 

pi HorizBody 


X-Größe des Schalters 

08 

dc.w 

pi_VertBody 


Y-Größe des Schalters 

10 

dc.w 

pi CWidth 


Breite des Gadgets 

12 

dc.w 

pi CHeight 


Höhe des Gadgets 

14 

dc.w 

pi HPotRes 


Schrittweite in X-Richtung 

16 

dc.w 

pi VPotRes 


Schrittweite in Y-Richtung 

18 

dc.w 

pi LeftBorder 


Position des Rahmens (X) 

20 

dc.w 

pi TopBorder 


Position des Rahmens (Y) 

22 


pi_SIZE0F 



Prop-Flags 

Wert 

Bedeutung 

FREEHORIZ 

$0002 

horizontale Bewegungen erlauben 

FREEVERT 

$0004 

vertikale Bewegungen erlauben 

AUTOKNOB 

$0001 

Schieber wird von Intuition erstellt 

PROPBORDERLESS 

$0008 

keinen Rahmen um das Gadget zeichnen 

KNOBHIT 

$0100 

Schieber ist betätigt worden 
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Menu 





00 

dc.l 

*mu NextMenu 


Zeiger auf nächstes Menü 

04 

dc.w 

mu LeftEdge 


X-Position 

06 

dc.w 

mu TopEdge 


Y-Position 

08 

dc.w 

mu Width 


Breite des Menüs 

10 

dc.w 

mu Height 


Höhe des Menüs 

12 

dc.w 

mu Flags 


Flags 

14 

dc.l 

*mu MenuName 


Zeiger auf Menüname 

18 

dc.l 

*mu Firstitem 


Zeiger auf ersten Menupunkt 

22 

dc.w 

mu JazzX 


private Variablen Intuition 

24 

dc.w 

mu JazzY 


private Variablen Intuition 

26 

dc.w 

mu BeatX 


private Variablen Intuition 

28 

dc.w 

mu BeatY 


private Variablen Intuition 

30 


mu SIZEOF 



Menü-Flags 

Wert 

Bedeutung 

MENUENABLED 

$0001 

Menüpunkt ist nicht anwählbar 

MIDDRAWN 

$0100 

Menüpunkt wird gerade angezeigt 

Menultem 




00 

dc.l 

*mi Nextltem 


nächste Menuitem-Struktur 

04 

dc.w 

mi LeftEdge 


X-Koordinate des Punktes 

06 

dc.w 

mi TopEdge 


Y-Koordinate des Punktes 

08 

dc.w 

mi Width 


Breite des Menüpunktes 

10 

dc.w 

mi Height 


Höhe des Menüpunktes 

12 

dc.w 

mi Flags 


Flags des Menüpunktes 

14 

dc.l 

mi MutualExclude 

MutualExclude-Daten 

18 

dc.l 

mi ItemFill 


Grafikdaten "normal" 

22 

dc.l 

mi SelectFill 


Grafikdaten "aktiviert" 

26 

dc.b 

mi Command 


Tastaturcode 

27 

dc.b 

mi KludgeFillOO 

Füllbyte 

28 

dc.l 

*mi Subitem 


Zeiger auf Untermenü 

32 

dc.l 

mi NextSelect 


Nächster ausgewählter Menüpunkt 

36 


mi_SIZE0F 



Menuitem-Flag 

Wert 

Bedeutung 


CHECKIT 

$0001 

Menüpunkt abhaken 

ITEMTEXT 

$0002 

IntuiText-Strukturen werden verwendet 

COMMSEQ 

$0004 

Menü kann durch Tasten angewählt werden 

MENUTOGGLE 

$0008 

der Zustand wird umgedreht 

ITEMENABLED 

$0010 

Menü ist wählbar 

HIGHIMGE 

$0000 

bei Aktivierung neues Image anzeigen 

HIGHCOMP 

$0040 

bei Aktivierung Bereich invertieren 

HIGHBOX 

$0080 

bei Aktivierung Bereich umranden 

HIGHNONE 

$00C0 

bei Aktivierung passiert nichts 

HIGHITEM 

$2000 

Menüpunkt ist gerade aktiviert 

CHECKED 

$0100 

Menüpunkt ist gewählt 

ISDRAWN 

$1000 

Menüpunkt wird dargestellt 

MENUTOGGLED 

$4000 

Menüpunkt wurde schon umgedreht 
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Reep 

uester 




000 

dc.l 

*rg OlderRequest 

Zeiger auf Requester 

004 

dc.w 

rg_LeftEdge 


X-Position 

006 

dc.w 

rq TopEdge 


Y-Position 

008 

dc.w 

rq Width 


Breite 

010 

dc.w 

rq Height 


Höhe 

012 

dc.w 

rq RelLeft 


Maus, relative X-Position 

014 

dc.w 

rq Re1Top 


Maus, relative Y-Position 

016 

dc.l 

*rq ReqGadget 


Zeiger auf das erste Gadget 

020 

dc.l 

*rq ReqBorder 


Zeiger auf einen Border 

024 

dc.l 

*rq_ReqText 


Zeiger auf einen Text 

028 

dc.w 

rq Flags 


Flags 

030 

dc.b 

rq BackFill 


Färb.Nr. des Hintergrundes 

031 

dc.b 

rq KludgeFillOO 

Füllbyte 

032 

dc.l 

*rq ReqLayer 


Zeiger auf Layer-Struktur 

036 

ds.b 

rq ReqPadl,32 


Reservierter Bereich 

068 

dc.l 

*rq ImageBMap 


Zeiger auf eigenen BitMap 

072 

dc.l 

*rq RWindow 


Zeiger auf das Req.-Fenster 

076 

ds.b 

rq_ReqPad2,36 


Reservierter Bereich 

112 


rq_SIZEOF 



Reguester-Flag 

Wert 

Bedeutung 

POINTREL 

$0001 

Position ist relativ zur Maus 

PREDRAWN 

$0002 

Eigene BitMap einbinden 

NOISYREQ 

$0004 



REQOFFW1NDOW 

$1000 

Requester außerhalb des Fensters 

REQACTIVE 

$2000 

Requester aktiviert 

SYSREQUEST 

$4000 

Requester ist ein System-Requester 

DEFERREFRESH 

$8000 

Refreshmodus wird gestoppt 


Intuition-Librarv-Basis 


000 dc.l *ln_Succ 

004 dc.l *ln_Pred 

008 dc.b lnJType 

009 dc.b ln_Pri 

010 dc.l *ln_Name 

014 dc.w lib_Flags 

016 dc.w lib_NegSize 

018 dc.w lib_PosSize 

020 dc.w libVersion 

022 dc.w lib_Revison 

024 dc.l *lib_idstring 

028 dc.l lib_Sum 

032 dc.w lib_OpenCnt 

034 dc.l *ib_ViewPort 

038 dc.l *ib_LOFCprList 

042 dc.l *ib_SHFCprList 

046 dc.w ibDyOffset 

048 dc.w ib_DxOffset 

050 dc.w ibModes 

052 dc.l *ib_ActiveWindow 

056 dc.l *ib ActiveScreen 


Node 


Library-Struktur 


Erster Viewport 
Haupt-Copperliste 
Interlace-Zweitcopperliste 
y-Offset des Intui-View 
x-Offset des Intui-View 
Erlaubte Viewmodes 
aktives Fenster 
aktiver Screen 
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060 

dc.l 

*ib FirstScreen 

; erster Screen 

064 

dc.l 

ib Flags 

; Y-Mausposition 

068 

dc.w 

ib MouseY 

070 

dc.w 

ib MouseX 

; X-Mausposition 

072 

dc.l 

ib Seconds 

; Systemzeit 

076 

dc.l 

ib Micros 



; Der Datenteil der Intuition-Library ist zwar an dieser Stelle 
; noch nicht beendet, doch sind die Werte, die jetzt folgen, 

; nicht festgelegt. 


G.6 Device-Strukturen und -Flags 


G.6.1 Trackdisk-Device 


T OStdRea 

00 

ds.b 

20 

dc.l 

24 

dc.l 

28 

dc.w 

30 

dc.b 

31 

dc.b 

32 

dc.l 

36 

dc.l 

40 

dc.l 

44 

dc.l 

48 



io_Message,20 
*io_Device 
*io_Unit 
io_Command 
io_Flags 
io_Error 
io_Actual 
io_Length 
*io_Data 
io_0ffset 
io SIZEOF 


Zugehörige Message-Struktur 

Zeiger auf Device 

Zeiger auf Unit 

Trackdisk-Kommando 

Flags 

Eventueller Fehler 

Diverse Rückgabewerte 

Anzahl der zu übertragenden Bytes 

Zeiger auf Daten im Speicher 

Offsetwert für Device 


TDD-Kommando Wert Bedeutung 


CMD RESET 

1 

CMD READ 

2 

CMD WRITE 

3 

CMD UPDATE 

4 

CMD CLEAR 

5 

CMD STOP 

6 

CMD START 

7 

CMD FLUSH 

8 

TD MOTOR 

9 

TD SEEK 

10 

TD FORMAT 

11 

TD REMOVE 

12 

TD CHANGENUM 

13 

TD CHANGESTATE 

14 

TD PROTSTATUS 

15 

TD RAWREAD 

16 

TD RAWWRITE 

17 

TD GETDRIVETYPE 

18 

TD GETNUMTRACKS 

19 


Device zurücksetzen 
Lese Daten von Diskette 
Schreibe Daten auf Diskette 
Entleere Datenpuffer auf Disk 
Lösche Datenpuffer ohne Rückschreiben 
Device in Wartezustand bis 'Start' 

Device reaktivieren nach 'Stop' 

Alle iO-Koitimandos abbrechen 
Laufwerksmotor ein- und ausschalten 
Schreib/Lesekopf auf Spur positionieren 
Spuren formatieren 

Fehlerhafte Funktion (siehe weiter unten)! 
Anzahl Diskwechsei feststellen 
Test, ob Disk im Laufwerk 
Test, ob Disk schreibgeschützt 
Lesen ohne anschließende Dekodierung 
Schreiben ohne vorhergehende Kodierung 
Laufwerkstyp ermitteln 
Maximalzahl Tracks ermitteln 
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TD ADDCHANGEINT 

20 

Diskwechsel-Interrupt einbinden 

TD_REMCHANGEINT 

21 

Diskwechsel-Interrupt entfernen 

TDD-Flag 

Wert 

Bedeutung 

TD ALLOW NON 3 5 

1 

Zulassung von nicht-3 1/2 Zoll-Laufw. 

IOTD INDEXSYNC 

16 

Indexlock-Synchronisation einschalten 

IOTD_WORDSYNC 

32 

$4489-Wortsynchronisation einschalten 

TDD-Fehler 

Wert 

Bedeutung 


TDERR_NotSpecified 20 
TDERRNoSecHdr 21 
TDERRBadSecPreamble 22 
TDERR_BadSecID 23 
TDERR_BadHdrSum 24 
TDERR_BadSecSum 25 
TDERR_TooEewSecs 26 
TDERR_BadSecHdr 27 
TDERR_WriteProt 28 
TDERR_DiskChanged 29 
TDERR_SeekError 30 
TDERR_NoMem 31 
TDERR_BadUnitNum 32 
TDERR_BadDriveType 33 
TDERR_DrivelnUse 34 
TDERR PostReset 35 


Allgemeiner Fehler beim Hardware-Zugriff 

Kein Sektorheader gefunden 

Fehlerhafter Sektorvorspann 

Fehlerhafte Sektorkennmarke 

Sektorheader-Checksumme falsch 

Checksumme über Blockdaten falsch 

Zu wenige Sektoren in einem Track 

Sektorheader fehlerhaft 

Schreibversuch auf schreibgeschützte Disk 

Keine Disk im Laufwerk 

Spur 0 kann nicht gefunden werden 

Zu wenig Speicherplatz für Diskoperation 

Gewünschte Unitnummer nicht vorhanden 

Laufwerkstyp wird vom TDD nicht unterstützt 

Laufwerk wird schon benutzt 

Device in Reset-Phase 


Laufwerkstyp Wert 


Bedeutung 


DRIVE3_5 1 Normales 3 1/5 Zoll-Laufwerk 

DRIVE5_25 2 5 1/4 Zoll-Laufwerk 


Extended Commands 


Kommando 

Nummer 

Kommando 

Nummer 

ETD READ 

32770 

ETD WRITE 

32771 

ETD UPDATE 

32772 

ETD CLEAR 

32773 

ETD MOTOR 

32777 

ETD SEEK 

32778 

ETD FORMAT 

32779 

ETD RAWREAD 

32784 

ETD RAWWRITE 

32785 




IOExtTD 


00 

ds.b 

iotd I0StdReq,48 

48 

dc.l 

iotd Count 

52 

dc.l 

*iotd SecLabel 

56 


iotd SIZEOF 


; IOStdReq-Struktur (wie gewöhnlich) 
; Zähler für Diskwechsel 
; 16-Byte-Datenpuffer (siehe unten) 
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TDD-Dnit 


00 

ds.b 

tdu MsgPort,34 

34 

dc.b 

tdu Flags 

35 

dc.b 

tdu Pad 

36 

dc.w 

tdu OpenCnt 

38 

dc.w 

tdu CompOlTrack 

40 

dc.w 

tdu ComplOTrack 

42 

dc.w 

tdu CompllTrack 

44 

dc.l 

tdu StepDelay 

48 

dc.l 

tdu SettleDelay 

52 

dc.b 

tdu RetryCnt 

53 


tdu SIZEOF 


Allgemeine 

Unit-Struktur 

Track für erste Precompensation 
Track für zweite Precompensation 
Track für dritte Precompensation 
Verzögerungszeit beim Steppen 
Verzögerungszeit nach dem Steppen 
Wiederholversuche bei Fehlern 


G.6.2 Printer-Device 


IOStdRea für Printer 


00 

ds.b 

io Message 

20 

dc.l 

*io Device 

24 

dc.l 

*io Unit 

28 

dc.w 

io Command 

30 

dc.b 

io Flags 

31 

dc.b 

io Error 

32 

dc.l 

io Actual 

36 

dc.l 

io Length 

40 

dc.l 

*io Data 

44 

dc.l 

io Offset 

48 


io SIZEOF 


Zugehörige Message-Struktur 
Zeiger auf Device 
Zeiger auf Unit 
Printer-Kommando 
nicht benutzt 
Eventueller Fehler 
nicht benutzt 

Anzahl der zu übertr. Zeichen 
Zeiger auf Daten im Speicher 
nicht benutzt 


Printer-Kommando Wert 


Bedeutung 


CMD WRITE 

3 

Normalen Text ausdrucken 

PRD RAWWRITE 

9 

Nicht-vorbehandelten Text ausdrucken 

PRD PRTCOMMAND 

10 

Standard-Druckerkommando senden 

PRD DUMPRPORT 

11 

Hardcopy eines Rastports ausdrucken 

Printer-Fehler 

Wert 

Bedeutung 

PDERR CANCEL 

1 

Drucker nicht druckbereit 

PDERR NOTGRAPHICS 

2 

Drucker kann keine Grafik drucken 

PDERR INVERTHAM 

3 

HAM-Grafik kann nicht invertiert werden 


PDERR_BADDIMENSION 4 
PDERR_DIMENSIONOVFLOW 5 
PDERR_INTERNALMEMORY 6 
PDERR BUFFERMEMORY 7 


Druck-Grafikgröße zu hoch 

Kein Speicher für interne Variablen 

Kein Speicher für Druckpuffer 


IOPrtCmdReo (Printer Command Request) 


00 

ds.b 

iopcr IORequest,32 

32 

dc.w 

iopcr PrtCommand 

34 

dc.b 

iopcr_Parm0 

35 

dc.b 

iopcr Parml 
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Eine IORequest-Struktur 

Steuerkommando 

Erster Parameter (falls nötig) 
Zweiter Parameter (falls nötig) 
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36 dc.b iopcr_Parm2 ; Dritter Parameter (nicht benutzt) 

37 dc.b iopcr_Parm3 ; vierter Parameter (nicht benutzt) 

38 iopcr_SIZEOF 

Kommando Wert ESC-Sequenz Bedeutung 


aRIS 

0 

ESCc 

aRIN 

1 

ESCf 1 

alND 

2 

ESCD 

aNEL 

3 

ESCE 

aRI 

4 

ESCM 

aSGRO 

5 

ESC[0m 

aSGR3 

6 

ESC[3m 

aSGR23 

7 

ESC[23m 

aSGR4 

8 

ESC[4m 

aSGR24 

9 

ESC[24m 

aSGRl 

10 

ESC[lm 

aSGR22 

11 

ESC[lim 

aSFC 

12 

ESC[3nm 

aSBC 

13 

ESC[4nm 

aSHORPO 

14 

ESC[Ow 

aSHORP2 

15 

ESC[2w 

aSHORPl 

16 

ESC[lw 

aSH0RP4 

17 

ESC[4w 

aSHORP3 

18 

ESC[3w 

aSH0RP6 

19 

ESC[6w 

aSHORT5 

20 

ESC[5w 

aDEN6 

21 

ESC[6"z 

aDEN5 

22 

ESC[5"z 

aDEN4 

23 

ESC[4"z 

aDEN3 

24 

ESC[3"z 

aDEN2 

25 

ESC[2"z 

aDENl 

26 

ESCfl"z 

aSUS2 

27 

ESC[2v 

aSUSl 

28 

ESC[lv 

aSUS4 

29 

ESC[4v 

aSUS3 

30 

ESC[3v 

aSUSO 

31 

ESC[Ov 

aPLU 

32 

ESCL 

aPLD 

33 

ESCK 

aFNTO 

34 

ESC(B 

aFNTl 

35 

ESC(R 

aFNT2 

36 

ESC(K 

aFNT3 

37 

ESC (A 

aFNT4 

38 

ESC(E 

aFNT5 

39 

ESC(H 

aFNT6 

40 

ESC( Y 

aFNT7 

41 

ESC(Z 

aFNT8 

42 

ESC(J 

aFNT9 

43 

ESC (6 

aFNTIO 

44 

ESC(C 

aPR0P2 

45 

ESC[2p 

aPROPl 

46 

ESC[lp 

aPROPO 

47 

ESC[Op 

aTSS 

48 

ESC[n E 

aJFY5 

49 

ESC[5 F 


Drucker-Reset ausführen 
Drucker initialisieren 
Zeilenvorschub 

Wagenrücklauf + Zeilenvorschub 
Zeile nach oben 
Standard-Zeichensatz 
Kursivschrift ein 
Kursivschrift aus 
Unterstrichen ein 
Unterstrichen aus 
Fettdruck ein 
Fettdruck aus 

Vordergrundfarbe n (0-9) einstellen 

Hintergrundfarbe n (0-9) einstellen 

Normale Druckbreite 

Elite-Druckdichte ein 

Elite-Druckdichte aus 

Schmalschrift ein 

Schmalschrift aus 

Breitschrift ein 

Breitschrift aus 

Schattendruck ein 

Schattendruck aus 

Doppeldruck ein 

Doppeldruck aus 

NLQ ein 

NLQ aus 

Hochstellen ein 
Hochstellen aus 
Tiefstellen ein 
Tiefstellen aus 
Normale Schriftstellung 
Teillinie aufwärts 
Teillinie abwärts 
Zeichensatz USA 
Zeichensatz Frankreich 
Zeichensatz Deutschland 
Zeichensatz England 
Zeichensatz Dänemark 1 
Zeichensatz Schweden 
Zeichensatz Italien 
Zeichensatz Spanien 
Zeichensatz Japan 
Zeichensatz Norwegen 
Zeichensatz Dänemark 2 
Proportional ein 
Proportional aus 

Proportional-Einstellung löschen 
Proportional-Offset n einstellen 
Linksausrichtung 
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aJFY7 

50 

ESC[7 F 

aJFY6 

51 

ESC[6 F 

aJFYO 

52 

ESC[0 F 

aJFY2 

53 

ESC[2 F 

aJFY3 

54 

ESC[3 F 

aVERPO 

55 

ESC[0z 

aVERPl 

56 

ESC[lz 

aSLPP 

57 

ESC[nt 

aPERF 

58 

ESC[ng 

aPERFO 

59 

ESC[0g 

aLMS 

60 

ESC#9 

aRMS 

61 

ESC#0 

aTMS 

62 

ESC#8 

aBMS 

63 

ESC#2 

aSTBM 

64 

ESC[Pn;mr 

aSLRM 

65 

ESC[Pn;ms 

aCAM 

66 

ESC#3 

aHTS 

67 

ESCH 

aVTS 

68 

ESCJ 

aTBCO 

69 

ESC[0g 

aTBC3 

70 

ESC[3g 

aTBCl 

71 

ESC[lg 

aTBC4 

72 

ESC[4g 

aTBCALL 

73 

ESC|4 

aTBSALL 

74 

ESC#5 

aEXTEND 

75 

ESC[Pn"x 


Rechtsausrichtung 
Zentrierte Ausrichtung 
Ausrichtung aus 
Wortabstand (Zentrierung) 
Buchstabenabstand (Ausrichtung) 
Zeilenabstand 1/8" 

Zeilenabstand 1/6" 

Seitenlange n einstellen 

Überspringe n (n>0) Zeilen 

Überspringen aus 

Linker Rand gesetzt 

Rechter Rand gesetzt 

Oberer Rand gesetzt 

Unterer Rand gesetzt 

Setze Ränder auf n oben, m unten 

Setze Ränder auf n links, m rechts 

Ränder löschen 

Horizontal-Tabulator setzen 

Vertikal-Tabulator setzen 

Horizontal-Tabulator löschen 

Alle Horizontal-Tabulatoren löschen 

Vertikal-Tabulator löschen 

Alle Vertikal-Tabulatoren löschen 

Alle V- und H-Tabulatoren löschen 

Standard-Tabulatoren setzen 

Erweitertes Kommando n ausführen 


IODRPRea (Dump RastPort Request) 


00 

ds.b 

iodrpr IORequest 

32 

de. 1 

*iodrpr RastPort 

36 

dc.l 

*iodrpr ColorMap 

40 

dc.l 

iodrpr Modes 

44 

dc.w 

iodrpr SrcX 

46 

dc.w 

iodrpr SrcY 

48 

dc.w 

iodrpr SrcWidth 

50 

dc.w 

iodrpr SrcHeight 

52 

dc.l 

iodrpr DestCols 

56 

dc.l 

iodrpr DestRows 

60 

dc.w 

iodrpr _ Special 

62 


iodrpr_SIZEOF 

RPortDump-Flag 

Wert B< 


IORequest-Struktur 

Zeiger auf zu druckenden Rastport 

Zeiger auf Farbtabelle des RPort 

View-Modus der Grafik 

x-Start der Rastportgrafik 

y-Start der Rastportgrafik 

Breite der Rastportgrafik 

Höhe der Rastportgrafik 

Breite der Druckergrafik 

Höhe der Druckergrafik 

Optionsflags 


SPECIAL_MILCOLS 

SPECIAL_MILROWS 

SPECIAL_FULLCOLS 

SPECIAL_FULLROWS 

SPECIAL_FRACCOLS 

SPECIAL_FRACROWS 

SPECIAL_CENTER 

SPECIAL_ASPECT 

SPECIAL_DENSITY1 

SPECIAL DENSITY2 


$001 DestCols ist in 1/1000" angegeben 

$002 DestRows ist in 1/1000" angegeben 

$004 Maximale Spaltenzahl beim Druck 

$008 Maximale Zeilenzahl beim Druck 

$010 DestCols ist ein Bruchteil von FULLCOLS 

$020 DestRows ist ein Bruchteil von FULLROWS 

$040 Zentrierter Ausdruck 

$080 Verhältnis Breite-Höhe korrigieren 

$100 Minimale Druckdichte 

$200 Zweitniedrigste Druckdichte 
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SPECIAL_DENSITY3 $300 Zweithöchste Druckdichte 

SPECIAL DENSITY4 $400 Höchste Druckdichte 


G. 6.3 Console-Device 


ConUnit 


000 

dc.l 

*mp Succ 

?- 


004 

de. 1 

*mp Pred 

; 


008 

dc.b 

mp Type 

; 

MessagePort 

009 

dc.b 

mp Pri 

/ 


010 

dc.l 

*mp Name 

i 


014 

dc.b 

mp Flags 

/ 


015 

dc.b 

mp SigBit 

/ 


016 

dc.l 

mp SigTask 

t 


020 

dc.l 

*lh Head 

i 


024 

dc.l 

*lh Tail 



028 

dc.l 

*lh TailPred 

t 


032 

dc.b 

lh Type 

; 


033 

dc.b 

lh_Pad 

/■ 


034 

dc.l 

*cu Window 

/ 

Zeiger auf Fenster 

038 

dc.w 

cu XCP 

Zeichenposition 

t 

040 

dc.w 

cu YCP 

042 

dc.w 

cu_XMax 

;j- Max. Zeichenposition 

044 

dc.w 

cu YMax 

046 

048 

dc.w 

dc.w 

cu XRSize 
cu YRSize 

;j- Größe des Zeichenrasters 

050 

dc.w 

cu_XROrigin 

; j— Anfangspunkt 

1 

052 

dc.w 

cu_YROrigin 

054 

dc.w 

cu XRExtant 

,-j— Ausdehnung 

056 

dc.w 

cu YRExtant 

058 

dc.w 

cu_XMinShrink 

;Min. Fensterausdehnung 
/ 

060 

dc.w 

cu YMinShrink 

062 

dc.w 

cu XCCP 

f~. 

i— Position des Cursors 

064 

dc.w 

CU_YCCP 

♦ J 
! 

! 

066 

dc.l 

*km LoKeyMapTypes 

#' 


070 

dc.l 

*km LoKeyMap 

t 


074 

dc.l 

*km LoCapsable 

1 


078 

dc.l 

*km LoRepeatable 

/ 

KeyMap-Struktur 

082 

dc.l 

*km HiReyMapTypes 

/ 

(aktuelle) 

086 

dc.l 

*km HiKeyMap 

1 


090 

dc.l 

*km HiCapsable 

1 


094 

dc.l 

*km_HiRepeatable 

r 


098 

ds.w 

cu TabStops,80 

f 

Tabulatoren 

258 

dc.b 

cu Mask 

i' 


259 

dc.b 

cu FgPen 

t 


260 

dc.b 

cu BgPen 

t 


261 

dc.b 

cu AOLPen 

/ 


262 

dc.b 

cu DrawMode 

/ 


263 

dc.b 

cu_AreaPtSz 

} 


264 

dc.l 

cu_AreaPtrn 

i 
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268 

ds.b 

cu Minterms,8 


- Rastport-Attribute 

276 

dc.l 

*cu Font 



280 

dc.b 

cu AlgoStyle 



281 

dc.b 

cu TxFlags 



282 

dc.w 

cu TxHeight 



284 

dc.w 

cu TxWidth 



286 

dc.w 

cu TxBaseline 



288 

dc.w 

cu TxSpacing 



290 

ds.b 

cu Modes,3 

/ 

-i Modes und 

293 

ds.b 

cu RawEvents,3 

7 

‘ RawEvents 

296 


cu SIZEOF 



KevMao 




00 

dc.l 

*km LoKeyMapTypes ; 

-i Zeiger auf Typentab. 

04 

dc.l 

*km LoKeyMap 

/ 

Lo Zeiger auf KeyMap 

08 

dc.l 

*km LoCapsable 

/ 

$00-$3f Capsable-Werte 

12 

dc.l 

*km LoRepeatable ; 

- Repeatable-Werte 

16 

dc.l 

*km HiKeyMapTypes ; 

1 Zeiger auf Typentab. 

20 

dc.l 

*km HiKeyMap 

i 

Hi Zeiger auf KeyMap 

24 

dc.l 

*km HiCapsable 


$40—$67 Capsable-Werte 

28 

dc.l 

*km HiRepeatable 

- Repeatable-Werte 

32 


km SIZEOF 



Name 

Wert 

Bedeutung 

KC 

NORMAL 

$00 

Taste hat nur eine Belegung 

KC 

SHIFT 

$01 

Shift-Taste 

KC 

ALT 

$02 

Alt-Taste 

KC 

CONTROL 

$04 

Ctrl-Taste 

KC 

VANILLA 

$07 

Ctrl-Taste wird normal behandelt 

KC 

DOWNUP 

$08 

Taste wurde losgelassen 

KC 

DEAD 

$20 

keine Reaktion 

KC 

STRING 

$40 

Taste gibt eine Zeichenkette aus 


G.6.4 Narrator-Device 

Narrator-RB 


00 

ds.b 

IOStdReq,48 

48 

dc.w 

rate 

50 

dc.w 

pitch 

52 

dc.w 

mode 

54 

dc.w 

sex 

56 

dc.l 

*ch masks 

60 

dc.w 

nm masks 

62 

dc.w 

volume 

64 

dc.w 

sampfreq 

66 

dc.b 

mouths 

67 

dc.b 

chanmask 

68 

dc.b 

numchan 


Standard IORequest-Struktur 
Worte pro Minute 
Frequez in Hz 
Betonungsmodus 
Geschlecht der Stimme 
Zeiger auf Channel-Masks 
Anzahl der Masken 
Lautstärke 
Abtastrate 
Mund-Flag 
-i Kanalmasken 
-I (intern benutzt) 
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69 dc.b 

70 

Name 


ND_NotUsed 

ND_NoMem 

ND_NoAudLib 

ND_MakeBad 

ND_ünitErr 

ND_CantAlloc 

ND_Unimpl 

ND_NoWrite 

ND_Expunged 

ND_PhonErr 

ND_RateErr 

ND_Pitch 

ND_Sex 

ND_ModeErr 

ND_FreqErr 

ND VolErr 


MouthRB 

00 ds.b 

70 dc.b 

71 dc.b 

72 dc.b 

73 dc.b 

74 


pad 

SIZEOF 

Wert 


-01 

-02 

-03 

-04 

-05 

-06 

-07 

-08 

-09 

-20 

-21 

-22 

-23 

-24 

-25 

-26 


narrator_rb 

width 

height 

shape 

pad 

SIZEOF 


; Füllbyte 


Bedeutung 


nicht benutzt 

Speicher konnte nicht belegt werden 
Audio-Device konnte nicht geöffnet werden 
Fehler beim Erstellen der Library 
angegebene Unit != 0 

Audiokanäle konnten nicht belegt werden 
falsches Kommando 

"mouth shape" gelesen ohne zu schreiben 
Fehler beim Öffnen 

Fehler bei Aussprache der Lautschrift 
Fehler durch rate-Wert 
Fehler durch pitch-Wert 
Fehler durch sex-Einstellung 
Fehler durch mode-Einstellung 
Fehler durch sampfreq-Wert 
Fehler durch volume-Wert 


normale Narr-IOReq-Struktur 

Breite 

Höhe 

Höhe/Breite 

Füllbyte 
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Tabelle aller Library-Routinen 


Nach Alphabet sortiert 
Nach Offset sortiert 




Anhang H 


H.l Die CList-Library (alphabetisch) 


-36 -$024 AllocCList (al:cLPool) 

-156 -$09c ConcatCList (aO:sourceCList,al:destCList) 

-144 -$090 CopyCList (aO:cList) 

-48 -$030 FlushCList (a0:cList) 

-42 -$02a FreeCList (a0:cList) 

-114 -$072 GetCLBuf (aO:cList,al:buffer,dl:length) 

-66 -$042 GetCLChar (a0:cList) 

-90 -$05a GetCLWord (a0:cList) 

-126 -$07e IncrCLMark (a0:cList) 

-30 -$01e InitCLPool (a0:cLPool,d0:size) 

-120 -$078 MarkCList (a0:cList,d0:offset) 

-132 -$084 PeekCLMark (a0:cList) 

-108 -$06c PutCLBuf (aO:cList,al:buffer,dl:length) 

-60 -$03c PutCLChar (aO:cList,d0:byte) 

-84 -$054 PutCLWord (aO:cList,dO:word) 

-54 -$036 SizeCList (a0:cList) 

-138 -$08a SplitCList (a0:cList) 

-150 -$096 SubCList (aO:cList,dO:index,dl:length) 

-72 -$048 UnGetCLChar (aO:cList,dO:byte) 

-96 -$060 UnGetCLWord (aO:cList,dO:word) 

-78 -$04e UnPutCLChar (aOrcList) 

-102 -$066 UnPutCLWord (aO:cList) 


H.2 Die CList-Library (nach Offsets) 


-30 -$01e InitCLPool (a0:cLPool,d0:size) 

-36 -$024 AllocCList (al:cLPool) 

-42 -$02a FreeCList (a0:cList) 

-48 -$030 FlushCList (a0:cList) 

-54 -$036 SizeCList (a0:cList) 

-60 -$03c PutCLChar (aO:cList,d0:byte) 

-66 -$042 GetCLChar (aO:cList) 

-72 -$048 UnGetCLChar (aO:cList,d0:byte) 

-78 -$04e UnPutCLChar (aO:cList) 

-84 -$054 PutCLWord (aO:cList,dO:word) 

-90 -$05a GetCLWord (a0:cList) 

-96 -$060 UnGetCLWord (a0:cList,d0:word) 

-102 -$066 UnPutCLWord (aO:cList) 

-108 -$06c PutCLBuf (aO:cList,al:buffer,dl:length) 

-114 -$072 GetCLBuf (aO:cList,al:buffer,dl:length) 

-120 -$078 MarkCList (aO:cList,dO:offset) 

-126 -$07e IncrCLMark (aO:cList) 

-132 -$084 PeekCLMark (aO:cList) 

-138 -$08a SplitCList (aO:cList) 

-144 -$090 CopyCList (aO:cList) 

-150 -$096 SubCList (a0:cList,d0:index,dl:length) 

-156 -$09c ConcatCList (aO:sourceCList,al:destCList) 
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H.3 Die Console-Library (alphabetisch) 


-42 -$02a CDInputHandler (aO:events,al:device) 

-48 -$030 RawKeyConvert (aO:events,al:buffer,dl:length,a2:keyMap) 


H.4 Die Console-Library (nach Offsets) 


-42 -$02a CDInputHandler (aO:events,al:device) 

-48 -$030 RawKeyConvert (aO:events,al:buffer,dl:length,a2:keyMap) 


H.5 Die Diskfont-Library (alphabetisch) 


-36 -$024 

-48 -$030 

-42 -$02a 

-30 -$01e 


AvailFonts (a0:buffer,d0:bufBytes,dl:Flags) 
DisposeFontContents (al:fontContentsHeader) 
NewFontContents (aO:fontsLock,al:fontName) 
OpenDiskFont (a0:textAttr) 


H.6 Die Diskfont-Library (nach Offset) 


-30 -$01e 

-36 -$024 

-42 -$02a 

-48 -$030 


OpenDiskFont (a0:textAttr) 

AvailFonts (a0:buffer,d0:bufBytes,dl:Flags) 
NewFontContents (aO:fontsLock,al:fontName) 
DisposeFontContents (a1:fontContentsHeader) 


H.7 Die DOS-Library (alphabetisch) 


-36 -$024 

-120 -$078 

-138 -$08a 

-126 -$07e 

-192 -$0c0 

-198 -$0c6 

-72 -$048 

-174 -$0ae 

-96 -$060 


Close (dl:file) 

CreateDir (dl:name) 

CreateProc (dl:name,d2:pri,d3:segList,d4:stack) 
CurrentDir (dl:lock) 

DateStamp (dl:date) 

Delay (dl:timeout) 

DeleteFile (dl:name) 

DeviceProc (dl:name) 

DupLock (dl:lock) 
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-102 -$066 Examine (dl:lock,d2:fileInfoBlock) 

-222 -$0de Execute (dl:string,d2:file,d3:file) 

-144 -$090 Exit (dl:returnCode) 

-108 -$06c ExNext (dl:lock,d2:filelnfoBlock) 

-162 -$0a2 GetPacket (dl:wait) 

-114 -$072 Info (dl:lock,d2:parameter) 

-54 -$036 Input () 

-132 -$084 IoErr () 

-216 -$0d8 Islnteractive (dl:file) 

-150 -$096 LoadSeg (dl:filename) 

-84 -$054 Lock (dl:name,d2:type) 

-30 -$01e Open (dl:name,d2:mode) 

-60 -$03c Output () 

-210 -$0d2 ParentDir (dl:lock) 

-168 -$0a8 QueuePacket (dl:packet) 

-42 -$02a Read (dl:file,d2:buffer,d3:length) 

-78 -$04e Rename (dl:oldname,d2:newname) 

-66 -$042 Seek (dl:file,d2:pos,d3:offset) 

-180 -$0b4 SetComment (dl:name,d2:comment) 

-186 -$0ba SetProtection (dl:name,d2:mask) 

-156 -$09c UnLoadSeg (dl:segment) 

-90 -$05a UnLock (dl:lock) 

-204 -$0cc WaitForChar (dl:file,d2:timeout) 

-48 -$030 Write (dl:file,d2:buffer,d3:length) 


H.8 Die DOS-Library (nach Offsets) 


-30 -$01e Open (dl:name,d2:mode) 

-36 -$024 Close (dl:file) 

-42 -$02a Read (dl:file,d2:buffer,d3:length) 

-48 -$030 Write (dl:file,d2:buffer,d3:length) 

-54 -$036 Input () 

-60 -$03c Output () 

-66 -$042 Seek (dl:file,d2:pos,d3:offset) 

-72 -$048 DeleteFile (dl:name) 

-78 -$04e Rename (dl:oldname,d2:newname) 

-84 -$054 Lock (dl:name,d2:type) 

-90 -$05a UnLock (dl:lock) 

-96 -$060 DupLock (dl:lock) 

-102 -$066 Examine (dl:lock,d2:fileInfoBlock) 

-108 -$06c ExNext (dl:lock,d2:filelnfoBlock) 

-114 -$072 Info (dl:lock,d2:parameter) 

-120 -$078 CreateDir (dl:name) 

-126 -$07e CurrentDir (dl:lock) 

-132 -$084 IoErr () 

-138 -$08a CreateProc (dl:name,d2:pri,d3:segList,d4:stack) 

-144 -$090 Exit (dl:returnCode) 

-150 -$096 LoadSeg (dl:filename) 

-156 -$09c UnLoadSeg (dl:segment) 

-162 -$0a2 GetPacket (dl:wait) 

-168 -$0a8 QueuePacket (dl:packet) 

-174 -$0ae DeviceProc (dl:name) 
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Tabelle aller Library-Routinen 


-180 -$0b4 SetComment (dl :name,d2 momment) 

-186 -$0ba SetProtection (dl:name,d2:mask) 

-192 -$0c0 DateStamp (dl:date) 

-198 -$0c6 Delay (dl:timeout) 

-204 -$0cc WaitForChar (dl:file,d2:timeout) 

-210 -$0d2 ParentDir (dl:lock) 

-216 -$0d8 Islnteractive (dl:file) 

-222 -$0de Execute (dl :string,d2:file,d3:file) 


H.9 Die Exec-Library (alphabetisch) 


-480 -$le0 AbortIO (al:ioRequest) 

-432 -$lb0 AddDevice (al:device) 

-240 -$0f 0 AddHead (a0:list,almode) 

-168 -$0a8 AddlntServer (do:intNumber,al:interrupt) 

-396 -$l8c AddLibrary (al:library) 

-618 -$26a AddMemList (do :size,dl Attributes,d2 :pri,a0 :base,al mame) 

-354 -$162 AddPort (al:port) 

-486 -$le6 AddResource (al:resource) 

-600 -$258 AddSemaphore (al:sigSem) 

-246 -$0f6 AddTail (aO:list,almode) 

-282 -$lla AddTask (al:task,a2:initialPC,a3:finalPC) 

-108 -$06c Alert (d7:alertNum,a5:parameters) 

-204 -$0cc AllocAbs (d0:byteSize,al:location) 

-186 -$0ba Allocate (a0:freelist,d0:byteSize) 

-222 -$0de AllocEntry (a0:entry) 

-198 -$0c6 AllocMem (d0:bytesize,dl:requirements) 

-330 -$14a AllocSignal (d0:signalNum) 

-342 -$156 AllocTrap (d0:trapNum) 

-576 -$240 AttemptSemaphore (a0:sigSem) 

-216 -$0d8 AvailMem (dl:requirements) 

-180 -$0b4 Cause (al:interrupt) 

-468 -$ld4 ChecklO (al:ioRequest) 

-450 -$lc2 CloseDevice (al:ioRequest) 

-414 -$l9e CloseLibrary (al:library) 

-624 -$270 CopyMem (a0:source,al:dest,d0:size) 

-630 -$276 CopyMemQuick (a0:source,al:dest,d0:size) 

-192 -$0c0 Deallocate (a0:freelist,al:memoryBlock,d0:byteSize) 

-114 -$072 Debug () 

-120 -$078 Disable () 

-60 -$03c Dispatch () 

-456 -$lc8 DoIO (al:ioRequest) 

-126 -$07e Enable () 

-270 -$10e Enqueue (a0:list,al:node) 

-66 -$042 Exception () 

-36 -$024 Exitlntr () 

-276 -$114 FindName (a0:list,almame) 

-390 -$186 FindPort (almame) 

-96 -$060 FindResident (almame) 

-594 -$252 FindSemaphore (alisigSem) 

-294 -$126 FindTask (almame) 

-132 -$084 Forbid () 
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-228 

-$0e4 

-210 

-$0d2 

-336 

-$150 

-348 

-$15c 

-528 

-$210 

-372 

-$174 

-72 

-$048 

-102 

-$066 

-558 

-$22e 

-78 

-$04e 

-234 

-$0ea 

-90 

-$05a 

-84 

-$054 

-564 

-$234 

-582 

-$246 

-408 

-$198 

-444 

-$lbc 

-552 

-$228 

-498 

-$lf 2 

-138 

-$08a 

-540 

-$21c 

-366 

-$16e 

-522 

-$20a 

-504 

-$lf 8 

-510 

-$lfe 

-516 

-$204 

-570 

-$23a 

-588 

-$24c 

-438 

-$lb6 

-258 

-$102 

-174 

-$0ae 

-402 

-$192 

-252 

-$0fc 

-360 

-$168 

-492 

-$lec 

-606 

-$25e 

-264 

-$108 

-288 

-$120 

-378 

-$17a 

-48 

-$030 

-42 

-$02a 

-462 

-$lce 

-312 

-$138 

-420 

-$la4 

-162 

-$0a2 

-306 

-$132 

-144 

-$090 

-300 

-$12c 

-324 

-$144 

-612 

-$264 

-426 

-$ laa 

-150 

-$096 

-30 

-$01e 

-54 

-$036 

-534 

-$216 
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FreeEntry (aO:entry) 

FreeMem (al:memoryBlock,dO:bytesize) 

FreeSignal (dO:signalNum) 

FreeTrap (dO:trapNum) 

GetCC () 

GetMsg (aO:port) 

InitCode (dO:startclass,dl:Version) 

InitResident (al:resident,dl:segList) 

InitSemaphore (aO:sigSem) 

InitStruct (al:initTable,a2:memory,dO:size) 

Insert (aO:list,al:node,a2:pred) 

MakeFunctions (aO:target,al:functionArray,a2:funcDispBase) 
MakeLibrary (aO:funclnit,al:structlnit,a2:liblnit 
dO:data,dl:Code) 

ObtainSemaphore (aO:sigSem) 

ObtainSemaphoreList (aO:sigSem) 

OldOpenLibrary (al:libName) 

OpenDevice (aO:devName,dO:unit,al:ioReguest,dl:flags) 
OpenLibrary (a1:1ibName,dO:version) 

OpenResource (a1:resName,d0:Version) 

Permit () 

Procure (aO:semaport,al:bidMsg) 

PutMsg (aO:port,al-.message) 

RawDoFmt (aO:format,al:data,a2:putProc,a3:putData) 
RawIOInit () 

RawMayGetChar () 

RawPutChar (dO:char) 

ReleaseSemaphore (aO:sigSem) 

ReleaseSemaphoreList (aO:sigSem) 

RemoveDevice (al:device) 

RemHead (aO:list) 

RemlntServer (dO:intNumber,al:interrupt) 

RemLibrary (al:library) 

Remove (al:node) 

RemPort (al:port) 

RemResource (al:resource) 

RemSemaphore (al:sigSem) 

RemTail (aO:list) 

RemTask (al:task) 

ReplyMsg (al:message) 

Reschedule () 

Schedule () 

SendIO (al:ioRequest) 

SetExcept (dO:newSignals,dl:signalSet) 

SetFunction (al:library,a0:funcOffset,d0:funcEntry) 
SetlntVector (dO:intNumber,al:interrupt) 

Setsignal (dO:newSignals,dl:signalSet) 

SetSR (dO:newSR,dl:mask) 

SetTaskPri (al:task,dO:priority) 

Signal (al:task,dO:signalSet) 

SumKickData () 

SumLibrary (al:library) 

SuperState () 

Supervisor () 

Switch () 

TypeOfMem (al:address) 



Tabelle aller Library-Routinen 


-156 

-546 

-318 

-474 

-384 


H. 10 


-30 

-36 

-42 

-48 

-54 

-60 

-66 

-72 

-78 

-84 

-90 

-96 

-102 

-108 

-114 

-120 

-126 

-132 

-138 

-144 

-150 

-156 

-162 

-168 

-174 

-180 

-186 

-192 

-198 

-204 

-210 

-216 

-222 

-228 

-234 

-240 

-246 

-252 

-258 

-264 

-270 

-276 

-282 


-$09c UserState (aO:oldSysStack) 
-$222 Vacate (aO:semaport) 

-$13e Wait (dO:signalSet) 

-$lda WaitIO (al:ioRequest) 

-$180 WaitPort (a0:port) 


Die Exec-Library (nach Offsets) 


-$01e Supervisor () 

-$024 Exitlntr () 

-$02a Schedule () 

-$030 Reschedule () 

-$036 Switch () 

-$03c Dispatch () 

-$042 Exception () 

-$048 InitCode (dO:startClass,dl:version) 

-$04e InitStruct (al:initTable,a2:memory,d0:size) 

-$054 MakeLibrary (aO:funclnit,al:structlnit,a2:liblnit 
d0:data,dl:code) 

-$05a MakeFunctions (aO:target,al:functionArray,a2:funcDispBase) 
-$060 FindResident (alrname) 

-$066 initResident (al:resident,dl:segList) 

-$06c Alert (d7:alertNum,a5:Parameters) 

-$072 Debug () 

-$078 Disable () 

-$07e Enable () 

-$084 Forbid () 

-$08a Permit () 

-$090 SetSR (d0:newSR,dl:mask) 

-$096 SuperState () 

-$09c UserState (a0:oldSysStack) 

-$0a2 SetlntVector (d0:intNumber,alInterrupt) 

-$0a8 AddlntServer (dO:intNumber,al:interrupt) 

-$0ae RemlntServer (dO:intNumber,al:interrupt) 

-$0b4 Cause (al:interrupt) 

-$0ba Allocate (a0:freelist,d0:byteSize) 

-$0c0 Deallocate (a0:freelist,al:memoryBlock,d0:byteSize) 

-$0c6 AllocMem (d0:byteSize,dl:requirements) 

-$0cc AllocAbs (dO:byteSize,al:location) 

-$0d2 FreeMem (al:memoryBlock,dO:byteSize) 

-$0d8 AvailMem (dl:requirements) 

-$0de AllocEntry (a0:entry) 

-$0e4 FreeEntry (aO:entry) 

-$0ea Insert (a0:list,al:node,a2:pred) 

-$0f0 AddHead (aO:list,al:node) 

-$0f6 AddTail (a0:list,al:node) 

-$0fc Remove (al:node) 

-$102 RemHead (a0:list) 

-$108 RemTail (aOrlist) 

-$10e Enqueue (a0:list,al:node) 

-$114 FindName (a0:list,al:name) 

-$lla AddTask (al:task,a2:initialPC,a3:finalPC) 
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-288 -$120 RemTask (al:task) 

-294 -$126 FindTask (al:name) 

-300 -$l2c SetTaskPri (al:task,dO:priority) 

-306 -$132 SetSignal (dO:newSignals,dl:signalSet) 

-312 -$138 SetExcept (dO:newSignals,dl:signalSet) 

-318 -$13e Wait (dO:signalSet) 

-324 -$144 Signal (al:task,dO:signalSet) 

-330 -$14a AllocSignal (dO:signalNum) 

-336 -$150 FreeSignal (d0:signalNum) 

-342 -$156 AllocTrap (dOrtrapNum) 

-348 -$15c FreeTrap (d0:trapNum) 

-354 -$162 AddPort (al:port) 

-360 -$168 RemPort (al:port) 

-366 -$16e PutMsg (aO:port,al:message) 

-372 -$174 GetMsg (a0:port) 

-378 -$17a ReplyMsg (alimessage) 

-384 -$180 WaitPort (a0:port) 

-390 -$186 FindPort (al:name) 

-396 -$18c AddLibrary (al:library) 

-402 -$192 RemLibrary (al:library) 

-408 -$198 OldOpenLibrary (alilibName) 

-414 -$l9e CloseLibrary (al:library) 

-420 -$la4 SetFunction (al:library,aO:funcOffset,dO:funcEntry) 

-426 -$laa SumLibrary (al:library) 

-432 -$lb0 AddDevice (al:device) 

-438 -$lb6 RemoveDevice (al:device) 

-444 -$lbc OpenDevice (a 0 :devName,d 0 :unit,al:ioReguest,dl:flags) 

-450 -$lc2 CloseDevice (alrioRequest) 

-456 -$lc8 DoIO (al:ioRequest) 

-462 -$lce SendIO (al:ioRequest) 

-468 -$ld4 ChecklO (al:ioRequest) 

-474 -$lda WaitIO (al:ioRequest) 

-480 -$le0 AbortIO (al:ioRequest) 

-486 -$le6 AddResource (al:resource) 

-492 -$lec RemResource (al:resource) 

-498 -$lf2 OpenResource (al:resName,dO:version) 

-504 -$lf8 RawIOInit () 

-510 -$lfe RawMayGetChar () 

-516 -$204 RawPutChar (d0:char) 

-522 -$20a RawDoFmt (aO:format,al:data,a2:putProc,a3:putData) 

-528 -$210 GetCC () 

-534 -$216 TypeOfMem (al:address) 

-540 -$21c Procure (aO:semaport,al:bidMsg) 

-546 -$222 Vacate (a0:semaport) 

-552 -$228 OpenLibrary (al:libName,d0:version) 

-558 -$22e InitSemaphore (a0:sigSem) 

-564 -$234 ObtainSemaphore (a0:sigSem) 

-570 -$23a ReleaseSemaphore (a0:sigSem) 

-576 -$240 AttemptSemaphore (a0:sigSem) 

-582 -$246 ObtainSemaphoreList (a0:sigSem) 

-588 -$24c ReleaseSemaphoreList (a0:sigSem) 

-594 -$252 FindSemaphore (al:sigSem) 

-600 -$258 AddSemaphore (al:sigSem) 

-606 -$25e RemSemaphore (al:sigSem) 

-612 -$264 SumKickData () 

-618 -$26a AddMeraList (d0:size,dl:attributes,d2:pri,a0:base,al:name) 
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Tabelle aller Library-Routinen 


-624 

-630 


H-11 


-156 

-96 

-480 

-102 

-492 

-504 

-624 

-162 

-258 

-186 

-264 

-252 

-474 

-84 

-654 

-30 


-606 


-300 

-636 


-312 

-36 

-366 

-420 

-42 

-528 

-48 

-552 

-78 

-372 

-450 

-378 

-462 

-534 

-108 

-246 

-180 

-114 

-330 


-$270 CopyMem (aO:source,al:dest,d0:size) 

-$276 CopyMemQuick (aO:source,al:dest,dO:size) 


Die Graphics-Library (alphabetisch) 


-$09c AddAnimObj (aO:obj,al:animationKey,a2:rastPort) 

-$060 AddBob (a0:bob,al:rastPort) 

-$le0 AddFont (al:textFont) 

-$066 AddVSprite (a0:vSprite,al:rastPort) 

-$lec AllocRaster (d0:width,dl:height) 

-$1f8 AndRectRegion (a0:rgn,al:rect) 

-$270 AndRegionRegion (a0:src,al:dest) 

-$0a2 Animate (aO:animationKey,al:rastPort) 

-$102 AreaDraw (al:rastPort,dO:x,dl:y) 

-$0ba AreaEllipse (al:rastPort,dO:centerX,dl:centerY,d2:a,d3:b) 
-$108 AreaEnd (al:rastPort) 

-$0fc AreaMove (al:rastPort,d0:x,dl:y) 

-$lda AskFont (al:rastPort,aO:textAttr) 

-$054 AskSoftStyle (al:rastPort) 

-$28e AttemptLockLayerRom (a5:layer) 

-$0le BltBitMap (aO:srcBM,dO:srcX,dl:srcY,al:destBM,d2:destX 

d3:destY,d4:sizeX,d5:sizeY,d6:minTerm,d7:mask 
a2:tempA) 

-$25e BltBitMapRastPort (a0:srcBM,d0:srcX,dl:srcY,al:destRP 

d2:destX d3:destY,d4:SizeX,d5:SizeY 
d6:minTerm) 

-$12c BltClear (al:memory,d0:size,dl:flags) 

-$27c BltMaskBitMapRastPort (a0:srcBM,d0:srcX,dl:srcY,al:destRP 

d2:destX d3:destY,d4:SizeX,d5:SizeY 
d6:minTerm,a2:bltMask) 

-$138 BltPattern (al:rastPort,a0:ras,d0:xl,dl:yl,d2:maxX,d3:maxY 
d4:fillBytes) 

-$024 BltTemplate (aO:source,d0:srcX,dl:srcMod,al:destRP,d2:destX 
d3:destY,d4:sizeX,d5:sizeY) 

-$16e CBump (al:copperList) 

-$la4 ChangeSprite (a0:viewPort,al:simpleSprite,a2:data) 

-$02a ClearEOL (al:rastPort) 

-$210 ClearRegion (a0:rgn) 

-$030 ClearScreen (al:rastPort) 

-$228 ClipBlit (a0:srcRP,d0:srcX,dl:srcY,al:destRP,d2:destX 
d3:destY,d4:sizeX,d5:sizeY,d6:minTerm) 

-$04e CloseFont (al:textFont) 

-$174 CMove (al:copperList,dO:destination,dl:data) 

-$lc2 CopySBitMap (a0:layerl,al:layer2) 

-$17a CWait (al:copperList,dO:v,dl:h) 

-$lce DisownBlitter () 

-$216 DisposeRegion (a0:rgn) 

-$06c DoCollision (al:rastPort) 

-$0f6 Draw (al:rastPort,d0:x,dl:y) 

-$0b4 DrawEllipse (al:rastPort,d0:centerX,dl:centerY,d2:a,d3:b) 
-$072 DrawGList (al:rastPort,aO:viewPort) 

-$14a Flood (al:rastPort,d2:mode,d0:x,dl:y) 
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-576 

-$240 

-546 

-$222 

-564 

-$234 

-600 

-$258 

-498 

—$ 1 f 2 

-414 

-$19e 

-540 

-$21c 

-570 

-$23a 

-168 

-$0a8 

-582 

-$246 

-408 

-$198 

-282 

-$lla 

-390 

-$186 

-120 

-$078 

-174 

-$0ae 

-126 

-$07e 

-198 

-$0c6 

-468 

-$ld4 

-360 

-$168 

-204 

-$0cc 

-192 

-$0c0 

-222 

-$0de 

-432 

-$lb0 

-216 

-$0d8 

-240 

-$0f0 

-426 

-$laa 

-210 

-$0d2 

-516 

-$204 

-72 

-$048 

-510 

-$lfe 

-612 

-$264 

-456 

-$lc8 

-336 

-$150 

-276 

-$114 

-294 

-$126 

-318 

-$13e 

-306 

-$132 

-486 

-$le6 

-132 

-$084 

-138 

-$08a 

-396 

-$18c 

-588 

-$24c 

-342 

-$156 

-348 

-$15c 

-144 

-$090 

-354 

-$162 

-66 

-$042 

-234 

-$0ea 

-288 

-$120 

-630 

-$276 

-90 

-$05a 

-150 

-$096 

-444 

-$lbc 

-60 

-$03c 

-54 

-$036 
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FreeColorMap (aO:colormap) 

FreeCopList (aO:copList) 

FreeCprList (aO:cprList) 

FreeGBuffers (aO:animObj,al:rastPort,d0:doubleBuffer) 
FreeRaster (aO:planePtr,dO:widht,dl:height) 

FreeSprite (dO:num) 

FreeVPortCopLists (aO:viewPort) 

GetColorMap (dO:entries) 

GetGBuffers (aO:animationObj,al:rastPort,dO:doubleBuffer) 
GetRGB4 (aO:colormap,dO:entry) 

GetSprite (aO:simpleSprite,d0:num) 

InitArea (aO:areaInfo,al:vectorTable,dO:tableSize) 
InitBitMap (aO:bitMap,dO:depth,dl:width,d2:height) 
InitGels (a0:dummyHead,al:dummyTail,a2:gelsInfo) 
InitGMasks (aO:animationObj) 

InitMasks (aO:vSprite) 
initRastPort (al:rastPort) 

InitTmpRas (aO:tmpRas,al:buff,dO:size) 

Initview (al:view) 

InitViewPort (aO:viewPort) 

LoadRGB4 (aO:viewPort,al:colors,dO:count) 

Loadview (al:view) 

LockLayerRom (a5:layer) 

MakeVPort (aO:view,al:viewPort) 

Move (al:rastPort,dO:x,dl:y) 

MoveSprite (aO:viewPort,a2:simpleSprite,dO:x,dl:y) 

MrgCop (al:view) 

NewRegion () 

OpenFont (aO:textAttr) 

OrRectRegion (aO:rgn,al:rect) 

OrRegionRegion (aO:src,al:dest) 

OwnBlitter () 

PolyDraw (al:rastPort,dO:count,aOipolyTable) 

QBlit (al:blit) 

QBSBlit () 

ReadPixel (al:rastPort,dO:x,dl:y) 

RectFill (al:rastPort,dO:xl,dl:yl,d2:xu,d3:yu) 

RemFont (al:textFont) 

RemIBob (aO:bob,al:rastPort,a2:viewPort) 

RemVSprite (aO:vsprite) 

ScrollRaster (al:rastPort,dO:dX,dl:dY,d2:minX,d3:minY 
d4:maxX,d5:maxY) 

ScrollVPort (aO:viewPort) 

SetAPen (al:rastPort,dO:pen) 

SetBPen (al:rastPort,dO:pen) 

SetCollision (dO:type,aO:routine,al:gelsInfo) 

SetDrMd (al:rastPort,d0:drawMode) 

SetFont (al:rastPort,aO:textFont) 

SetRast (al:rastPort,dO:color) 

SetRGB4 (aO:viewPort,dO:index,dl:r,d2:g,d3:b) 

SetRGB4CM (aO:colorMap,dO:color,dl:r,d2:g,d3:b) 
SetSoftStyle (al:rastPort,dO:style,dl:enable) 

SortGList (al:rastPort) 

SyncSBitMap (aO:layer) 

Text (al:rastPort,a0:string,d0:count) 

TextLength (al:rastPort,aO:string,dO:count) 



Tabelle aller Library-Routinen 


-594 

-438 

-384 

-228 

-402 

-270 

-324 

-558 

-618 


H. 12 


-30 


-36 

-42 

-48 

-54 

-60 

-66 

-72 

-78 

-84 

-90 

-96 

-102 

-108 

-114 

-120 

-126 

-132 

-138 

-144 

-150 

-156 

-162 

-168 

-174 

-180 

-186 

-192 

-198 

-204 

-210 

-216 

-222 

-228 

-234 

-240 

-246 


-$252 UCopperListlnit (aO:copperlist,dO:num) 
-$lb6 UnlockLayerRom (a5:layer) 

-$180 VBeamPos () 

-$0e4 WaitBlit () 

-$192 WaitBOVP (a0:viewPort) 

-$10e WaitTOF () 

-$144 WritePixel (al:rastPort,dO:x,dl:y) 
-$22e XorRectRegion (aO:rgn,al:rect) 

-$26a XorRegionRegion (a0:src,al:dest) 


Die Graphics-Library (nach Offsets) 


-$0le BltBitMap (aO:srcBM,dO:srcX,dl:srcY,al:destBM,d2:destX 

d3:destY,d4:sizeX,d5:sizeY,d6:minTerm,d7:mask 
a2:tempA) 

-$024 BltTemplate (aO:source,dO:srcX,dl:srcMod,al:destRP,d2:destx 
d3:destY,d4:sizeX,d5:sizeY) 

-$02a ClearEOL (al:rastPort) 

-$030 ClearScreen (al:rastPort) 

-$036 TextLength (al:rastPort,a0:string,d0:count) 

-$03c Text (al:rastPort,a0:string,d0:count) 

-$042 SetFont (al:rastPort,aO:textFont) 

-$048 OpenFont (a0:textAttr) 

-$04e CloseFont (alitextFont) 

-$054 AskSoftStyle (al:rastPort) 

-$05a SetSoftStyle (al:rastPort,dO:style,dlrenable) 

-$060 AddBob (a0:bob,al:rastPort) 

-$066 AddVSprite (a0:vSprite,al:rastPort) 

-$06c DoCollision (al:rastPort) 

-$072 DrawGList (al:rastPort,aO:viewPort) 

-$078 InitGels (aO:dummyHead,al:duiranyTail,a2:gelsInfo) 

-$07e InitMasks (a0:vSprite) 

-$084 RemIBob (a0:bob,al:rastPort,a2:viewPort) 

-$08a RemVSprite (a0:vsprite) 

-$090 SetCollision (d0:type,a0:routine,al:gelsInfo) 

-$096 SortGList (al:rastPort) 

-$09c AddAnimObj (a0:obj,al:animationKey,a2:rastPort) 

-$0a2 Animate (aO:animationKey,al:rastPort) 

-$0a8 GetGBuffers (aO:animationObj,al:rastPort,dO:doubleBuffer) 
-$0ae InitGMasks (aOianimationObj) 

-$0b4 DrawEllipse (al:rastPort,d0:centerX,dl:centerY,d2:a,d3:b) 
-$0ba AreaEllipse (al:rastPort,d0:centerX,dl:centerY,d2:a,d3:b) 
-$0c0 LoadRGB4 (a0:viewPort,al:colors,d0:count) 

-$0c6 InitRastPort (al:rastPort) 

-$0cc InitViewPort (a0:viewPort) 

-$0d2 MrgCop (al:view) 

-$0d8 HakeVPort (aO:view,al:viewPort) 

-$0de LoadView (al:view) 

-$0e4 WaitBlit () 

-$0ea SetRast (al:rastPort,dO:color) 

-$0f0 Move (al:rastPort,d0:x,dl:y) 

-$0f6 Draw (al:rastPort,d0:x,dl:y) 
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-252 

-$0fc 

-258 

-$102 

-264 

-$108 

-270 

-$10e 

-276 

-$114 

-282 

-$lla 

-288 

-$120 

-294 

-$126 

-300 

-$12c 

-306 

-$132 

-312 

-$138 

-318 

-$13e 

-324 

-$144 

-330 

-$14a 

-336 

-$150 

-342 

-$156 

-348 

-$15c 

-354 

-$162 

-360 

-$168 

-366 

-$16e 

-372 

-$174 

-378 

-$17a 

-384 

-$180 

-390 

-$186 

-396 

-$18c 

-402 

-$192 

-408 

-$198 

-414 

-$19e 

-420 

-$la4 

-426 

-$laa 

-432 

-$lb0 

-438 

-$lb6 

-444 

-$lbc 

-450 

-$lc2 

-456 

-$lc8 

-462 

-$lce 

-468 

-$ld4 

-474 

-$lda 

-480 

-$le0 

-486 

-$le6 

-492 

-$lec 

-498 

—$ 1 f 2 

-504 

-$lf 8 

-510 

-$lfe 

-516 

-$204 

-528 

-$210 

-534 

-$216 

-540 

-$21c 

-546 

-$222 

-552 

-$228 

-558 

-$22e 

-564 

-$234 

-570 

-$23a 
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AreaMove (al:rastPort,dO:x,dl:y) 

AreaDraw (al:rastPort,dO:x,dl:y) 

AreaEnd (al:rastPort) 

WaitTOF () 

QBlit (al:blit) 

InitArea (aO:arealnfo,al:vectorTable,d0:tableSize) 

SetRGB4 (aO:viewPort,do:index,dl:r,d2:g,d3:b) 

QBSBlit () 

BltClear (al:memory,dO:size,dl:flags) 

RectFill (al:rastPort,dO:xl,dl:yl,d2:xu,d3:yu) 

BltPattern (al:rastPort,aO:ras,dO:xl,dl:yl,d2:maxX,d3:maxY 
d4:fillBytes) 

ReadPixel (al:rastPort,dO:x,dl:y) 

WritePixel (al:rastPort,dO:x,dl:y) 

Flood (al:rastPort,d2:mode,dO:x,dl:y) 

PolyDraw (a1:rastPort,do:count,aO:polyTable) 

SetAPen (al:rastPort,dO:pen) 

SetBPen (al:rastPort,dO:pen) 

SetDrMd (a1:rastPort,do:drawMode) 

InitView (al:view) 

CBump (al:copperList) 

CMove (al:copperList,do:destination,dl:data) 

CWait (al:copperList,dO:v,dl:h) 

VBeamPos () 

InitBitMap (aO:bitMap,dO:depth,dl:width,d2:height) 
ScrollRaster (al:rastPort,dO:dX,dl:dY,d2:minX,d3:minY 
d4:maxX,d5:maxY) 

WaitBOVP (aO:viewPort) 

GetSprite (aO:simpleSprite,do:num) 

FreeSprite (dO:num) 

ChangeSprite (aO:viewPort,al:simpleSprite,a2:data) 
MoveSprite (aO:viewPort,a2:simpleSprite,dO:x,dl:y) 
LockLayerRom (a5:layer) 

UnlockLayerRom (a5:layer) 

SyncSBitMap (aO:layer) 

CopySBitMap (aO:layerl,al:layer2) 

OwnBlitter () 

DisownBlitter () 

InitTmpRas (aO:tmpRas,al:buff,dO:size) 

AskFont (al:rastPort,aO:textAttr) 

AddFont (al:textFont) 

RemFont (al:textFont) 

AllocRaster (dO:width,dl:height) 

FreeRaster (aO:planePtr,d0:widht,dl:height) 

AndRectRegion (aO:rgn,al:rect) 

OrRectRegion (aO:rgn,al:rect) 

NewRegion () 

ClearRegion (aO:rgn) 

DisposeRegion (aO:rgn) 

FreeVPortCopLists (aO:viewPort) 

FreeCopList (aO:copList) 

ClipBlit (aO:srcRP,dO:srcX,dl:srcY,al:destRP,d2:destX 
d3:destY,d4:sizeX,d5:sizeY,d6:minTerm) 
XorRectRegion (aO:rgn,al:rect) 

FreeCprList (aO:cprList) 

GetColorMap (dO:entries) 



Tabelle aller Library-Routinen 


-576 

-582 

-588 

-594 

-600 

-606 


-612 

-618 

-624 

-630 

-636 


-654 


-$240 FreeColorMap (a0:colormap) 

-$246 GetRGB4 (aO:colormap,d0:entry) 

-$24c ScrollVPort (a0:viewPort) 

-$252 UCopperListlnit (a0:copperlist,d0:num) 

-$258 FreeGBuffers (aO:animObj,al:rastPort,dO:doubleBuffer) 

-$25e BltBitMapRastPort (a0:srcBM,d0:srcX,dl:srcY,al:destRP 

d2:destx d3:destY,d4:SizeX,d5:SizeY 
d6:minTerm) 

-$264 OrRegionRegion (aO:src,al:dest) 

-$26a XorRegionRegion (a0:src,al:dest) 

-$270 AndRegionRegion (a0:src,al:dest) 

-$276 SetRGB4CM (aO:colorMap,d0:color,dl:r,d2:g,d3:b) 

-$27c BltMaskBitMapRastPort (aO :srcBM,dO:srcX,dl :srcY,al :destRP 

d2:destXd3:destY,d4:SizeX,d5:SizeY 

d6:minTerm,a2:bltMask) 

-$28e AttemptLockLayerRom (a5:layer) 


H.13 Die Icon-Library (alphabetisch) 


-72 

-66 

-108 

-96 

-90 

-54 

-60 

-78 

-42 

-30 

-102 

-84 

-48 

-36 


-$048 AddFreeList (aO:freelist,al:mem,a2:size) 
-$042 AllocWBObject () 

-$06c BumpRevision (aO:newname,al:oldname) 

-$060 FindToolType (a0:toolTypeArray,al:typeName) 
-$05a FreeDiskObject (a0:diskobj) 

-$036 FreeFreeList (aO:freelist) 

-$03c FreeWBObject (aO:WBObject) 

-$04e GetDiskObject (a0:name) 

-$02a Getlcon (a0:name,al:icon,a2:freelist) 

-$0le GetWBObject (aO:name) 

-$066 MatchToolValue (a0:typeString,al:value) 
-$054 PutDiskObject (a0:name,al:diskobj) 

-$030 Puticon (a0:name,al:icon) 

-$024 PutWBObject (a0:name,al:object) 


H.14 Die Icon-Library (nach Offsets) 


-30 

-36 

-42 

-48 

-54 

-60 

-66 

-72 

-78 

-84 

-90 

-96 


-$01e GetWBObject (a0:name) 

-$024 PutWBObject (a0:name,al:object) 

-$02a Getlcon (a0:name,al:icon,a2:freelist) 

-$030 Puticon (a0:name,al:icon) 

-$036 FreeFreeList (aO:freelist) 

-$03c FreeWBObject (aO:WBObject) 

-$042 AllocWBObject () 

-$048 AddFreeList (aO:freelist,al:mem,a2:size) 
-$04e GetDiskObject (a0:name) 

-$054 PutDiskObject (aO:name,al:diskobj) 

-$05a FreeDiskObject (a0:diskobj) 

-$060 FindToolType (a0:toolTypeArray,al:typeName) 
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-102 

-108 


H. 15 


-462 

-450 

-42 

-438 

-396 

-402 

-348 

-354 

-360 

-48 

-54 

-60 

-66 

-72 

-78 

-84 

-90 

-96 

-102 

-108 

-114 

-366 

-120 

-408 

-372 

-126 

-132 

-426 

-138 

-330 

-36 

-144 

-414 

-378 

-150 

-156 

-162 

-168 

-468 

-174 

-180 

-186 

-192 
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-$066 MatchToolValue (aO:typeString,al:value) 
-$06c BumpRevision (aO:newname,al:oldname) 


Die Intuition-Library (alphabetisch) 


-$lce ActivateGadget (aO:Gadget,al:Window,a2:Req) 

-$lc2 ActivateWindow (a0:Window) 

-$02a AddGadget (a0:AddPtr,al:Gadget,d0:Position) 

—$ lb6 AddGList (a0: AddPtr, a 1: Gadget, dO: Pos,dl: NumGad, a2: Req) 

-$18c AllocRemember (aO:RememberKey,dO:Size,dl:Flags) 

-$192 AlohaWorkbench (a0:wbport) 

-$15c AutoRequest (a0:Win,al:Body,a2:PText,a3:NText,dO:PFlag 
dl:NFlag,d2:W,d3:H) 

-$162 BeginRefresh (a0:Window) 

-$168 BuildSysRequest (a 0 :Win,al:Body,a2:PText,a3:NText,d0:Flag 
dl:W,d2:H) 

-$030 ClearDMRequest (a0:Window) 

-$036 ClearMenuStrip (a0:Window) 

-$03c ClearPointer (a0:Window) 

-$042 CloseScreen (a0:Screen) 

-$048 CloseWindow (a0:Window) 

-$04e CloseWorkBench () 

-$054 CurrentTime (aO:Seconds,al:Micros) 

-$05a DisplayAlert (d0:AlertNumber,a0:String,al:Height) 

-$060 DisplayBeep (a0:Screen) 

-$066 Doubleclick (dO:sseconds,dl:smicros,d2:cseconds,d3:cmicros) 
-$06c DrawBorder (aO:RPort,al:Border,d0:LeftOffset,dl:TopOffset) 
-$072 Drawlmage (aO:RPort,al:Image,dO:LeftOffset,dl:TopOffset) 
-$16e EndRefresh (a0:Window,d0:Complete) 

-$078 EndRequest (a0:requester,al:Window) 

-$198 FreeRemember (aO:RememberKey,dO:ReallyForget) 

-$174 FreeSysRequest (a0:Window) 

-$07e GetDefPrefs (a0:preferences,d0:size) 

-$084 GetPrefs (a0:preferences,d0:size) 

-$laa GetScreenData (aO:buffer,d0:size,dl:type:al:Screen) 

-$08a InitRequester (a0:Req) 

-$14a IntuiTextLength (a0:IText) 

-$024 Intuition (a0:ievent) 

-$090 ItemAddress (a0:MenuStrip,d0:MenuNumber) 

-$19e LocklBase (dO:dontknow) 

-$17a MakeScreen (a0:Screen) 

-$096 ModifylDCMP (a0:Window,d0:Flags) 

-$09c ModifyProp (aO:Gadget,al:Win,a2:Req,d0:Flags,dl:HPos 
d2:VPos,d3:HBody,d4:VBody) 

-$0a2 MoveScreen (a0:Screen,d0:dx,dl:dy) 

-$0a8 MoveWindow (a0:Window,d0:dx,dl:dy) 

-$ld4 NewModifyProp (aO:Gad,al:Win,a2:Req,d0:Flag,dl:HPos 
d2:VPos,d3:HBod,d4:VBod,d5:NumGad) 

-$0ae OffGadget (a0:Gadget,al:Win,a2:Req) 

-$0b4 OffMenu (aO:Window ( d0:MenuNum) 

-$0ba OnGadget (a0:Gadget,al:Win,a2:Req) 

-$0c0 OnMenu (aO:Window,d0:MenuNum) 



Tabelle aller Library-Routinen 


-30 

-198 

-204 

-210 

-216 

-222 

-432 

-456 

-384 

-228 

-444 

-234 

-240 

-390 

-246 

-252 

-258 

-264 

-270 

-324 

-276 

-282 

-288 

-420 

-294 

-300 

-336 

-342 

-318 

-306 

-312 


H. 16 


-30 

-36 

-42 

-48 

-54 

-60 

-66 

-72 

-78 

-84 

-90 

-96 

-102 

-108 

-114 

-120 

-126 


-$01e Openlntuition () 

-$0c6 OpenScreen (aO:Args) 

-$0cc OpenWindow (a0:Args) 

-$0d2 OpenWorkBench () 

-$0d8 PrintIText (aO:rp,al:IText,dO:LeftOffset,dl:TopOffset) 
-$0de RefreshGadgets (aO:Gadgets,al:Win,a2:Req) 

-$lb0 RefreshGList (a0:Gadgets,al:Win,a2:Req,d0:NumGad) 

-$lc8 Refreshwindow (a0:Window) 

-$180 RemakeDisplay () 

-$0e4 RemoveGadget (aO:RemPtr,al:Gadget) 

-$lbc RemoveGList (a0:RemPtr,al:Gadget,d0:NumGad) 

-$0ea ReportMouse (a0:Window,d0:Boolean) 

—S0f0 Request (aO:Req,al:Win) 

-$186 RethinkDisplay () 

—$0f6 ScreenToBack (a0:Screen) 

-$0fc ScreenToFront (a0:Screen) 

-$102 SetDMRequest (aO:Win,al:Req) 

-$108 SetMenuStrip (a0:Win,al:Menu) 

-$10e SetPointer (aO:Win,al:Pointer,d0:Height,dl:Width,d2:HotX 
d3:HotY) 

-$144 SetPrefs (a0:preferences,d0:size,dl:flags) 

-$114 SetWindowTitles (aO:window,al:winTitle,a2:scrTitle) 

-$lla ShowTitle (a0:Screen,d0:ShowIt) 

-$120 SizeWindow (a0:Window,d0:dx,dl:dy) 

-$la4 UnlocklBase (a0:IBLock) 

-$126 ViewAddress () 

-$12c ViewPortAddress (aO:Window) 

-$150 WBenchToBack () 

-$156 WBenchToFront () 

-$l3e WindowLimits (a0:Window,d0:WMin,dl:HMin,d2:WMax,d3:HMax) 
-$132 WindowToBack (a0:Window) 

-$138 WindowToFront (a0:Window) 


Die Intuition-Library (nach Offsets) 


-$01e Openlntuition () 

-$024 Intuition (aOiievent) 

-$02a AddGadget (a0:AddPtr,al:Gadget,d0:Position) 

-$030 ClearDMRequest (a0:Window) 

-$036 ClearMenuStrip (a0:Window) 

-$03c ClearPointer (a0:Window) 

-$042 CloseScreen (a0:Screen) 

-$048 CloseWindow (a0:Window) 

-$04e CloseWorkBench () 

-$054 CurrentTime (a0:Seconds,alrMicros) 

-$05a DisplayAlert (dO:AlertNumber,aO:String,al:Height) 

-$060 DisplayBeep (a0:Screen) 

-$066 Doubleclick (d0:sseconds,dl:smicros,d2:cseconds,d3:cmicros) 
-$06c DrawBorder (aO:RPort,al:Border,dO:LeftOffset,dl:TopOffset) 
-$072 Drawlmage (aO:RPort,al:Image,dO:LeftOffset,dl:TopOffset) 
-$078 EndRequest (a0:requester,al:Window) 

-$07e GetDefPrefs (a0:preferences,d0:size) 
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-132 -$084 GetPrefs (aO:preferences,dO:size) 

-138 -$08a InitRequester (aO:Req) 

-144 -$090 ItemAddress (aO:MenuStrip,dO:MenuNumber) 

-150 -$096 ModifylDCMP (aO:Window,dO:Flags) 

-156 -$09c ModifyProp (aO:Gadget,al:Win,a2:Req,dO:Flags,dl:HPos 

d2: VPos, d3: HBody, d4: VBody) 

-162 -$0a2 MoveScreen (a0:Screen,d0:dx,dl:dy) 

-168 -$0a8 MoveWindow (a0:Window,d0:dx,dl:dy) 

-174 -$0ae OffGadget (aO:Gadget,al:Win,a2:Req) 

-180 -$0b4 OffMenu (aO:Window,dO:MenuNum) 

-186 -$0ba OnGadget (aO:Gadget,al:Win,a2:Req) 

-192 -$0c0 OnMenu (a0:Window,d0:MenuNum) 

-198 -$0c6 OpenScreen (a0:Args) 

-204 -$0cc OpenWindow (a0:Args) 

-210 -$0d2 OpenWorkBench () 

-216 -$0d8 PrintIText (aO:rp,al:IText,dO:LeftOffset,dl:TopOffset) 

-222 -$0de RefreshGadgets (aO:Gadgets,al:Win,a2:Req) 

-228 -$0e4 RemoveGadget (aO:RemPtr,al:Gadget) 

-234 -$0ea ReportMouse (a0:Window,d0:Boolean) 

-240 -$0f0 Request (aO:Req,al:Win) 

-246 -$0f6 ScreenToBack (a0:Screen) 

-252 -$0fc ScreenToFront (a0:Screen) 

-258 -$102 SetDMRequest (aO:Win,al:Req) 

-264 -$108 SetMenuStrip (a0:Win,al:Menu) 

-270 -$10e SetPointer (a 0 :Win,al:Pointer,dO:Height,dl:Width,d2:HotX 

d3:HotY) 

-276 -$114 SetWindowTitles (aO:window,al:winTitle,a2:scrTitle) 

-282 -$lla ShowTitle (a0:Screen,d0:ShowIt) 

-288 -$120 SizeWindow (a0:Window,d0:dx,dl:dy) 

-294 -$126 ViewAddress () 

-300 -$12c ViewPortAddress (a0:Window) 

-306 -$132 WindowToBack (a0:Window) 

-312 -$138 WindowToFront (a0:Window) 

-318 -$13e WindowLimits (a0:Window,d0:WMin,dl:HMin,d2:WMax,d3:HMax) 

-324 -$144 SetPrefs (a0:preferences,d0:size,dl:flags) 

-330 -$14a IntuiTextLength (a0:IText) 

-336 -$150 WBenchToBack () 

-342 -$156 WBenchToFront () 

-348 -$15c AutoRequest (aO:Win,al:Body,a2:PText,a3:NText,dO:PFlag 

dl:NFlag,d2:W,d3:H) 

-354 -$162 BeginRefresh (a0:Window) 

-360 -$168 BuildSysRequest (aO:Win,al:Body,a2:PText,a3:NText,dO:Flag 

dl:W,d2:H) 

-366 -$16e EndRefresh (aO:Window,d0:Complete) 

-372 -$174 FreeSysRequest (a0:Window) 

-378 -$17a MakeScreen (a0:Screen) 

-384 -$180 RemakeDisplay () 

-390 -$186 RethinkDisplay () 

-396 -$i8c AllocRemember (aO:RememberKey,dO:Size,dl:Flags) 

-402 -$192 AlohaWorkbench (a0:wbport) 

-408 -$198 FreeRemember (aO:RememberKey,dO:ReallyForget) 

-414 -$19e LocklBase (d0:dontknow) 

-420 -$la4 UnlocklBase (a0:IBLock) 

-426 -$laa GetScreenData (a0:buffer,d0:size,dl:type:al:Screen) 

-432 -$lb0 RefreshGList (a0:Gadgets,al:Win,a2:Req,d0:NumGad) 

-438 -$lb6 AddGList (aO:AddPtr,al:Gadget,d0:Pos,dl:NumGad,a2:Req) 
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-444 

-450 

-456 

-462 

-468 


H. 17 


-78 

-54 

-42 

-36 

-90 

-150 

-84 

-156 

-30 

-174 

-96 

-120 

-108 

-60 

-168 

-144 

-72 

-66 

-126 

-162 

-102 

-138 

-114 

-48 

-132 


H.18 


-30 

-36 

-42 

-48 

-54 

-60 

-66 


-$lbc RemoveGList (aO :RemPtr ,al :Gadget,dO :NumGad) 

-$lc2 ActivateWindow (aO:Window) 

-$lc8 Refreshwindow (a0:Window) 

-$lce ActivateGadget (a0:Gadget,al:Window,a2:Req) 

-$ld4 NewModifyProp (a0:Gad,al:Win,a2:Req,d0:Flag,dl:HPos 
d2:VPos,d3:HBod,d4:VBod,d5:NumGad) 


Die Layers-Library (alphabetisch) 


-$04e BeginUpdate (a0:layer) 

-$036 BehindLayer (aO:li,al:layer) 

-$02a CreateBehindLayer (a0:li,al:bm,d0:x0,dl:y0,d2:xl,d3:yl 

d4:flags,a2:bm2) 

-$024 CreateUpfrontLayer (aO:li,al:bm,dO:xO,dl:yO,d2:xl,d3:yl 

d4:flags,a2:bm2) 

-$05a DeleteLayer (a0:li,al:layer) 

-$096 DisposeLayerlnfo (a0:li) 

-$054 EndUpdate (aO:layer,d0:flag) 

-$09c FattenLayerlnfo (a0:li) 

-$01e InitLayers (a0:li) 

-$0ae InstallClipRegion (a0:layer,al:region) 

-$060 LockLayer (a0:li,al:layer) 

-$078 LockLayerlnfo (a0:li) 

-$06c LockLayers (aO:li) 

-$03c MoveLayer (a0:ii,al:layer,d0:dx,dl:dy) 

-$0a8 MoveLayerlnFrontOf (a0:movelayer,al:backlayer) 

-$090 NewLayerlnfo () 

-$048 ScrollLayer (a0:li,al:layer,d0:dx,dl:dy) 

-$042 SizeLayer (a0:li,al:layer,d0:dx,dl:dy) 

-$07e SwapBitsRastPortClipRect (a0:rp,al:cr) 

-$0a2 ThinLayerlnfo (a0:li) 

-$066 UnlockLayer (aO:layer) 

-$08a UnlockLayerlnfo (a0:li) 

-$072 UnlockLayers (a0:li) 

-$030 UpfrontLayer (aO:li,al:layer) 

-$084 WhichLayer (a0:li,d0:x,dl:y) 


Die Layers-Library (nach Offsets) 


-$01e InitLayers (a0:li) 

-$024 CreateUpfrontLayer (aO:li,al:bm,d0:x0,dl:y0,d2:xl,d3:yl 

d4:flags,a2:bm2) 

-$02a CreateBehindLayer (aO:li,al:bm,d0:x0,dl:y0,d2:xl,d3:yl 

d4:flags,a2:bm2) 

-$030 UpfrontLayer (aO:li,al:layer) 

-$036 BehindLayer (a0:li,al:layer) 

-$03c MoveLayer (a0:li,al:layer,d0:dx,dl:dy) 

-$042 SizeLayer (aO:li,al:layer,d0:dx,dl:dy) 
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-72 -$048 ScrollLayer (a 0 :li,al:layer,dO:dx,dl:dy) 

-78 -$04e BeginUpdate (aO:layer) 

-84 -$054 Endüpdate (aO:layer,d0:flag) 

-90 -$05a DeleteLayer (aO:li,al:layer) 

-96 -$060 LockLayer (aO:li,al:layer) 

-102 -$066 UnlockLayer (aO:layer) 

-108 -$06c LockLayers (aO:11) 

-114 -$072 UnlockLayers (a0:li) 

-120 -$078 LockLayerlnfo (a0:li) 

-126 -$07e SwapBitsRastPortClipRect (a0:rp,al:cr) 

-132 -$084 WhichLayer (a0:li,d0:x,dl:y) 

-138 -$08a UnlockLayerInfo (aO:li) 

-144 -$090 NewLayerlnfo () 

-150 -$096 DisposeLayerlnfo (aO:li) 

-156 -$09c FattenLayerlnfo (aO:li) 

-162 -$0a2 ThinLayerlnfo (aO:li) 

-168 -$0a8 MoveLayerlnFrontOf (aO:movelayer,al:backlayer) 

-174 -$0ae InstallClipRegion (a0:layer,al:region) 


H.19 Die MathFFP-Library (alphabetisch) 


-54 -$036 SPAbs (d0:float) 

-66 -$042 SPAdd (dl:leftFloat,dO:rightFloat) 

-96 -$060 SPCeil (d0:float) 

-42 -$02a SPCmp (dl:leftFloat,dO:rightFloat) 

-84 -$054 SPDiv (dl:leftFloat,dO:rightFloat) 

-30 -$01e SPFix (do:float) 

-90 -$05a SPFloor (d0:float) 

-36 -$024 SPFlt (dO:integer) 

-78 -$04e SPMul (dl:leftFloat,dO:rightFloat) 

-60 -$03c SPNeg (do:float) 

-72 -$048 SPSub (dl:leftFloat,d0:rightFloat) 

-48 -$030 SPTst (d0:float) 


H.20 Die MathFFP-Library (nach Offsets) 


-30 -$01e SPFix (dO:float) 

-36 -$024 SPFlt (dO:integer) 

-42 -$02a SPCmp (dl:leftFloat,dO:rightFloat) 

-48 -$030 SPTst (d0:float) 

-54 -$036 SPAbs (d0:float) 

-60 -$03c SPNeg (d0:float) 

-66 -$042 SPAdd (dl:leftFloat,dO:rightFloat) 

-72 -$048 SPSub (dl:leftFloat,dO:rightFloat) 

-78 -$04e SPMul (dl:leftFloat,dO:rightFloat) 

-84 -$054 SPDiv (dl:leftFloat,dO:rightFloat) 

-90 -$05a SPFloor (d0:float) 

-96 -$060 SPCeil (d0:float) 
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H.21 Die MathlEEEDoubBas-Library (alphabetisch) 


-54 -$036 IEEEDPAbs (dO/dl:double) 

-66 -$042 IEEEDPAdd (dO/dl:double,d2/d3:double) 

-96 -$060 lEEEDPCeil (dO/dl:double) 

-42 -$02a IEEEDPCmp (dO/dl:double,d2/d3:double) 

-84 -$054 IEEEDPDiv (dO/dl:double,d2/d3:double) 

-30 -$01e IEEEDPFix (dO/dl:double) 

-90 -$05a IEEEDPFloor (dO/dlrdouble) 

-36 -$024 IEEEDPFlt (d0:integer) 

-78 -$04e IEEEDPMul (dO/dl:double,d2/d3:double) 

-60 -$03c IEEEDPNeg (dO:integer) 

-72 -$048 IEEEDPSub (dO/dl:double,d2/d3:double) 

-48 -$030 IEEEDPTst (d0:integer) 


H.22 Die MathlEEEDoubBas-Library (nach Offsets) 


-30 -$01e IEEEDPFix (do/dl:double) 

-36 -$024 IEEEDPFlt (d0:integer) 

-42 -$02a IEEEDPCmp (dO/dl:double,d2/d3:double) 

-48 -$030 IEEEDPTst (dO:integer) 

-54 -$036 IEEEDPAbs (dO/dlidouble) 

-60 -$03c IEEEDPNeg (dO:integer) 

-66 -$042 IEEEDPAdd (dO/dl:double,d2/d3:double) 

-72 -$048 IEEEDPSub (dO/dl:double,d2/d3:double) 

-78 -$04e IEEEDPMul (dO/dl:double,d2/d3:double) 

-84 -$054 IEEEDPDiv (dO/dl:double,d2/d3:double) 

-90 -$05a IEEEDPFloor (dO/dl:double) 

-96 -$060 lEEEDPCeil (dO/dl:double) 


H.23 Die MathTrans-Library (alphabetisch) 


-120 -$078 SPAcos (dO:float) 

-114 -$072 SPAsin (dO:float) 

-30 -$01e SPAtan (dO:float) 

-42 -$02a SPCos (d0:float) 

-66 -$042 SPCosh (d0:float) 

-78 -$04e SPExp (d0:float) 

-108 -$06c SPFieee (dO:integer) 

-84 -$054 SPLog (d0:float) 

-126 -$07e SPLog10 (dO:float) 

-90 -$05a SPPow (dl:leftFloat,dO:rightFloat) 

-36 -$024 SPSin (d0:float) 
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-54 

-$036 

SPSincos (dl:leftFloat,dO:rightFloat) 

-60 

-$03c 

SPSinh (d0:float) 

-96 

-$060 

SPSqrt (d0:float) 

-48 

-$030 

SPTan (d0:float) 

-72 

-$048 

SPTanh (d0:float) 

-102 

-$066 

SPTieee (d0:float) 


H.24 Die MathTrans-Library (nach Offsets) 


-30 

-$01e 

SPAtan (d0:float) 

-36 

-$024 

SPSin (d0:float) 

-42 

-$02a 

SPCos (d0:float) 

-48 

-$030 

SPTan (d0:float) 

-54 

-$036 

SPSincos (dl:leftFloat,dO:rightFloat) 

-60 

-$03c 

SPSinh (d0:float) 

-66 

-$042 

SPCosh (d0:float) 

-72 

-$048 

SPTanh (d0:float) 

-78 

-$04e 

SPExp (d0:float) 

-84 

-$054 

SPLog (d0:float) 

-90 

-$05a 

SPPow (dl:leftFloat,dO:rightFloat) 

-96 

-$060 

SPSqrt (d0:float) 

-102 

-$066 

SPTieee (d0:float) 

-108 

-$06c 

SPFieee (d0:integer) 

-114 

-$072 

SPAsin (d0:float) 

-120 

-$078 

SPAcos (d0:float) 

-126 

-$07e 

SPLoglO (d0:float) 


H.25 Die PotGo-Library (alphabetisch) 


-6 -$006 AllocPotBits (d0:bits) 

-12 -$00c FreePortBits (d0:bits) 

-18 -$012 WritePotGo (d0:word,dl:mask) 


H.26 Die PotGo-Library (nach Offsets) 


-6 -$006 AllocPotBits (d0:bits) 

-12 -$00c FreePortBits (d0:bits) 

-18 -$012 WritePotGo (d0:word,dl:mask) 
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H.27 Die Timer-Library (alphabetisch) 

-42 -$02a AddTime (aO:dest,al:src) 

-54 -$036 CmpTime (aO:dest,al:src) 

-48 -$030 SubTime (aO:dest,al:src) 

H.28 Die Timer-Library (nach Offsets) 

-42 -$02a AddTime (a0:dest,al:src) 

-48 -$030 SubTime (a0:dest,al:src) 

-54 -$036 CmpTime (a0:dest,al:src) 

H.29 Die Translator-Library (alphabetisch) 

-30 -$01e Translate (aO:input,dO:inputLength,al:outBuf,dl:bufSize) 

H.30 Die Translator-Library (nach Offsets) 

-30 -$01e Translate (aO:input,d0:inputLength,al:outBuf,dl:bufsize) 
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